hallo Heritzp, ich habs geschafft durch x den zellschutz aufzuheben, aber bei dir ist der bereich im Makro festgeschrieben
(Wie kriegt man das Makro in das weiße fenster rein?)
REM ***** BASIC *****
sub schreib_x(ereignis)
oDoc=thiscomponent
oBereich=oDoc.sheets(0).getCellRangeByName("a1:C5") 'Zellbereich A1:C5 in 1. Tabelle
if oBereich.queryIntersection(ereignis.rangeaddress).count=0 then exit sub
If ereignis.String = "X" Then
ereignis.String = ""
Else
ereignis.String = "X"
End If
end sub
Mein Problem ist wie ich die Zellbereiche auf mehrere Tabellen aufteilen könnte...
[gelöst] durch doppelklick "X" setzen
Moderator: Moderatoren
Re: durch doppelklick "X" setzen
Win 7 Enterprise (32 Bit), LO 4.2.1, AOO 4.0.1, Excel 2003