Fehler im VBA Code. Kann Feld nicht von einer Datei in die andere uebernehmen
Hallo Profis!
Bin ein Frischling in VBA. Ich moechte eine Excel Vorlage mit weiteren Felder anpassen.
Habe jetzt versucht die Felder aus der Spalte "STREET" zu uebernehmen.
Das funktioniert nicht.
Muss ein simpler Fehler sein. Ich sehe ihn nicht.
Habe hier die Dateien hochgeladen:
http://www.file-upload.net/gal-130172/4gsuv/1.html
Wuerde mich freuen wenn ein Profi mal ueber die Dateien schaut.
Vielen Dank
Detlef
Bin ein Frischling in VBA. Ich moechte eine Excel Vorlage mit weiteren Felder anpassen.
Habe jetzt versucht die Felder aus der Spalte "STREET" zu uebernehmen.
Das funktioniert nicht.
Muss ein simpler Fehler sein. Ich sehe ihn nicht.
Habe hier die Dateien hochgeladen:
http://www.file-upload.net/gal-130172/4gsuv/1.html
Wuerde mich freuen wenn ein Profi mal ueber die Dateien schaut.
Vielen Dank
Detlef
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 267124
Url: https://administrator.de/forum/fehler-im-vba-code-kann-feld-nicht-von-einer-datei-in-die-andere-uebernehmen-267124.html
Ausgedruckt am: 17.05.2025 um 03:05 Uhr
2 Kommentare
Neuester Kommentar

Hallo Detlef!
Dein Array 'Dim tempData(1 To 5)' ist falsch dimensioniert...
Von dem abgesehen, ist es eh überflüssig:
Grüße Dieter
Dein Array 'Dim tempData(1 To 5)' ist falsch dimensioniert...
tempData(6) = wsSource.Range("J" & numRow).Value
With ThisWorkbook.Worksheets("Tabelle1")
.Range("B5").Value = wsSource.Range("C" & numRow).Value
.Range("B10").Value = wsSource.Range("E" & numRow).Value
.Range("B8").Value = wsSource.Range("F" & numRow).Value
.Range("B46").Value = wsSource.Range("G" & numRow).Value
.Range("B27").Value = wsSource.Range("I" & numRow).Value
.Range("B11").Value = wsSource.Range("J" & numRow).Value
End With
Grüße Dieter