Thema Datum  Von Nutzer Rating
Antwort
17.05.2019 15:16:55 Kerstin
NotSolved
17.05.2019 15:28:25 Kerstin
NotSolved
Rot Speichern unter Dateityp ohne Makro, doch Formular soll weiterhin ausgeführt werden
 17.05.2019 18:31:09 Gast40546
NotSolved
17.05.2019 18:40:44 Kerstin
NotSolved
18.05.2019 08:35:59 Gast40546
Solved

Ansicht des Beitrags:
Von:
Gast40546		 Datum:
17.05.2019 18:31:09		 Views:
483		 Rating:
     
Antwort:
  Ja
Thema:
Speichern unter Dateityp ohne Makro, doch Formular soll weiterhin ausgeführt werden

als Anregung, den Fez mit der Userform spar ich mir - LG

Sub AlsDuplikat()
Dim strFilePath As String

   If Documents.Count > 1 Then
      Call MsgBox("Schließen sie alle Word Dokumente" & vbLf & _
      "mit Ausnahme der" & vbLf & ThisDocument.Name, vbExclamation, "Hinweis")
      Exit Sub
   End If
   With Documents(1)
      Application.DisplayAlerts = False
      .Save
      Application.Documents.Add .FullName
      strFilePath = InputBox("Dateiname", "Speichern unter", Documents(2).Path & "\")
      With Documents(1)
         .SaveAs2 FileName:=strFilePath, FileFormat:=wdFormatXMLDocument
         .Close
      End With
      Application.DisplayAlerts = True
   End With

End Sub

 

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
17.05.2019 15:16:55 Kerstin
NotSolved
17.05.2019 15:28:25 Kerstin
NotSolved
Rot Speichern unter Dateityp ohne Makro, doch Formular soll weiterhin ausgeführt werden
 17.05.2019 18:31:09 Gast40546
NotSolved
17.05.2019 18:40:44 Kerstin
NotSolved
18.05.2019 08:35:59 Gast40546
Solved