Seite 1 von 1
Re: Häkchen mit der Maus setzen
Verfasst: Fr, 15.02.2019 14:01
von Stephan
z.B.
Weise folgendes Makro dem Tabellenereignis "Doppelklick" zu:#
Code: Alles auswählen
Sub Main
With ThisComponent.getCurrentSelection
If .String = "x" Then
.String = ""
Else
.String = "x"
End If
End With
End Sub
Gruß
Stephan
Re: Häkchen mit der Maus setzen
Verfasst: Sa, 16.02.2019 19:48
von mikeleb
Hallo,
wie und wohin muss das?
Das das Makro in das Dokument soll, sollte klar sein (und auch wie). Die Ereigniszuweisung funktioniert gänzlich anders als in Excel.
Du klickst mit der rechten Maustaste auf den Tab des gewünschten Tabellenblattes und wählst "Tabellenereignisse...", wählst "Doppelklick" und klickst dann auf "Makro ...". Dann wählst du das gewünschte Makro.
Ich habe Stephans Makro mal ein bisschen ausgebaut.
Code: Alles auswählen
Sub anwesend(oevent) as boolean
oTab=oevent.spreadsheet
oBereich=oTab.getCellRangeByName("A1:C10")
if oBereich.queryintersection(oevent.rangeaddress).count>0 then
With oevent
If .String = "x" Then
.String = ""
Else
.String = "x"
End If
End With
anwesend=true
else
anwesend=false
end if
End Sub
Damit wird nun ein Bereich festgelegt, in dem die "x" mit Doppelklick gesetzt/gelöscht werden. Die Anweisung
sorgt dafür, dass nicht wie üblich (und außerhalb des Bereiches gewollt) der Textcursor in der Zelle landet (was normalerweise beim Doppelklick passiert).