Vielen Dank für die Hilfe und die schnelle Antwort.
Die Dimensionierungen habe ich nach der Antwort von Gast97891 aus meinem Code rasugelöscht.
Habe das so verstanden und die Formel dann folgendermassen umgesetzt.
Worksheets("Zusammenfassung Ergebnisse").Range("C5:C500").Formula = "=VLOOKUP($A5, 'Steuerungstabelle'!$D$5:$AE$6000, 2, FALSE)"
Worksheets("Zusammenfassung Ergebnisse").Range("C5:C500").Value = Worksheets("Zusammenfassung Ergebnisse").Range("c5:c500").Value
Ich möchte aber dass sich der Suchbereich fortlaufend erweitert...
Aus diesem Grund die Frage 1. (Die Bereiche sind hier nicht mehr "K" sondern C.
Bin noch nicht so erfahren mit VBA.
Vielen Dank und Liebi Grüess
Rolf
|