desde form modificar datos en sheet

23/08/2008 - 01:25 por Mauricio | Informe spam
tengo mi hoja de datos (sheet1) la cuál puede tener desde 5 a 250 filas
llenas de
informacionme gustaria desde un boton que tengo en un formulario
modificar todos los valores que tengo en las columnas B,C,D ...claro está en
mi formulario tengo unos textbox y cuadros combinados como origen de la
información que quiero sea la que reemplace la que está en la hoja de datos
(sheet1)..para ello tengo lo sgte. en un boton que esta en mi formulario
(esto para una columna pues apenas lo estoy probando)

Private Sub CommandButton6_Click()
Worksheets("Sheet1").Range("b2:B250").Value = ComboBox2.Value
Selection.FillDown
End Sub
esto me funciona sin embargo cuando tengo menos de 250 filas siempre la
columna B se llena hasta la fila 250 con la información del combobox2..COMO
CAPTURO SOLO EL RANGO DE FILAS QUE QUIERO REEMPLAZAR SI TENGO LA COLUMNA A
COMO BASE PARA MODIFICAR LA B
 

Leer las respuestas

#1 Héctor Miguel
23/08/2008 - 01:50 | Informe spam
hola, Mauricio !

... (esto para una columna pues apenas lo estoy probando)
Private Sub CommandButton6_Click()
Worksheets("Sheet1").Range("b2:B250").Value = ComboBox2.Value
Selection.FillDown
End Sub
... cuando tengo menos... filas siempre... se llena hasta la fila 250 con la informacion del combobox2
.COMO CAPTURO SOLO EL RANGO DE FILAS QUE QUIERO REEMPLAZAR
SI TENGO LA COLUMNA A COMO BASE PARA MODIFICAR LA B



(p.e.)

Private Sub CommandButton6_Click()
With Worksheets("Sheet1")
.Range("b2:b" & .Range("a2").End(xlDown).Row).Value = ComboBox2
End With
End Sub

saludos,
hector.

Preguntas similares