Visual Basic - Concatenar

Life is soft - evento anual de software empresarial
   
Vista:

Concatenar

Publicado por Felipe (1 intervención) el 16/02/2009 22:11:02
Buenas a tod@s,

Esoy intentando concatenar el rango de una celda de excel con una variable para que el rango de la celdas avance dentro de un bucle. Algo parecido a esto

Do While Not EOF(1) 'bucle para recorrer el fichero hasta la ultima linea
Line Input #1, linea 'guarda la primera linea del fichero 1 en la variable linea
pais = Left(linea, 7)
usuario = Mid(linea, 17, 5)
tipo = Mid(linea, 23, 4)
numero = Mid(linea, 39, 3)
Range("f1").FormulaR1C1 = pais

If pais = "Spanish" And tipo = "Acco" Then
Range("c' & x&'").FormulaR1C1 = numero
Range("b'&x&'") = usuario
x = x + 1
End If

Loop

En definitiva lo que intento es que cada vez que entre en la sentencia if, el rango de la celda aumente en uno, c1, c2, c3........

Gracias a todos de ante mano y disculpar si no entendeis lo que pido
Salu2
Felipe
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

RE:Concatenar

Publicado por JuanC (10 intervenciones) el 24/02/2009 18:03:53
Range("C" & x).Value = numero ; x > 0

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar