vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Sch?tzen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2020
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Word-Dokument "Speichern unter" 
Autor: Flitze
Datum: 19.11.20 12:57

Hallo liebe VBler,

ich bräuchte Hilfe bei einem - hoffentlich nicht allzugroßen - Problem:

Ich öffne aus VB6 heraus eine Word-Datei und möchte diese als Text-Datei speichern.
Mein Versuch sieht so aus:
Dim WordObj As Object
Set WordObj = CreateObject("Word.Application")
WordObj.Documents.Open FileName:="C:\IN.doc" 'doc oder docx spielt keine Rolle
WordObj.ActiveDocument.SaveAs2 FileName:="C:\OUT.txt", FileFormat:=wdFormatText
Es wird zwar eine TXT-Datei gespeichert, aber die enthält nur Hieroglyphen.

Auch die folgende Schreibweise bringt keinen Erfolg:
WordObj.ActiveDocument.SaveAs "C:\OUT.txt", wdFormatText
Weiß jemand Rat?

Besten Dank vorab.

Cheers
Flitze
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: Word-Dokument "Speichern unter" 
Autor: effeff
Datum: 19.11.20 18:41

Du kannst "wdFormatText" nur nativ aus Word heraus benutzen. Du arbeitest mit später Bindung, weswegen Du anstelle des Parameters eine Konstante verwenden musst. Diese lautet hier: 2

Siehe https://docs.microsoft.com/de-de/office/vba/api/word.wdsaveformat

EALA FREYA FRESENA

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: Word-Dokument "Speichern unter" 
Autor: Flitze
Datum: 19.11.20 19:10

Verblüffend einfach und logisch (wenn man weiß wie's geht)!
Hat funktioniert.

Besten Dank!
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2020 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel