Propiedades y acciones de la hoja de trabajo VBA

Trabajar con hojas de trabajo es una de las acciones más comunes al escribir código VBA. La siguiente es una guía de referencia para encontrar la sintaxis correcta.

Hacer referencia a hojas de trabajo del libro de trabajo

'Hacer referencia a una hoja de trabajo en otro libro de trabajoWorkbooks("WorkbookName.xlsx").Worksheets("SheetName").[otras propiedades/acciones]'Hacer referencia a una hoja de trabajo en el mismo libro que el código VBAThisWorkbook.Worksheets("SheetName").[otro propiedades/acciones]'Hacer referencia a una hoja de trabajo en el libro de trabajo activoActiveWorkbook.Worksheets("SheetName").[otras propiedades/acciones]

Para utilizar cualquiera de los siguientes ejemplos, deberá incluir la referencia del libro; de lo contrario, Excel asumirá que desea utilizar ActiveWorkbook.

Seleccionar hojas de trabajo por nombre

'Seleccione una hoja de trabajo por nombreWorksheets("SheetName")

Seleccione hojas de trabajo por posición desde la hoja de trabajo más a la izquierda

'Seleccione hojas de trabajo por posición desde la hoja de trabajo más a la izquierdaWorksheets(1) 'la primera hoja de trabajo Worksheets(2) 'la segunda hoja de trabajo

Agregar hojas de trabajo

'Agregar una hoja de trabajoHojas de trabajo.Agregar'Agregar 4 hojas de trabajoHojas de trabajo.Agregar recuento:=4'Agregar una hoja de trabajo delante de una hoja de trabajoHojas de trabajo.Agregar antes:=Hojas de trabajo(3)'Agregar una hoja de trabajo después de una hoja de trabajoHojas de trabajo.Agregar después:=Hojas de trabajo(3)' Agregue una hoja de trabajo al inicio de Worksheets.Add Before:=Worksheets(1)'Agregue una hoja de trabajo al final de Worksheets.Add after:=Worksheets(Worksheets.Count)'Agregue una nueva hoja de trabajo y asígnela a una variableDim Ws As WorksheetSet Ws = Worksheets .Add'Agregar una nueva hoja de trabajo y asígnale el nombreDim Ws As WorksheetSet Ws = Worksheets.AddWs.Name = "SheetName"

Eliminar hojas de trabajo

'Eliminar una hoja de trabajoWorksheets("SheetName").Delete'Eliminar una hoja de trabajo sin mostrar un mensaje de errorApplication.DisplayAlerts = FalseWorksheets("SheetName").DeleteApplication.DisplayAlerts = True

Asignar una hoja de trabajo a una variable

'Asignar una hoja de trabajo a una variableDim Ws como WorksheetSet Ws = Worksheets("SheetName")

Cambiar el nombre de una hoja de trabajo

'Cambiar el nombre de una hoja de trabajoWorksheets("OldSheetName").Name = "NewSheetName"

Establecer el estado de visibilidad de una hoja de trabajo.

'VisibleWorksheets("SheetName").Visible = xlSheetVisible'HiddenWorksheets("SheetName").Visible = xlSheetHidden'InvisibleWorksheets("SheetName").Visible = xlSheetVeryHidden

Para ver otros ejemplos de visibilidad de hojas de trabajo, consulte estas publicaciones:

• VBA para ocultar todas las hojas excepto una

contar hojas de trabajo

'Contar hojas de trabajoHojas de trabajo.Contar

Copiar/mover hojas de trabajo

'Copiar hojas de trabajoHojas de trabajo("SheetName").Copiar'Mover una hoja de trabajo delante de otra hoja de trabajoHojas de trabajo("SheetName").Copiar antes:=Hojas de trabajo("AnotherSheetName")'Mover una hoja de trabajo después de otra hoja de trabajoHojas de trabajo("SheetName").Copiar después :=Hojas de trabajo("AnotherSheetName")'Copiar varias hojas de trabajoWorksheets(Array("SheetName", "SheetName2", "SheetName3")).Copiar

Proteger Desproteger hojas de trabajo

'Proteger una hoja de trabajoHojas de trabajo("Hoja de trabajo").Proteger'Proteger una hoja de trabajo con contraseñaHojas de trabajo("Nombre de hoja").Proteger "contraseña"'Desproteger una hoja de trabajo sin contraseñaHojas de trabajo("Nombre de hoja").Desproteger'Desproteger una hoja de trabajo sin contraseñaHojas de trabajo( "HojaNombre").Desproteger "contraseña"

Usando la hoja de trabajo activa

'Activar una hoja de trabajoWorksheets("SheetName").Activar'Cambiar el nombre de la hoja activaActiveSheet.Name = "SheetName"

---