Error de compilación:"Next sin For"

Preguntas y respuestas relacionadas

Copiar y Borrar con listbox y datos filtrados

Tengo este código que me ayudaron por aca mismo, y funciona perfecto, pero ahora tengo la necesidad de utilizar este código pero que los datos que copia, pega y borra sean de datos filtrados. Hasta el momento he intentando hasta donde mis...
1 respuesta

Vincular combobox sin repetir dato inicial

Tengo en una misma hoja datos en la columna A y en la columna DE, los datos se corresponden entre si, o sea, A1 con D1, A2 con D2... Etc. Quisiera hacer un useform con dos combobox, en el combobox1 que se listen los datos de la columna A, y que al...
9 respuestas

¿Cómo eliminar archivos de una carpeta por antigüedad?

Tengo una carpeta donde se van guardando de forma automática las copias de seguridad de una BD Access. Las copias se hacen diariamente, lo que hace que se vayan acumulando en dicha carpeta. Mi pregunta es si hay alguna forma de que se vayan...
3 respuestas

¿Cómo manejar (copiar y pegar) archivos externos desde una Macro VBA?

Tengo una carpeta-A con miles de archivos, y una hoja de Excel con los nombres de algunos de ellos. Quiero desde la Macro, buscar cada uno de ellos, copiarlo y pegarlo en una carpeta-B.
1 respuesta

Unificar código en un Modulo para VBA Excel

Tengo este código en 4 textBox 'Solo numeros, guion y cantidad caracteres. Puede separarse uno del otro Private Sub txtcli6_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If Not (KeyAscii >= 48 And KeyAscii <= 57) Then KeyAscii = 0 '<--- El...
1 respuesta

Como utilizar dos macros que empiezan con Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Quiero integrar dos macros que realizan una funcion cada una pero el asunto es que las dos deben funcionar el la misma hoja y empiezan con Private Sub Worksheet_SelectionChange(ByVal Target As Range) y a la hora de ejecutar las dos marcan error. ¿Qué...
2 respuestas

Despues de un If y una comparacion por igualdad no puedo poner False antes del then?

For i = 1 To 1000 If Hoja5.Cells(i, 1) = "" Then final = i Exit For End If Next For j = 2 To final If Hoja5.Cells(j, 1) = ComboBox1 False Then UserForm26.Show ComboBox1.BackColor = &HFF00& Exit Sub Exit For End If Next
2 respuestas

Sumar valor en misma celda

Como lo hago para que al introducir un valor en una celda me sume automáticamente 25. Es decir que al poner 100 en una celda me de esta misma 125
1 respuesta

Macro Insertar fecha, Numero de mes Semana en celdas diferentes.

Para: Dante Recurriendo nuevamente a tu gran ayuda, como puedo realizar que cuando uno ingrese numero o letra en determinada celda me ponga automáticamente la fecha el numero del mes y el numero de semana en la que uno se encuentra por ejemplo. En el...
1 respuesta

Ayuda con filtro

Te molesto con otras dos preguntas: Necesito hacer un filtro, yo uso este comando: If Combo1.ListIndex = 0 Then Data2.RecordSource = ( Select * FROM STOCK00 WHERE ID le '* & Text1.Text & *' ) End If 1. Una forma para que no búsquelo que NO dice el...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema