Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1276to1280
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Button mit Speicher-Funktion funktioniert nicht.

Button mit Speicher-Funktion funktioniert nicht.
Basti
Schönen guten Abend,
ich habe in einem Arbeitsblatt ein CommandButton eingefügt und in VBA folgendes hinterlegt:

Private Sub Speichern_Click()
Speichern4 End Sub

Private Sub Speichern4 ()
Dim p_Pfad4 As String Dim p_filename4 As String p_Pfad4 = "J:\Basti\Kosten\Reisekosten\Aktuell\" p_filename4 = Range("Name2") & "_" & "RKA" & "_" & Range("ReiseDatEins") & (".xlsm") p_filename4 = p_Pfad4 & p_filename4 ActiveWorkbook.SaveAs (p_filename4) End Sub
Wieso funktioniert das nicht?
Vielen Dank für eure Hilfe und schönen Abend!

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Button mit Speicher-Funktion funktioniert nicht.
29.08.2012 18:28:12
Josef

Hallo Basti,
Existiert der Pfad?
Du musst du ab xl2007 unbedingt das Dateiformat angeben.
Private Sub Speichern4()
  Dim p_Pfad4 As String, p_filename4 As String
  
  p_Pfad4 = "J:\Basti\Kosten\Reisekosten\Aktuell\"
  
  p_filename4 = Range("Name2") & "_" & "RKA" & "_" & Range("ReiseDatEins") & ".xlsm"
  p_filename4 = p_Pfad4 & p_filename4
  
  ActiveWorkbook.SaveAs p_filename4, 52
  
End Sub



« Gruß Sepp »

Anzeige
AW: Button mit Speicher-Funktion funktioniert nicht.
30.08.2012 08:39:34
Basti
Schönen guten Morgen,
mega cool, ich hab die 52 hinter das SaveAs p_filename4 gehängt und alles funktioniert plötzlich! :-)
Vielen, vielen Dank und einen schönen Tag wünsche ich!
Beste Grüße,
Basti

318 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige