Saltar al contenido

Hacer scroll una una hoja hasta la fila grabada desde un formulario


Recommended Posts

publicado

Tengo un formulario que graba en la última fila vacía que se encuentra de la hoja "Datos". Quisiera que después de grabar el registro, o al cerrar el formulario, la hoja excel hiciese el scroll automáticamente para situarse en la fila en la que se ha grabado el registro. Lo que pretendo es que si lanzo el formulario cuando tengo en pantalla las filas 1 a 20 (por ejemplo), pero el registro se graba en la 300 (primera fila vacía), vea en pantalla dicha fila sin tener que ir a buscarla con el scroll.

Private Sub cmdRegistrar_Click()

Set TransRowRng = ThisWorkbook.Worksheets("Datos").Cells(1, 1).CurrentRegion

NewRow = TransRowRng.Rows.Count + 1

With ThisWorkbook.Worksheets("Datos")

.Cells(NewRow, 1).Value = oficina

.Cells(NewRow, 2).Value = cmbEmpleado

.Cells(NewRow, 3).Value = cmbTipocliente

.Cells(NewRow, 4).Value = dtpFecha

End With

GoTo fin

Exit Sub

fin:

Unload Me

ThisWorkbook.Worksheets("Datos").Activate

publicado

Lo acabo de encontrar indirectamente en otro tema del foro. Simplemente añadiendo:

Worksheets("Datos").Range("b" & NewRow).Activate

Solucionado.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.