SKu
Fleet Admiral
- Registriert
- Aug. 2012
- Beiträge
- 11.070
Hallo,
ich bin was VBA betrifft, nicht wirklich versiert und probiere mich gerade daran eigene Funktionen in VBA zu schreiben.
Bei ganz simplen Funktionen funktioniert das auch problemlos.
Nun wollte ich mal eine etwas komplexere Excel als Vorlage nutzen und dementsprechend eine Index-Match-Funktion in VBA abbilden.
Ich habe dafür zwei Tabellenblätter, wobei die Index-Match-Funktion auf Tabellenblatt 1 verwendet wird.
Jetzt habe ich mal versucht eine Funktion zu schreiben und die sieht folgendermaßen aus:
Zum einen meckert er, dass die Syntax bei "Function ProzVer(GPSys, Jahr)" fehlerhaft ist.
Und bei der Funktion an sich spuckt er mir Expected: list separator or ) aus.
Kann mir ein VBA-Spezi sagen was ich falsch mache?
ich bin was VBA betrifft, nicht wirklich versiert und probiere mich gerade daran eigene Funktionen in VBA zu schreiben.
Bei ganz simplen Funktionen funktioniert das auch problemlos.
Nun wollte ich mal eine etwas komplexere Excel als Vorlage nutzen und dementsprechend eine Index-Match-Funktion in VBA abbilden.
Ich habe dafür zwei Tabellenblätter, wobei die Index-Match-Funktion auf Tabellenblatt 1 verwendet wird.
Jetzt habe ich mal versucht eine Funktion zu schreiben und die sieht folgendermaßen aus:
Code:
Function ProzVer(GPSys, Jahr)
Set MyRange1 = Worksheets("Sheet2").Range("A1:AU2616")
Set MyRange2 = Worksheets("Sheet2").Range("A:A")
Set MyRange3 = Worksheets("Sheet2").Range("2:2")
ProzVer = Application.WorksheetFunction.Index(MyRange1, Application.WorksheetFunction.Match(GPSys, MyRange2, 0),Application.WorksheetFunction.Match(Jahr, MyRange3, 0)
End Function
Zum einen meckert er, dass die Syntax bei "Function ProzVer(GPSys, Jahr)" fehlerhaft ist.
Und bei der Funktion an sich spuckt er mir Expected: list separator or ) aus.
Kann mir ein VBA-Spezi sagen was ich falsch mache?