Ver Mensaje Individual
  #9 (permalink)  
Antiguo 19/02/2011, 16:37
oyuky_aleyda
 
Fecha de Ingreso: febrero-2011
Mensajes: 1
Antigüedad: 14 años, 1 mes
Puntos: 0
Respuesta: Crear Documento en Excel desde VB6.0

alguien k me ayude con este codigo
Dim b As Integer
Dim quedan As Integer
Dim a As Integer
Dim compra As Variant
Dim ganancia As Currency
Dim i As Integer
Dim venta As Integer
Dim precioRevista As Currency
precioRevista = 20

For i = 2 To 31

Cells(i, 3).Value = Rnd

If Cells(i, 3).Value <= 0.5 Then
Cells(i, 4).Value = 3
venta = 3
quedan = existentes - venta
Cells(2, 5).Value = quedan



If quedan >= 0 Then
compra = "No"
Cells(2, 6).Value = compra
Else
compra = "yes"
Cells(2, 6).Value = compra


End If

Else