Crear botón para ir a una fila determinada
Como podría crear un botón para ir a una ceda terminada en el valor de la celda G22. Ej: el valor de la celda G22=155 al hacer clic en el botón que me lleve directo a la fila 155.
O como crear un botón que al presionarlo sea igual que presionar Ctrl+I para poder introducir manualmente la fila.
1 respuesta
H o l a:
Escribe el número de fila en la celda G22
Pon la siguiente macro en un módulo:
Sub SeleccionarFila2()
'Por.Dante Amor
f = Application.InputBox("Introduce el número de fila", "Ir a", Range("G22"))
If f = False Or f = "" Then Exit Sub
If Not IsNumeric(f) Then
MsgBox "Debes introducir un número"
Exit Sub
End If
Cells(f, "A").Select
End SubSigue las Instrucciones para un botón y ejecutar la macro
- Abre tu libro de Excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- En el menú elige Insertar / Módulo
- En el panel del lado derecho copia la macro
- Ahora para crear un botón, puedes hacer lo siguiente:
- Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
- Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
- Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
- Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: SeleccionarFila2
- Aceptar.
- Para ejecutarla dale click a la imagen.
H o l a:
Pon la siguiente macro en otro módulo y asígnala a un botón.
Sub abrirdialogobox()
'Por.Dante Amor
Application.Dialogs(xlDialogFormulaGoto).Show Range("G22").Value
End SubLo que hace es precisamente abrir la ventana de Ir a (Control + I), y toma el dato que tengas en la celda G22; en la celda G22 tienes que poner una celda, por ejemplo, escribe en la celda G22 = D8. Ejecuta la macro y en la ventana de Ir a, te aparecerá en la Referencia: D8, solamente presiona el botón aceptar y el cursor de excel seleccionará la celda D8.
