Thema Datum  Von Nutzer Rating
Antwort
Rot SaveAs .docx unter Pfad funktioniert nicht
 26.01.2017 12:47:50 LFM64
NotSolved
26.01.2017 13:08:26 Gast77252
NotSolved
26.01.2017 14:08:01 LFM64
NotSolved

Ansicht des Beitrags:
Von:
LFM64		 Datum:
26.01.2017 12:47:50		 Views:
1139		 Rating:
     
Antwort:
  Ja
Thema:
SaveAs .docx unter Pfad funktioniert nicht

Hallo,

 

ich möchte die ersten 4 Zeilen meiner Excel-Datei jeweils in einem neuen Absatz in einem neuen Word-Dokument abspeichern.

Das Word-Dokument soll im selben Pfad wie die .xlsm-Datei liegen.

 

Mein Code sieht wie folgt aus:

Sub WordAbsatzExportTry2()
    Dim appWord As Word.Application
    Dim i As Integer
    ThisWorkbook.Worksheets("Tabelle1").Activate
    
    Set appWord = CreateObject("Word.Application")
    appWord.Documents.Add
    
    For i = 1 To 4
        appWord.ActiveDocument.Paragraphs.Add
        appWord.ActiveDocument.Paragraphs(i).Range.Text = Cells(i, 1).Value
        Next i
        
        appWord.ActiveDocument.SaveAs2 ThisWorkbook.Path & "\absetze.docx"
        appWord.Quit
        
End Sub

Doch anstatt automatisch zu speichern kommt die Aufforderung "Datei speichern unter..." und es wird Dokument1.docx angezeigt.

Und das ganze unter C:\Users\MeinName\OneDrive\Documents

Mir wird für die Zeile

appWord.ActiveDocument.SaveAs2 ThisWorkbook.Path & "\absetze.docx"

die Fehlermeldung "Laufzeitfehler '4198' Befehl misslungen" angezeigt.

Hat jemand eine Idee?

 

Danke schonmal im Voraus

Philipp

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot SaveAs .docx unter Pfad funktioniert nicht
 26.01.2017 12:47:50 LFM64
NotSolved
26.01.2017 13:08:26 Gast77252
NotSolved
26.01.2017 14:08:01 LFM64
NotSolved