Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

HILFE RUDI MAINTAIRE! Zellinhalt als Datei

Forumthread: HILFE RUDI MAINTAIRE! Zellinhalt als Datei

HILFE RUDI MAINTAIRE! Zellinhalt als Datei
12.10.2012 12:41:25
Helmut
Hallo Rudi,
bitte nochmals deine Hilfe!
Ich habe ein Script, das aus einem Excel File die Zellen der ersten Spalte ausliest und als Textfile mit Endung DUM in den Ordner "Nummern" ablegt.
Funkt auch. Wie muss das Skript aussehen, wenn ich in dem Excel File auch in der 2. Spalte daneben Inhalt habe und ich diesen Inhalt mit Bindestrich getrennt dem Filenamen mitgeben will?
Also z.B. 234580088-00.DUM statt 234580088.DUM
234580088 steht in der ersten Spalte und 00 in der 2. Spalte.
Skript bisher sieht so aus:
Sub dumdatei()
Dim rngA As Range
For Each rngA In Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp))
Open "D:\Nummern\" & "N_" & rngA.Text & "-" & rngB.Text & ".dum" For Output As #1
Close #1
Next
End Sub
Danke im Voraus!!
LG
Helmut

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: HILFE RUDI MAINTAIRE! Zellinhalt als Datei
12.10.2012 12:55:52
Rudi
Hallo,
willst du nicht, dass dir auch andere antworten?
Sub dumdatei()
Dim rngA As Range, strName As String
For Each rngA In Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp))
strName = IIf(rngA.Offset(, 1) = "", rngA, rngA & "-" & rngA.Offset(, 1))
Open "D:\Nummern\" & "N_" & strName & ".dum" For Output As #1
Close #1
Next
End Sub

Gruß
Rudi

Anzeige
AW: HILFE RUDI MAINTAIRE! Zellinhalt als Datei
12.10.2012 13:00:12
Helmut
Hi Rudi,
ICH DANKE DIR!!!!
Ich muss noch dazu sagen, dass ich dadurch auch sehr viel lerne, denn ich verwende die Skripts dann nicht einfach ohne sie mir anzusehen und zu versuchen sie zu verstehen!
Und das klappt bei dem kleinen Skript hier gut!
LG
Helmut
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige