OpenOffice.info

Super:), vielen dank.

Sub ConfirmDelete(oEvt)
	oSelection = oEvt.Source.CurrentControl.Selection
	s = "Ausgewählte Zeilen:"
	For each Row in oSelection
		s = s & Chr(13) & Row 
	Next Row
	MsgBox s
End Sub

Aloha

[quote="MrSir"]eines Tabellen-Kontrollfeldes gesetzt[/quote]
Du meinst vermutlich Formular.

Prinzipiell geht das so:

[code]Sub ConfirmDelete(oEvt)
oSelection = oEvt.Source.CurrentControl.Selection
s = "Ausgewählte Zeilen:"
For each Row in oSelection
s = s & Chr(13) & Row
Next Row
MsgBox s
End Sub[/code]

Hallo,
habe ein Makro dem Ereignis "Löschen bestätigen" eines Tabellen-Kontrollfeldes gesetzt, nun möchte ich gerne im Makro erfahren, welche Zeilen zum Löschen markiert wurden, wie geht das?