Saltar al contenido principal

¿Cómo obtener la dirección de la celda activa en Excel?

Mientras usa Microsoft Excel, puede obtener fácilmente la ubicación de la celda actualmente seleccionada en el Cuadro de nombre que se enumera a la izquierda de la Barra de fórmulas. Pero si la celda tiene un nombre, no puede examinar su ubicación en función de la visualización en el Cuadro de nombre. Y si desea mostrar directamente la dirección completa de la celda activa o mostrar la dirección de la celda activa en una celda específica, ¿qué haría? En este tutorial, le mostraremos cómo obtener fácilmente la dirección de la celda activa con fórmulas y métodos VBA.

Obtener la dirección de la celda activa con la fórmula
Obtener la dirección de la celda activa con el código VBA
Muestra la dirección de la celda activa en una celda específica con código VBA
Muestra dinámicamente la dirección de la celda activa con una herramienta increíble


Obtener la dirección de la celda activa con la fórmula

En esta sección, le proporcionaremos una fórmula para obtener fácilmente la dirección de la celda activa.

1. Seleccione una celda para activarla.

2. Ingrese la fórmula siguiente y luego presione el botón Participar clave.

=ADDRESS(ROW(),COLUMN())

Luego, puede ver que la dirección de la celda seleccionada actual se muestra en la celda inmediatamente.

Note: Si va a seleccionar una celda diferente, la dirección no cambiará automáticamente. Para obtener una dirección dinámica mientras selecciona diferentes celdas, aplique los siguientes métodos.

Muestra dinámicamente la dirección de la celda activa:

La Barra de edición mejorada utilidad de Kutools for Excel ayuda a mostrar la dirección de la celda activa de forma dinámica en la hoja de trabajo en Excel. Además, puede ver y editar el contenido de la celda seleccionada directamente en la ventana como se muestra en la siguiente demostración.
¡Descárgalo y pruébalo ahora! (Tour gratuito de 30 días)


Obtener la dirección de la celda activa con el código VBA

También puede obtener la dirección de la celda activa con el código VBA. Haz lo siguiente.

1. presione el otro + F11 simultáneamente para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En el Microsoft Visual Basic para aplicaciones ventana, haga doble clic en el nombre de la hoja de trabajo actual en el panel izquierdo para abrir el editor de código, luego copie y pegue el siguiente código VBA en el editor de código.

Código de VBA: obtenga la dirección de la celda activa

Sub selectRange()
	MsgBox ActiveCell.Address
End Sub

3. Luego haga clic en el Ejecutar botón para ejecutar el código.

4. A continuación, aparecerá un cuadro de diálogo con la dirección de la celda activa que aparece en el interior.


Muestra la dirección de la celda activa en una celda específica con código VBA

En otra situación, le gustaría que la dirección de la celda activa se mostrara en una celda específica. Cada vez que pase de una celda a otra, la dirección de la celda se cambiará automáticamente y se mostrará en la celda especificada. Haz lo siguiente.

1. Abra el Microsoft Visual Basic para aplicaciones ventana presionando otro + F11 al mismo tiempo.

2. Haga doble clic en el nombre de la hoja en el panel izquierdo para abrir el editor de código, luego copie y pegue el siguiente código en él.

Código VBA: muestra la dirección de la celda activa en una celda especificada

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
	Range("A1").Value = ActiveCell.Address
End Sub

Note: A1 es la celda donde desea colocar la dirección de celda activa, puede cambiarla a la celda especificada para sus propias necesidades.

3. Luego haga clic Archive > Cerrar y volver a Microsoft Excel Para salir del Microsoft Visual Basic para aplicaciones ventana.

Puede ver la dirección de las pantallas de la celda activa en la celda A1, y la dirección cambiará automáticamente en función del cambio de la celda activa. Ver captura de pantalla:


Muestra dinámicamente la dirección de la celda activa con una herramienta increíble

Si desea mostrar dinámicamente la dirección de la celda activa en la hoja de trabajo, recomiendo encarecidamente el Barra de edición mejorada herramienta de Kutools for Excel. Veamos cómo esta herramienta puede mostrar dinámicamente la dirección de la celda activa en la hoja de trabajo.

Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.

1. Hacer clic en Kutools > Mostrar ocultar > Barra de edición mejorada para habilitar la característica.

A partir de ahora, cada vez que haga clic en una celda, aparecerá la ventana Barra de edición mejorada. Y la dirección de la celda activa se mostrará en la parte inferior de la ventana.
Tips: Puede ver y editar directamente el contenido de la celda directamente en la ventana.

  Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.


Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bom dia,
Excelente formula para exibir a célula ativa.
Mas estou precisando utilizar o "conteúdo" de uma célula ativa dentro de uma formula SE.
Entao:

Se
"celula_ativa" = "aluno"
Retorna a seguinte informação "XXXX"
OU se for "professor"
Retorna a seguinte informação "YYYY"

Vc consegue me ajudar com isso, por favor?
This comment was minimized by the moderator on the site
I am fairly new to writing VBA.
Instead of reporting the message box with activated cell address, I would like to pull the cell address of an activated cell from my vba code and store it in a table/other location on the sheet for each iteration that my for loop takes.

How would I go about completing this task?


Regards,
This comment was minimized by the moderator on the site
The first example does not display the address of the active cell but of the cell containing the formula. If you were to select a different cell the address would not change.
Actually this is probably more useful information than gathering the active cell's address and harder to find if you need it. I was looking how to do this using VBA and could not find it for a while so I will include it here:

Application.Caller.Address

That will give you the address of the cell calling the function and not the active cell, useful for relative references.
This comment was minimized by the moderator on the site
Hello,

Displaying the active cell reference is helpful. But how do I actually use that value? I'm reading exams, and have six columns (of which two will get filled in). The student name is in column A; I can extract the family name: LEFT(A7,(FIND(",")A7)-1))) [where A7 is the current address]. I can use the code for displaying the current active cell address provided above:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1").Value = ActiveCell.Address
End Sub

But what I really want to do is have the cursor being somewhere in the current row (C3:H3), and extract the family name of the current student. Example:

A B C D E F G H
1 Name ID 1 2 3 4 5 6

2 Smith, John 1234567

When the active cell is between C1 and H1, I want to extract the student name from A2 ("Smith, John") [using LEFT(A2,(FIND(",")A2)-1)))], but with the values for the address supplied from the code above.

Any suggestions would be welcome.


Bill
This comment was minimized by the moderator on the site
Dear Bill,
If you want to use the cell reference of active cell, please apply below VBA code.
(The active cell reference will be displayed in cell A1. Then you can copy the cell reference directely in A1 or do other operations as you need.)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If (Target.Count = 1) And (Intersect(Target, Range("A1")) Is Nothing) Then
Range("A1").Value = ActiveCell.Address
End If
End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations