Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Dateityp vorgeben
zurück: Makro ist nicht mehr verfügbar nach Neustart von Word 2003 weiter: Text aus Tabelle übernehmen ?! Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
ds133
Neuling


Verfasst am:
30. Apr 2009, 12:08
Rufname:

Dateityp vorgeben - Dateityp vorgeben

Nach oben
       Version: Office 2007

Hallo,

ich möchte, wenn man ein Dokument speichert, dass der Speichertort, Dateiname und Dateityp vorgegeben wird.

Die ersten beiden dinge habe ich schon, beim zweiten hakts leider nicht.. folgenden code hab ich..

Code:

Sub FileSave()
  ActiveDocument.Fields.Update
  If ActiveDocument.Path = "" Then 'Falls Dokument noch nie gespeichert wurde
    FileSaveAs
    Exit Sub
  End If
  ActiveDocument.Save
End Sub

Sub FileSaveAs()
  ActiveDocument.Fields.Update
  Pfad = "C:\Berichtsheft\Wochenübersichten"
  With Dialogs(wdDialogFileSaveAs)
    .Name = Pfad & "\" & ActiveDocument.FormFields("DatumVom").Result
    .Show
  End With
End Sub


Standardmäßig wird jetzt die Dateiendung docx vergeben, da mein dokument aber makros enthält möchte ich gerne docm vergeben, wie ist das möglich?
MarcSLK
Word seit 4.0 (DOS


Verfasst am:
30. Apr 2009, 12:42
Rufname:


AW: Dateityp vorgeben - AW: Dateityp vorgeben

Nach oben
       Version: Office 2007

Hallo,

versuch es mal auf diese Weise:

Dim strName As String
strName = "Test"
strDat = strName & ".docm"
SaveAs strDat

Muss natürlich noch an Deine Bedürfnisse angepasst werden.

Gruß

Marcus
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
30. Apr 2009, 15:19
Rufname:
Wohnort: Leipzig

AW: Dateityp vorgeben - AW: Dateityp vorgeben

Nach oben
       Version: Office 2007

Hallo ds133,

Du kannst den Dokumenttyp so vorgeben:
Code:
Sub FileSaveAs()
  ActiveDocument.Fields.Update
  Pfad = "C:\Berichtsheft\Wochenübersichten"
  With Dialogs(wdDialogFileSaveAs)
    .Name = Pfad & "\" & ActiveDocument.FormFields("DatumVom").Result
    .Format = wdFormatDocument  '<----
    .Show
  End With
End Sub

Ich weiß jetzt nicht, wie die Konstante für *.dotm heißt, kannst Du leicht im Objektkatalog herausfinden/probieren. Öffne im VBA-Editor mit F2 den Objektkatalog. Such nach wdSaveFormat, da sind die Konstanten aufgelistet.

_________________
Sei doch so nett und gib eine Rückmeldung, ob es klappt!
Gruß, Lisa

Guter Rat ist teuer!
Martin Wirtsbach
Gast


Verfasst am:
26. Jul 2011, 17:27
Rufname:

AW: Dateityp vorgeben - AW: Dateityp vorgeben

Nach oben
       Version: Office 2007

Hallo!

Word ignoriert bei mir regelmäßig die selbst definierte
Sub FileSave() - Routine und führt stattdessen die Standardroutine aus.

Gibt es dafür bekannte Gründe, warum das Makro ggf. nicht angesprungen wird?

Viele Grüße
Martin
Martin Wirtsbach
Gast


Verfasst am:
29. Jul 2011, 10:56
Rufname:


Nachtrag: Dateityp vorgeben - Nachtrag: Dateityp vorgeben

Nach oben
       Version: Office 2007

Hier noch ein wichtiger ergänzender Hinweis:

Das Problem besteht nur, wenn man die Vorlagedatei aus Lotus Notes heraus startet.

Die "normalen" Makros funktionieren dann wie gewohnt, die Makros, die Wordbefehle überschreiben dagegen nicht, also die Save oder SaveAs Routinen.

Möglicher Weise sind wir damit auch nicht mehr bei einem (anfänglich vermutetem) VBA-Problem...
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Word VBA Programmierung (Makros): Dokumentenname bei "Speichern unter" vorgeben 1 Norwegen60 202 24. Sep 2013, 15:54
Norwegen60 Dokumentenname bei "Speichern unter" vorgeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateityp erkennen: Word oder Excel gleichzeitig erkennen 2 vbaler_test 346 18. Dez 2012, 14:47
vbaler_test Dateityp erkennen: Word oder Excel gleichzeitig erkennen
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateiname unter Speichern Unter vorgeben 21 Ferencz 26045 01. Dez 2011, 16:57
Nobinx Dateiname unter Speichern Unter vorgeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Duplex-Druck in Vorlage vorgeben 0 Jethowe 971 02. Sep 2011, 09:52
Jethowe Duplex-Druck in Vorlage vorgeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateiname unter "speichern unter..." vorgeben. Wor 6 Holländer 473 26. Aug 2011, 07:17
Holländer Dateiname unter "speichern unter..." vorgeben. Wor
Keine neuen Beiträge Word Serienbriefe: Serienbrief speichern Pfad und Dateiname vorgeben 1 MadJB 1562 10. Nov 2010, 14:44
MadJB Serienbrief speichern Pfad und Dateiname vorgeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Word 2007 VBA Application.FileDialog(mso...SaveAs) Dateityp 7 BlauerKoala 6980 11. Jun 2010, 12:05
CHF Word 2007 VBA Application.FileDialog(mso...SaveAs) Dateityp
Keine neuen Beiträge Word VBA Programmierung (Makros): Dateityp im Makro mit festlegen 5 Gast 2290 02. Jun 2010, 16:33
Brillu Dateityp im Makro mit festlegen
Keine neuen Beiträge Word VBA Programmierung (Makros): namen beim "Speichern unter" vorgeben 1 Gast 1969 19. Nov 2009, 13:54
Hubert_R namen beim "Speichern unter" vorgeben
Keine neuen Beiträge Word Gestaltungselemente: Schriftart bei Formular vorgeben 0 terrors 1819 13. Jul 2009, 13:55
terrors Schriftart bei Formular vorgeben
Keine neuen Beiträge Word VBA Programmierung (Makros): Word Makro alle Tabellen Spaltenbreite vorgeben 1 FWagner 5374 22. Okt 2008, 16:56
r.mueller Word Makro alle Tabellen Spaltenbreite vorgeben
Keine neuen Beiträge Word Hilfe: *T*Word 2007 Dateityp via Registry ändern 2 Office07user 5027 30. Jul 2008, 10:54
Kev *T*Word 2007 Dateityp via Registry ändern
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Word VBA