Moin zusammen,
Könnte mir jemand sagen wie ich dieses:
Pfad = "C:\DQM\Messung\RCA\RG 48\S49\DQM mit Display\"
Pfad1 = "C:\DQM\Messung\RCA\RG 48\S54\DQM mit Display\"
Pfad2 = "C:\DQM\Messung\RCA\RG 48\E2\DQM mit Display\"
Pfad3 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM mit Display\S49\"
Pfad4 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM mit Display\S54\"
Pfad5 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM mit Display\E2\"
Pfad6 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM mit Display\S49\"
Pfad7 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM mit Display\S54\"
Pfad8 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM mit Display\E2\"
Pfad9 = "C:\DQM\Messung\RCA\RG 48\S49\DQM ohne Display\"
Pfad10 = "C:\DQM\Messung\RCA\RG 48\S54\DQM ohne Display\"
Pfad11 = "C:\DQM\Messung\RCA\RG 48\E2\DQM ohne Display\"
Pfad12 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM ohne Display\S49\"
Pfad13 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM ohne Display\S54\"
Pfad14 = "C:\DQM\Messung\RCA\RG 48\abgefahrener Bogen\DQM ohne Display\E2\"
Pfad15 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM ohne Display\S49\"
Pfad16 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM ohne Display\S54\"
Pfad17 = "C:\DQM\Messung\RCA\RG 48\Spur\DQM ohne Display\E2\"
Pfad18 = "C:\DQM\Messung\RCA\SPML 16\S49\DQM mit Display\"
Pfad19 = "C:\DQM\Messung\RCA\SPML 16\S54\DQM mit Display\"
Pfad20 = "C:\DQM\Messung\RCA\SPML 16\E2\DQM mit Display\"
Pfad21 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM mit Display\S49\"
Pfad22 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM mit Display\S54\"
Pfad23 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM mit Display\E2\"
Pfad24 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM mit Display\S49\"
Pfad25 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM mit Display\S54\"
Pfad26 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM mit Display\E2\"
Pfad27 = "C:\DQM\Messung\RCA\SPML 16\S49\DQM ohne Display\"
Pfad28 = "C:\DQM\Messung\RCA\SPML 16\S54\DQM ohne Display\"
Pfad29 = "C:\DQM\Messung\RCA\SPML 16\E2\DQM ohne Display\"
Pfad30 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM ohne Display\S49\"
Pfad31 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM ohne Display\S54\"
Pfad32 = "C:\DQM\Messung\RCA\SPML 16\abgefahrener Bogen\DQM ohne Display\E2\"
Pfad33 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM ohne Display\S49\"
Pfad34 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM ohne Display\S54\"
Pfad35 = "C:\DQM\Messung\RCA\SPML 16\Spur\DQM ohne Display\E2\"
.....
Pfad127 = "C:\DQM\Messung\RCA\RGM\S49\DQM mit Display\"
Pfad128 = "C:\DQM\Messung\RCA\RGM\S54\DQM mit Display\"
Pfad129 = "C:\DQM\Messung\RCA\RGM\E2\DQM mit Display\"
Pfad130 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM mit Display\S49\"
Pfad131 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM mit Display\S54\"
Pfad132 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM mit Display\E2\"
Pfad133 = "C:\DQM\Messung\RCA\RGM\Spur\DQM mit Display\S49\"
Pfad134 = "C:\DQM\Messung\RCA\RGM\Spur\DQM mit Display\S54\"
Pfad135 = "C:\DQM\Messung\RCA\RGM\Spur\DQM mit Display\E2\"
Pfad136 = "C:\DQM\Messung\RCA\RGM\S49\DQM ohne Display\"
Pfad137 = "C:\DQM\Messung\RCA\RGM\S54\DQM ohne Display\"
Pfad138 = "C:\DQM\Messung\RCA\RGM\E2\DQM ohne Display\"
Pfad139 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM ohne Display\S49\"
Pfad140 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM ohne Display\S54\"
Pfad141 = "C:\DQM\Messung\RCA\RGM\abgefahrener Bogen\DQM ohne Display\E2\"
Pfad142 = "C:\DQM\Messung\RCA\RGM\Spur\DQM ohne Display\S49\"
Pfad143 = "C:\DQM\Messung\RCA\RGM\Spur\DQM ohne Display\S54\"
Pfad144 = "C:\DQM\Messung\RCA\RGM\Spur\DQM ohne Display\E2\"
kürzer schreiben kann denn die Pfad angabe würde bis Pfad144 Die Angaben bleiben immer gleich bis auf den 4 Unterordner der ändert sich immer. Es wäre sonst eine riesen schreiberei.
Dim Pfad As String, Pfad1 As String, Pfad2 As String, Pfad3 As String, Pfad4 As String, Pfad5 As String
Dim Pfad6 As String, Pfad7 As String, Pfad8 As String ....... Pfad144 as String
würde sonst ja auch so viel sein
Danke Rene