Alejandro Benitez

Alejandro Benitez

 1.205 puntos  España @alejandrobenitez desde - visto
Preguntar

Respuestas

Crear de manera automática 31 hojas

Otra: Sub crear31hojas() For i = 1 To 31 Sheets.Add(, Sheets(Sheets.Count)).Name = i Next End Sub

Macro para deshabilitar el botón derecho del mouse

Más sobre commandars: https://msdn.microsoft.com/es-es/library/office/ff838002.aspx
Respuesta en y en 1 temas más a

Cómo se utiliza la última fila con datos

lastrow = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row
Respuesta en a

Macro para abrir el archivo que está en una celda

Set libro = Workbooks.Open(ThisWorkbook.Path & "\" & Range("A1"))

Suscríbete RSS