Cómo determinar la siguiente celda libre en una columna usando una macro
En muchas macros, los datos deben agregarse continuamente. Entonces es necesario determinar la siguiente celda en una columna donde puede ingresar datos. Puede resolver esto usando una fórmula de Excel.
Sin embargo, si desea determinar la última celda de una macro, necesita los comandos de VBA. Hay varios enfoques para resolver el problema. Aquí hay una macro adecuada:
Sub SearchFreeCell ()
Atenuar celda como rango
Dim Maxzeile tan largo
Si Val (Left (Application.Version, 2))> 11 Entonces
Línea máxima = 1048576
Demás
Línea máxima = 65536
Terminara si
Establecer celda = Celdas (Maxzeile, 1) .End (xlUp) .Offset (1, 0)
MsgBox "La siguiente celda libre es" & cell.Address (False, False)
End Sub
Una vez iniciada, la macro determina la siguiente celda libre no utilizada en la columna A. La dirección de esta celda se muestra en una ventana.
La macro se dirige a la última fila de la columna A de la tabla activa y, a partir de ahí, determina la última celda utilizada anteriormente. Para que la macro funcione en Excel hasta la versión 2003, así como en Excel a partir de la versión 2007, se hace una distinción de caso adecuada al principio. Esta distinción de caso es necesaria porque el número de líneas disponibles ha aumentado con la versión 2007 de 65536 a 1048576.
Si desea encontrar la celda libre en una columna en lugar de la celda libre en la columna A, reemplace el primer número 1 entre corchetes después del comando Células por el número de la columna correspondiente.
Sugerencia: si desea saber cómo ingresar e iniciar macros en Excel, encontrará una breve descripción aquí: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html