dank Matthias der mir beim unten genannten Code zu Seite stand,
bin ich schon ein ganzes Stück weitergekommen.
Ist es noch irgendwie möglich diesen Code
Private Sub CommandButton1_Click()
Const Dateiname = "D:\AASDR\K86II\BN5568.txt"
Dim ff As Integer
ff = FreeFile
Open Dateiname For Output As ff
Print #ff, Selection.Value
Close #ff
End Sub
so zu ändern,
das wenn ich die gesamte Zeile z.B. A3 markiere
das Excel in Spalte G nachschaut was für eine Artikelbezeichnung vorhanden ist in diesem Fall z.B. K86 II (Diese Ordner aus Spalte G sind bereit in D:\AASDR angelegt) dann in dem entsprechenden
Ordner einen neuen Ordner einfügt, die Bezeichnung für diesen sollte in diesem Fall aus D3 genommen werden also Art.Nr.: 2006-8963 dann sollte in diesen Ordner eine Ausgabe-Textdatei mit der Bezeichnung aus A3 (BN5568.txt) angelegt werden.
Ist sowas überhaupt machbar ohne größeren Programmier-Aufwand möglich?
Wäre schön wenn es eine Lösung geben würde.
Viele Grüsse
Susi