HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Dateityp im "Speichern unter"-Dialog vorgeben

Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 10:35:21
stefanseevetal
Hallo liebe Experten,
ich habe mal wieder eine Frage: Wie kann ich im "Speichern unter"-Dialog den Dateityp auf "*.doc" voreinstellen?
Das Problem ist, dass einige bei uns hier Office 2007 haben, andere 2003. Damit alle mit Office 2003 auch die mit 2007 gespeicherten Dateien öffnen können, muss die Datei in 2007 als *.xls abgespeichert werden und nicht als "*.xlsx" (Ich weiß, dass es einen Converter für 2003 gibt, das geht aber aus anderen Gründen nicht). Bis dieses Problem aufgetaucht ist, sah mein Code so aus:

With Application.Dialogs(wdDialogFileSaveAs)
.Name = Projektordner & "Lieferschein_" & LNummer
.Show
End With


Nun muss ich irgendwie ein ".Format=?" einfügen, schätze ich. Aber was muss an die Stelle des Fragezeichens schreiben? Ich weiß z.B., dass ".Format=100" in Word das Format "*.rtf" ist. Aber wo finde ich diese Nummern für die verschiedenen Formate/Dateitypen?
Hoffe, es kann jemand helfen!
Danke und Gruß,
Stefan

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 10:41:00
Yusuf
Hi,
versuch es mal damit bitte. um es als Word Datei abzuspreichern
With Application.Dialogs(wdDialogFileSaveAs)
.Name = Projektordner & "Lieferschein_" & LNummer & ".doc"
.Show
End With
Gruß
Yusuf

AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 10:42:00
Hajo_Zi
Hallo Stefan,
unter Optionen kann man das in 2007 einstellen.
In Excel kannst Du keine DOC Datei erstellen.

AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 11:10:02
stefanseevetal
Hallo ihr zwei,
danke für die Antworten.
Zu Yusuf: Habe es schon versucht, aber das funktioniert leider nicht. In 2007 bleibt trotzdem das "*.docx" Format.
Zu Hajo: Ja, entschuldige bitte, ich suche eine Lösung für Word. Aber im Prinzip müsste es (mit xlDialogSaveAs) in Excel doch genauso gehen, oder? Deshalb habe ich es hier gepostet.
Das Problem ist, dass ich nicht weiß, wie ich ".Format=doc" bzw. ".Format=xls" hinbekomme (so funktioniert es auf jeden Fall nicht).
Danke und Gruß,
Stefan

AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 11:21:57
Yusuf
Hi,
nur zur Vergewisserung.
Du moechtest ein Makro fuer Word schreiben, welchen ein Dokument als .doc abspeichert und dir fehlt die entsprechende Befehlszeile.
Es geht hier also nicht um ein Excel-Makro!?
Falls dies so ist :
Hab dieses hier per Makro-Recorder in Word aufgezeichnet.
Habe irgendeine Datei in Word "Speichern unter..." als .doc gespeichert.
ActiveDocument.SaveAs FileName:="Dok1.doc", FileFormat:=wdFormatDocument, _
LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
False
Gruß
Yusuf

AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 11:36:00
stefanseevetal
Hallo Yusuf,
im Grunde ist es egal, ob Excel oder Word. Es geht darum, per vba den Dialog "Speichern unter" aufzurufen und das Speicherformat/ den Dateitypen vorzugeben. Wenn ich den Dialog per vba aufrufe, ist bei 2007 standardmäßig das Format "*.docx" bzw. "*.xlsx" eingestellt und wenn der Nutzer dann einfach auf speichern klickt, dann können andere Nutzer mit 2003 die Datei nicht mehr öffnen. Deshalb möchte ich neben dem Speichernamen auch das Format im Dialog vorgeben. Der SaveAs-Befehl soll nicht voll automatisch aufgeführt werden, da der Speicherort durch den Benutzer manuell bestimmt werden muss. In Excel müsste der Code dazu ungefähr so aussehen und an der Stelle mit dem Fragezeichen fehlt mit der Befehl mit dem ich den Dateityp im Dialog auf "*.xls" ändere. Ich weiß, dass man hinter Format verschiedene Zahlen angeben kann, um den Dateityp zu verändern. Nur welche Zahl steht für "xls" oder halt für "doc", wenn man es in Word überträgt. Kann ich diese konstanten Zahlen irgendwo rausfinden?

With Application.Dialogs(xlDialogSaveAs)
.Name = Projektordner & "Lieferschein_" & LNummer
.FileFormat = wdFormatDocument
.Format=?
.Show
End With


Danke und Gruß,
Stefan

AW: Dateityp im "Speichern unter"-Dialog vorgeben
01.07.2008 12:04:30
Yusuf
Hi,
also in Excel 2000 kann man die Version in der die Datei abgespeichert werden soll, bei
"Speichern unter..." so festlegen:
.FileFormat:=xlExcel4
da ist dann kein .Fromat=? mehr nötig danach.
Ich kann das ganze leider nicht mit 2007 durchspielen, da ich nur 2000 zur Verfuegung habe.
Gruß
Yusuf

300 Forumthreads zu ähnlichen Themen

Meistgelesene Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Ihre Stimme zählt!