Thema Datum  Von Nutzer Rating
Antwort
24.10.2017 11:32:13 Holm
NotSolved
Blau VBA mit Speichern unter und Datei-Namen
 24.10.2017 12:50:06 Gast87422
NotSolved
26.10.2017 14:46:32 Gast38921
NotSolved
24.10.2017 12:53:19 Gast98063
NotSolved

Ansicht des Beitrags:
Von:
Gast87422		 Datum:
24.10.2017 12:50:06		 Views:
626		 Rating:
     
Antwort:
  Ja
Thema:
VBA mit Speichern unter und Datei-Namen
Ich mache es so... sorry für das durcheinander Zeilenumsprung istmit | gekennzeichnet Private Sub CommandButton1_Click() Dim strDateiname As String | Dim strText As String | Dim strPfad As String| | 'hier den festen Text eintragen, der im Dateinamen erscheinen soll:| strText = "meinText"| 'Hier wird der Dateiname zusammengebaut:| With ActiveSheet strDateiname = .Range("C5") & .Range("D5") & "_" & strText & "_" & .Range("C4") & _ .Range("D4") & .Range("E4") & .Range("F4") & "_" & .Range("C3") & _ .Range("D3") & .Range("E3") & .Range("F3") & ".xlsm"| End With| 'Pfad per Dialog auswählen:| With Application.FileDialog(msoFileDialogFolderPicker)| .AllowMultiSelect = False| .Show| strPfad = .SelectedItems(1) & "\"| End With| 'nun wird die Datei gespeichert:| ThisWorkbook.SaveAs strPfad & strDateiname, FileFormat:=52| 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
24.10.2017 11:32:13 Holm
NotSolved
Blau VBA mit Speichern unter und Datei-Namen
 24.10.2017 12:50:06 Gast87422
NotSolved
26.10.2017 14:46:32 Gast38921
NotSolved
24.10.2017 12:53:19 Gast98063
NotSolved