|
Hallo liebe Gemeinede,
ich habe folgendes Problem.
Ich schreibe mithilfe von VBA, Formeln in definierte Zellen.
Der Anwendungsfall gibt mir nun leider vor, das die gesamte Rechenlogik auf der Exceloberfläche zu liegen hat. Daher auch die Probleme bei der Umsetzung bzw. diese "riesiege" Formel...
Die Formel habe ich auf der Excel Oberfläche aufgebaut, getestet und sie funktioniert. ;-) Bei der Umsetzung in VBA hakt es jetzt allerdings.
Die Formel soll mir einen Wert einer Matrix wiedergeben, welche in abhängigkeit von den drei Variablen "Ueber, Drunter, Summe_Tab & Zeile" stehen.
Die Variablen werden für jede Zelle angepasst und im vorderen Teil der Schleife bestimmt, mein Problem liegt anscheinend in zwei Bereichen.
Zum einen übergebe ich in der Originalformel die Adresse der Matrix, welche verwendet werden soll mittels indirect an den SVERWEIS, des weiteren gebe ich der Range auch noch einen Bezug auf das entsprechende Blatt mit 'STEUERUNG'! mit.
Zum anderen scheine ich ein Problem mit der erzeugung eben dieser Range zu haben. Einzeln lassen sich die "eckpunkte" der Range erzeugen allerdings kann ich die zusammenführung mittels : anscheinend so nicht in VBA abbilden.
Ich hab da schon die diversen Varianten " & ":" & " I ':' I ; etc. versucht, allerdings ohne erfolg. Es kommt immer der Fehler "Laufzeitfehler '1004': Anwendungs- oder objektdefinierter Fehler"
Cells(I, lastcolumn1 + F).Formula = "=vlookup(hlookup(" & Ueber & "," & Summen_Tab & "," & Zeile & "-4,false),indirect('Steuerung'!&address(vlookup(" & Ueber & ",'Steuerung'!$B$40:$C$57,2,false)+39,hlookup(" & Drunter & ",'Steuerung'!$D$38:$I$39,2,false)+3):address(vlookup(" & Ueber & ",'Steuerung'!$B$40:$C$57,2,false)+41,hlookup(" & Drunter & ",'Steuerung'!$D$38:$I$39,2,false)+4)),2,true)"
Habt Ihr ne Idee?
Gruß
Hunibol |