Schnellbrief aktuelles Datum + x Tage

Fragen, Anregungen oder Tipps und Tricks? Hier ist der erste Anlaufpunkt.
Nicht sicher, wo ein Thema hingehört? Hier hinein - wir kümmern uns! :)

Moderator: Forum Moderatoren

Forumsregeln
TM-Startforum - "offen für alle Themen".
Beiträge, die in einen anderen Bereich passen, werden bei Bedarf verschoben.
Antworten
hw
Beiträge: 293
Registriert: Dienstag 1. August 2006, 09:45
20
Wohnort: Baden-Württemberg
PVS: Turbomed
Konnektortyp: Kocobox
Hat sich bedankt: 21 mal
Hat Dank erhalten: 23 mal

Schnellbrief aktuelles Datum + x Tage

Beitrag von hw »

In den Schnellbriefen gibt es die Variable (Platzhalter) $4001$ für das aktuelle Tagesdatum.
Lt. Bescheibung soll man auch das aktuelle Datum + x Tage verwenden können durch Angabe der +Tage in eckigen Klammern.
Leider bekomme ich das nicht hin.

Die Hotline von TM ist damit überfordert und teilt auf meine entsprechende Anfrage folgendes mit: "... bezugnehmend auf Ihre Anfrage per E-Mail möchten wir Sie bitten, sich mit dem Vertriebs- und Servicepartner der Praxis in Verbindung zu setzten, da unsere CGM TURBOMED Hotline auf reine Anwenderfragen ausgerichtet ist. "

Ich dachte eigentlich, dass das ist eine Anwenderfrage ist. Jedenfalls kann ich von dort keine Hilfe erwarten. Weiß jemand, wie es geht?
TM-Vers: 21.4.2-5259

Vielen Dank
Benutzeravatar
RAMöller
Beiträge: 1516
Registriert: Montag 4. Januar 2010, 20:42
16
Hat sich bedankt: 16 mal
Hat Dank erhalten: 79 mal

Re: Schnellbrief aktuelles Datum + x Tage

Beitrag von RAMöller »

Wenn es in Word ist, sieht ein Makro zu Vordatierung in etwa so aus wie unten.

Sub DokVariableHinzfuegen()
ActiveDocument.Variables.Add Name:="Verfallsdatum"
End Sub



Sub AutoNew()
DokVariableVersorgen
End Sub

Sub AutoOpen()
DokVariableVersorgen
End Sub

Private Sub DokVariableVersorgen()
ActiveDocument.Variables("Verfallsdatum").Value = Vordatieren(7)
ActiveDocument.Fields.Update
End Sub

Private Function Vordatieren(d As Integer) As String
Dim t As Date
t = Date + d
Vordatieren = Format(t, "d. MMMM yyyy")
End Function
rfbdoc
PowerUser
Beiträge: 3064
Registriert: Sonntag 30. April 2006, 19:31
20
Hat sich bedankt: 56 mal
Hat Dank erhalten: 100 mal

Re: Schnellbrief aktuelles Datum + x Tage

Beitrag von rfbdoc »

$4001[-1]$ funktioniert, natürlich nicht $4001$[-1]
R.F.B.
hw
Beiträge: 293
Registriert: Dienstag 1. August 2006, 09:45
20
Wohnort: Baden-Württemberg
PVS: Turbomed
Konnektortyp: Kocobox
Hat sich bedankt: 21 mal
Hat Dank erhalten: 23 mal

Re: Schnellbrief aktuelles Datum + x Tage

Beitrag von hw »

Vielen Dank für die Tipps.
Dass das mit $4001[+5]$ doch geht, hilft uns ungemein bei der Vorbereitung von z.B. Impfeinwilligungen.
Die Hotline war nicht in der Lage, das mitzuteilen.

Wenn das noch jemand braucht, hier vielleicht noch der Hinweis: Die eckigen Klammern werden mit AltGr+8 bzw. AltGr+9 erzeugt.

Danke auch für den Ansatz mit dem Wordmakro, kann ich bestimmt außerhalb von TM brauchen.

Gruß hw
Antworten

Wer ist online?

Mitglieder in diesem Forum: Ahrefs [Bot], Bing [Bot], msiewe, Semrush [Bot] und 12 Gäste