Programción en excel vba

Iniciado por urlick, 21 Noviembre 2014, 17:19 PM

0 Miembros y 1 Visitante están viendo este tema.

urlick

Buenas a todos:

hola soy muy novato en vba y me gustaría hacer una pregunta

tengo una planilla excel con 2190 registros, a los que les debo eliminar el ultimo carácter y llevo harto buscando y pensando y no me resulta

la idea que yo tenia era la siguiente:
Código (vb) [Seleccionar]
Range("A2:A2190").Select = Left(Range("A2:A2190"), Len(Range("A2:A2190")) - 1)

probe con:
Código (vb) [Seleccionar]
(Range().Value  / Range().Text)

Algo así pero me dice error no coinciden los datos.

la verdad es que tengo poco conocimiento en vb

así que cualquier ayuda sirve

muchas gracias

Saludos.

FranciskoAsdf

Lo mejor que puedes hacer es grabar un macro en Excel y ahí hacer lo que quieres hacer.  Para editar el macro solo presionas Alt+F8 y pones editar.

Saludos.
Asdf debería ser algún tipo de función.

Shell Root

#2
Intentad con esté!

Código (vb) [Seleccionar]
Sub EliminarUltimoCaracter()
   Dim oHoja As String: oHoja = "Hoja4"   ' Hoja de donde se realizará el proceso
   Dim oFila As Integer: oFila = 2        ' Inicio de fila
   Dim oColumna As String: oColumna = "A" ' Columna que contiene el texto

   ' Seleccionar la hoja    
   Sheets(oHoja).Select
   ' Recorrer todos los valores hasta que encuentre un celda vacia
   Do While Range(oColumna & oFila).Value <> Empty
       ' Reemplazar el valor de la celda por el mismo valor eliminando el ultimo caracter
       Range(oColumna & oFila).Value = Left(Range(oColumna & oFila).Value, Len(Range(oColumna & oFila).Value) - 1)
       ' Incremento de fila
       oFila = oFila + 1
   Loop
End Sub


Agregas un boton en la hoja y le asignas la macro que te acabe de copiar
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

urlick

hola a todos:

Probé la opción de shell root y me dice indice fuera de intervalo y reviso (dentro de lo que entiendo) y no encuentro el problema

gracias a todos por sus respuestas

Shell Root

Cambiaste el nombre de la hoja por la que tu tienes? La fila inicial y la columna?
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

urlick

#5
Ahora si muchas gracias a todos los que respondieron.
y a shellroot que se dio el tiempo de programar para ayudarme