Thema Datum  Von Nutzer Rating
Antwort
20.10.2020 10:41:29 Jimmy
Solved
20.10.2020 11:18:21 Gast73405
Solved
20.10.2020 11:35:34 Gast74329
Solved
20.10.2020 12:50:41 Gast10307
Solved
Rot Save Makro - Name aus Kontrollelemente - schliessen
 20.10.2020 13:06:31 Jimmy
Solved
20.10.2020 14:53:32 Gast10307+Gast73405
NotSolved

Ansicht des Beitrags:
Von:
Jimmy		 Datum:
20.10.2020 13:06:31		 Views:
503		 Rating:
     
Antwort:
 Nein
Thema:
Save Makro - Name aus Kontrollelemente - schliessen

Perfekt - Danke vielmals!!!

Code funktioniert so:

Private Sub Speichern_Click()

'ContentControls initialize as Strings

Dim dateiname As String, CC1 As String, CC2 As String, CC3 As String, CC4 As String
 
 CC1 = ActiveDocument.SelectContentControlsByTag("CC1").Item(1).Range.Text
 CC2 = ActiveDocument.SelectContentControlsByTag("CC2").Item(1).Range.Text
 CC3 = ActiveDocument.SelectContentControlsByTag("CC3").Item(1).Range.Text
 CC4 = ActiveDocument.SelectContentControlsByTag("CC4").Item(1).Range.Text
 
'Contentontrols initialize as dateiname
  dateiname = CC1 & "_" & CC2 & "_" & CC3 & "_" & CC4
    
'Save in a specific folder

    Call ThisDocument.SaveAs2(FileName:="C:\Users\Name\Desktop\Test Makro\2020\" & dateiname & ".docm", FileFormat:=wdFormatXMLDocumentMacroEnabled)
       
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
20.10.2020 10:41:29 Jimmy
Solved
20.10.2020 11:18:21 Gast73405
Solved
20.10.2020 11:35:34 Gast74329
Solved
20.10.2020 12:50:41 Gast10307
Solved
Rot Save Makro - Name aus Kontrollelemente - schliessen
 20.10.2020 13:06:31 Jimmy
Solved
20.10.2020 14:53:32 Gast10307+Gast73405
NotSolved