Macro borrar un rango de celdas de una determinada hoja de cálculo en OpenOffice Calc

Macro borrar rango de celdas OpenOffice Calc

Para eliminar en Hoja2 el rango de celdas D8:F14 en tu editor Basic llama a la macro de este modo:

BorrarCeldas( "Hoja2", "D8:F14")

La macro:

 

 

 

Sub BorrarCeldas(NombreHoja as string, RangoCeldas as string)
Dim oDoc As Object
Dim oRango As Object

'Este documento
oDoc = ThisComponent
'Hoja se define por nombre, rango por nombre
oRango = oDoc.getSheets.getByName(NombreHoja).getCellRangeByName(RangoCeldas)

'Borramos las celdas del rango en la hoja
oRango.clearContents(1023)

End Sub

1 comentario

Comentario De: luis alejandro garcia orsuz [Visitante]

Tengo una pregunta Como elimino filas que en una de sus columnas esta en cero o vacia?

28.05.22 @ 21:17 Reply to this comment


Form is loading...