Inhalt des Datumfeldes in anderem Tabellenblatt hinterlegen

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Inhalt des Datumfeldes in anderem Tabellenblatt hinterlegen

Re: Inhalt des Datumfeldes in anderem Tabellenblatt hinterlegen

von Stephan » Di, 07.03.2017 12:14

Die Tabelle namens "Tabellenblatt2":

Code: Alles auswählen

Sub Setze_Datum()
With ThisComponent.CurrentController.getActiveSheet
	dpf = .Drawpage.Forms
	dfn = dpf.getByName("Formular").GetByName("datum1").date
End With
ThisComponent.Sheets().getByName("Tabellenblatt2").getCellRangeByName("A1").FormulaLocal = CDateFromIso(dfn)
End Sub

Die zweite Tabelle von Links (Index=1):

Code: Alles auswählen

Sub Setze_Datum()
With ThisComponent.CurrentController.getActiveSheet
	dpf = .Drawpage.Forms
	dfn = dpf.getByName("Formular").GetByName("datum1").date
End With
ThisComponent.Sheets().getByIndex(1).getCellRangeByName("A1").FormulaLocal = CDateFromIso(dfn)
End Sub
Gruß
Stephan

Inhalt des Datumfeldes in anderem Tabellenblatt hinterlegen

von Ouagadougou » Di, 07.03.2017 12:07

Hallo,

ich habe folgenden Code, der auch soweit funktioniert

Code: Alles auswählen

Sub Setze_Datum()
With ThisComponent.CurrentController.getActiveSheet
	dpf = .Drawpage.Forms
	dfn = dpf.getByName("Formular").GetByName("datum1").date
	.getCellRangeByName("A1").FormulaLocal = CDateFromIso(dfn)
End With
End Sub
Aber ich möchte, dass der Inhalt des Datumfeldes "datum1" nicht im selben Tabellenblatt gespeichert werden soll, sondern in Tabellenblatt 2. Ich schaffe es nicht, diese Verknüpfung im Code richtig darzustellen. (Es funktioniert nur, wenn ich keine gesonderten Tabellenname erwähne)

Vielen Dank für eure Mithilfe!

Nach oben