Me lamo Fajardo y soy nuev en este foro por lo que aprovecho para saludaros.
He intentado crear un formulario para rellenar una ficha y cuando llego al cuadro combinado 3º para rellenar las celdas consecutivas con direrentes conceptos (desde la celda B10 en adelante) se me duplican éstos y si busco algún otro se van seleccionande y escribiendo solos otros conceptos en las celdas.
El código de este cuadro es:
Private Sub ComboBox3_Change()
fila = 10
col = "B"
Do While True
If IsEmpty(Cells(fila, col)) Then Exit Do
fila = fila + 1
Loop
Cells(fila, "B").Value = ComboBox3.Text
End Sub
Intentaré añadir el fichero para que se pueda entender mejos todo
Hola a todos.
Me lamo Fajardo y soy nuev en este foro por lo que aprovecho para saludaros.
He intentado crear un formulario para rellenar una ficha y cuando llego al cuadro combinado 3º para rellenar las celdas consecutivas con direrentes conceptos (desde la celda B10 en adelante) se me duplican éstos y si busco algún otro se van seleccionande y escribiendo solos otros conceptos en las celdas.
El código de este cuadro es:
Private Sub ComboBox3_Change()
fila = 10
col = "B"
Do While True
If IsEmpty(Cells(fila, col)) Then Exit Do
fila = fila + 1
Loop
Cells(fila, "B").Value = ComboBox3.Text
End Sub
Intentaré añadir el fichero para que se pueda entender mejos todo
Gracias y perdonar esta parrafada.
Plantilla de vehículos2.xls