Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
604to608
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
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

makro zum speichern

makro zum speichern
28.04.2005 17:06:23
barbara
hallo leute,
ich brauch mal wieder eure tolle hilfe...
ich hab folgendes makro:

Private Sub CommandButton4_Click()
' RG_speichern Makro
' Makro am 11.07.2004 von Barbara Raith aufgezeichnet
Dim Datname
Sheets("Rechnung").Select
Datname = Cells(15, 5).Value
ActiveWorkbook.SaveAs Filename:= _
"C:\Dot 2005\O2\Abrechnungen\maerz05\ " & Datname & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub

so und nun möchte ich folgendes:
er soll aus einer fortlaufende nummer, dem aktuelle monat (also z.B. 04) und der kundennummer die steht in meinem sheet in d16 einen dateinamen kreeieren
frage geht das und vielleicht wie - bitte bitte hilfe

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: makro zum speichern
28.04.2005 17:12:53
Bert
Option Explicit

Private Sub CommandButton4_Click()
Dim Datname As String
Datname = CStr(Month(Date)) & Sheets("Rechnung").[d16].Text
ActiveWorkbook.SaveAs Filename:= _
"C:\Dot 2005\O2\Abrechnungen\maerz05\ " & Datname & ".xls", FileFormat:=xlNormal
End Sub

mfg Bert
AW: makro zum speichern
28.04.2005 17:17:12
barbara
ach wie ich euch liebe...
vielen vielen dank genial dieses forum
bussi
b
AW: makro zum speichern
28.04.2005 17:52:40
Hajo_Zi
Hallo Bert,
Bei einer Variablen die Du als String definierst werden alle Werte Du Du da reinschreibst zu einem String. Die brauchen nicht umgewandelt werden.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.

Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige