BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Eintrag wenn Feldwert geändert wurde

Alles zur Programmierung im LibreOffice.
Antworten
racoon7
Beiträge: 5
Registriert: Di 7. Jun 2011, 09:52

Eintrag wenn Feldwert geändert wurde

Beitrag von racoon7 » Di 2. Apr 2019, 12:00

Hallo,

in Calc suche ich eine Möglichkeit, Datum/Uhrzeit in eine Zelle zu schreiben, wenn sich die Zelle links davon geändert hat.
In Excel habe ich dazu ein passendes Makro gefunden:

Code: Alles auswählen

Private Sub Worksheet_Change(ByVal Target As Range)

Select Case Target.Column
    Case 5 To 5:    Cells(Target.Row, 6) = Now()
End Select

End Sub
Leider lässt sich dieses so nicht in Calc nutzen.
Kann mir jemand dabei helfen?
Vielen lieben Dank!!
Gruß
BS

mikele
Beiträge: 1642
Registriert: Mo 1. Aug 2011, 20:51

Re: Eintrag wenn Feldwert geändert wurde

Beitrag von mikele » Di 2. Apr 2019, 21:08

Hallo,
wenn du das folgende Makro an das Tabellenereignis "Inhalt geändert" bindest, sollte dein Wunsch in Erfüllung gehen.

Code: Alles auswählen

Sub Main (oEvent)

	If oEvent.supportsService("com.sun.star.sheet.SheetCell") Then
		If oEvent.CellAddress.Column=5 Then
			'msgbox oEvent.CellAddress.Row
			oEvent.Spreadsheet.getCellByPosition(6,oEvent.CellAddress.Row).value=now()
		End If
	End If

End Sub
Gruß,
mikele

racoon7
Beiträge: 5
Registriert: Di 7. Jun 2011, 09:52

Re: Eintrag wenn Feldwert geändert wurde

Beitrag von racoon7 » Mi 3. Apr 2019, 07:50

VIELEN LIEBEN DANK.
Das war genau das, was ich suchte. PERFEKT!

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten