Seite 1 von 1
Arztbrief
Verfasst: Mi 11. Mai 2011, 08:45
von Schnewittchen
Hallo, ich soll in meinem Praktikum Arztbriefe mit Makros automatisieren. Ich habe es jetzt mit Schaltflächen und Autotext gemacht. Habt ihr noch gute Ideen dafür. Vielen Dank.
LG; Johanna
Re: Arztbrief
Verfasst: Mi 11. Mai 2011, 11:49
von pmoegenb
Hallo Johanna,
was soll bei einem Dokument automatisiert werden ? Wenn Du damit vorgefertigte Dokumente meinst, dann befasst Dich mal mit Dokumentvorlagen (
http://www.ooowiki.de/WriterVorlagen?hi ... orlagen%29).
Re: Arztbrief
Verfasst: Do 12. Mai 2011, 13:34
von Schnewittchen
Hallo Peter!
Vielen Dank für den Hinweis. Also, die Befunde sollen aus dem Aufnahmebogen automatisch übernommen werden. Kannst du mir sagen, was an diesem Code falsch ist.
Ich bekomme immer die Fehlermeldung, dass der Die Prozedur oder Funktion a3 nicht definiert ist. Wie kann ich das machen?
Sub Dokumentvorlage_neu
Dim a3, a4 As String
Dim myFileProp(0) As New com.sun.star.beans.PropertyValue
Dim args(0) As New com.sun.star.beans.PropertyValue
Dim url As String
oDoc = ThisComponent
url = oDoc.getUrl
If oDoc.hasLocation = False Then
Beep
MsgBox "Das Dokument muss einen Namen haben! Ende!"
Exit Sub
End If
a3 = Dokument_Dateiname(url)
a4 = Pfad_OOo_User & "template/" & a3 & ".ott"
FileCopy url, a4
Fertig
End Sub
Vielen Dank und liebe Grüße, Johanna
Re: Arztbrief
Verfasst: Fr 13. Mai 2011, 11:06
von pmoegenb
Hallo Johanna,
in StarBasic kenne ich mich nur unzureichend aus. Du solltest, aber Deine Anfrage an den Forumsbereich
LibreOffice Programmierung richten. Möglicher Weise erhältst Du auch hier
http://www.dannenhoefer.de/faqstarbasic/index.html einige Antworten.
Re: Arztbrief
Verfasst: Do 26. Mai 2011, 09:03
von Schnewittchen
Danke, das habe ich jetzt gemacht.
Liebe Grüße, Johanna