Habe mit SuFu und über Googel gesucht.
Ich will beim öffnen einer Tabelle (ich öffne diese mit einem MaKRO in einer anderen Tabelle) das aktuelle Datum in Zelle M11 eintragen. (TT.MM.JJJJ)
Ich hatte es schon manuell hinbekommen, allerdings mit einem ' vor dem Datum was zu Problemen bei einer Berechnung führt.
Bekomme es auch nur manuell hin.
Hier mal mein bisheriger Versuch...
Code: Alles auswählen
sub setdate
oDoc=thisComponent
Sheet = oDoc.Sheets(0) '[erstes Arbeitsblatt]
mycell01 = Sheet.getCellRangeByName("$M$11")
if mycell01.string = "" then
Insert_As_Value( Date, "TT. MMM JJJJ", com.sun.star.util.NumberFormat.DATE )
end if
end sub
Wie bekomme ich das beim öffnen der Tabelle gleich eingefügt ?
Wie kann ich das Feld M11 per Makro leer bekommen (benötige ich für ein anderes Makro, das mir die Tabelle bei Änderungen speichert...)
Danke schon mal für die Hilfe...