Formular speichern,etc.

Moderator: ModerationP

Formular speichern,etc.

Beitragvon Terko » 15. Feb 2019, 09:01

Hallo,
ich habe ein Formular erstelt das nach dem ausfüllen:

1-eine Bezeichnung aus dem Formular bekommt >das hab ich
2-in einem bestimmten Verzeichnis gespeichert werden soll >das hab ich
3-als PDF Datei
4-die PDF darf sich nicht selbst öffnen
5-das Formular soll nach dem speichern wieder geleert werden
6-und das Formular geschlossen

Hintergrund es darf die erzeugte Datei nur an einem Ort geben.

Die ersten Punkte hab ich gefunden aber nun finde ich leider für die letzten 4 Punkte nichts.
Kann mir da wer helfen?
Terko
 

Re: Formular speichern,etc.

Beitragvon Terko » 15. Feb 2019, 09:17

Das hab ich vergessen:

Private Sub CommandButton1_Click()
Dim dateiname As String, teil1 As String, teil2 As String

teil1 = ActiveDocument.SelectContentControlsByTitle("Name").Item(1).Range.Text
teil2 = ActiveDocument.SelectContentControlsByTitle("Datum").Item(1).Range.Text
dateiname = teil1 & "_" & teil2

With Dialogs(wdDialogFileSaveAs)
.Name = "H:\FaBe\Verbandbuch\" & dateiname
.Show
End With
End Sub
Terko
 

Re: Formular speichern,etc.

Beitragvon theoS » 16. Feb 2019, 22:35

3-als PDF Datei
4-die PDF darf sich nicht selbst öffnen

Tut es normal nicht, wenn du mit Word im Speicherndialog ein pdf erzeugst.
Tut es das bei dir?
Dann. Willst du den Speicherort mit einem Dialog auswählen, oder soll der fest sein.
Wenn du den Dialog auswählen willst und den von Word verwenden, dann hast du immer die Möglichkeit, das Dokument auch als normales Dok zu speichern.
Oder willst du hier nur als Voreinstellung die Auswahl pdf?
Oder willst du den Dateinamen im Inhalt des Dokuments eingeben?
Dann nimmst du besser den SaveAs-Code, wo du all das festlegen kannst und den Dateinamen in einer Variablen übergeben.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 4738
Registriert: 19. Apr 2008, 00:14


Zurück zu Word Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 3 Gäste