Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1276to1280
1276to1280
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Speichern mit fortlaufender Nummer

Speichern mit fortlaufender Nummer
thomas
Hallo zusammen,
ich habe ein Tabellenblatt mit einem Makro welches ausgewählte zellen im CSV format speichert.
Die CSv datei wird mit der Bezeichnung CSV-1 abgespeichert.
Wie ist es zu schaffen, dass bei erneutem Abspeichern der CSV datei eine fortlaufende Nr. vergeben wird?
Z.B. CSV-1, CSV-2, CSV-3 usw.
Danke für die Hilfe
thm

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Speichern mit fortlaufender Nummer
27.08.2012 08:57:49
Dirk
Hallo!
Fuer den Speichernamen in Deinem Macro einfach die Letzte Zahl aus dem aktuellen CSV namen extrahieren und um 1 hochzaehlen:
Savecnt=Replace(replace(Thisworkbook.name,".xls",""),"CSV", "")
Thisworkbook.saveas "CSV" & SaveCnt & ".xls"
Lass' hoeren, ob ok.
Gruss
Dirk aus Dubai

AW: Speichern mit fortlaufender Nummer
27.08.2012 10:49:27
thomas
Hi Dirk,
danke für die Hilfe.
Der letzte Satz" Thisworkbook....." wird als Syntaxfehler beschrieben.
Was nun?
thm

AW: Speichern mit fortlaufender Nummer
27.08.2012 11:26:53
Dirk
Hallo!
lade doch mal Deine Datei hoch, da kann man mal nachschauen. Sollte eigentlich funktionieren...
Gruss
Dirk aus Dubai

Anzeige
AW: Speichern mit fortlaufender Nummer
27.08.2012 11:53:39
thomas
hängt an..
Private Sub CommandButton1_Click()
' csvspeichern Makro
' Makro am 27.08.2012 von Thomas aufgezeichnet
ChDir _
"C:\Dokumente und Einstellungen\Bc\Eigene Dateien\A1_Masterfile\CNC_Einstellungen_BOF    _
_
_
711"
ActiveWorkbook.SaveCnt = Replace(Replace(ThisWorkbook.Name, ".xls", ""), "CSV", "")
Thisworkbook.saveas"CSV"& SaveCnt& ".xls"
End Sub

AW: Speichern mit fortlaufender Nummer
27.08.2012 14:37:50
Dirk
Hallo!
Leider hast Du den Link zur Datei nicht einkopiert.
Nichtdestotrotz: aendere mal die Zeilen wie folgt:
Dim SaveCnt as long
SaveCnt = Replace(Replace(ThisWorkbook.Name, ".xls", ""), "CSV-", "")
Thisworkbook.saveas "CSV-" & SaveCnt & ".xls"
Die Leerzeichen werden da benoetigt.
Lass' hoeren, ob ok.
Gruss
Dirk aus Dubai

Anzeige
AW: Speichern mit fortlaufender Nummer
27.08.2012 16:26:39
thomas
Hi Dirk,
danke für Deine Mühe, den Code habe ich so eingefügt, jetzt kommt die meldung "laufzeitfehler 13"
Typen unverträglich...
gruß thm

AW: Speichern mit fortlaufender Nummer
27.08.2012 16:40:56
Dirk
Hallo!
Lade doch mal die Datei hoch und kopieren den Link welcher angezeigt wird in Deinen post. Da kann man sich das auch mal anschauen.
Gruss
Dirk aus Dubai

68 Forumthreads zu ähnlichen Themen

Rechnung mit Rechnungsnummer
Sammy

Hallo Forum
Ich habe das Archiv bereits nach Beiträgen durchforstet und bin hier im Forum, ich sag mal missverstanden worden. Habe meine Rechnung erstellt und bin an folgenden Aufgaben gescheidert.
Es soll selbstständig eine Rechnungsnummer erstellt und in eine bestimmte Zelle eingetrag...
20.01.2009 22:50:00
Thread-ID: 1042010
7 Beiträge
Anzeige
fortlaufende nummern einfügen
ben

hallo leute
ich habe folgendes problem. in einer spalte a stehen wahllos daten und es können leerzeilen vorhanden sein. jetzt will ich bei betätigung eines button immer wenn in einer zelle der spalte a ein wert auftaucht eine fortlaufende nummer zuordnen. leider bekomm ich es nur hin wenn a...
05.05.2009 10:06:00
Thread-ID: 1072981
13 Beiträge
Fortlaufende Nummer für eine Variable
Dieterlem

Hallo Excelfreunde,
innerhalb einer Schleife möchte ich mehrere Variablen Deklarieren und einen Bereich zuweisen.
Hier ein kleiner Test dazu:
Dim i As Byte
Dim Anzahl as Byte
For i = 1 To Anzahl
Dim Bereich(i) As Range
Set Bereich(i) = .Range(.Cells(1, 1), .Cells(i,...
07.11.2009 17:35:44
Thread-ID: 1115247
3 Beiträge
Anzeige
fortlaufende Nummerierung unterbinden
Sandra

Hallo Leute,
obwohl meine Frage noch imemr offen ist, taucht Sie bei "offene Fragen" nicht mehr auf. Daher jetzt noch einmal ein Thread mit dem Link zu meinem Problem.
https://www.herber.de/cgi-bin/forum/call_forum.pl
Gruß
Sandra
17.02.2010 10:39:55
Thread-ID: 1139155
8 Beiträge
laufende nummer nicht automatisch abändern
maschmi

Hallo zusammen,
ich hoffe mir kann jemand helfen.
Ich will in einer Tabelle über die zusammensetzung verschiedener nummern eine laufende nummer für dokumente erzeugen. In Spalte A sind Kundennamen eingetragen. Zu jedem Kundennamen wird in Spalte B automatisch per SVerweis die entspreche...
23.04.2010 13:44:53
Thread-ID: 1153414
3 Beiträge
laufende Nummer vergeben
Lorenz

Hallo Excelianer
Wie kann man in Spalte "A" ab zeile 10 eine laufende Nummer mit eins beginnend vergeben.
Kriterium 1: Liste ist gefiltert (Autofilter)
Kriterium 2: beliebiger Eintrag in Spalte "B" muss vorhanden sein.
Bitte um eine VBA-Lösung.
Danke
Lorenz
05.05.2011 20:04:29
Thread-ID: 1213244
3 Beiträge
fortlaufende nummer generieren
Bernd

Hallo Excel-VBA Gemeinde ,
ich komme hier mal wieder nicht weiter . Ich habe eine Userform mit mehreren TextBoxen die mir in einem Tabellenblatt etwas Eintragen . Dieses Blatt möchte ich nun z.B. Vier mal Ausdrucken und dabei soll in der Zelle D19 eine Fortlaufende Nummer Generiert werden ,...
12.04.2013 10:20:32
Thread-ID: 1308502
6 Beiträge
Laufende Nummer vergeben
Michael

Ich will in einer Zelle eine Nummer vergeben, die aus einer auf einem Netzwerk-Pfad liegenden Excel- oder Textdatei eingelesen werden soll und sich immer um 1 erhöht. Der neue Wert soll wieder in die "Zähler"-Datei geschrieben werden. Gut wäre es auch, wenn die Nummer nicht wieder vergeben werd...
09.07.2002 13:09:30
Thread-ID: 135047
7 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
5
12
2
24
7
2
2
5
6
3
4
22
3
2
4
7
4
3
6
4
3
5
4
4