Seite 1 von 1

Re: Jede 2. Spalte auswählen bzw. markieren

Verfasst: Do, 01.09.2011 20:16
von Stephan
Wenn das Blatt in Welchem markiert werden soll, das aktuell aktive Blatt ist, z.B.:

Code: Alles auswählen

Sub Main 
bereiche = ThisComponent.createInstance("com.sun.star.sheet.SheetCellRanges")
blatt = ThisComponent.CurrentController.ActiveSheet()
For i = 0 To 255 Step 2
   bereiche.addRangeAddress(blatt.getCellRangeByPosition(i,0,i,65535).getRangeAddress(), False) 
Next i
ThisComponent.getCurrentController().select(bereiche) 
End Sub


Gruß
Stephan