WVERWEIS Zellenindex ersetzen

in einer Zelle befindet sich die WVERWEIS-Formel. Wenn ich die nach unten kopiere, ändern sich die Zellbezüge, der Zellenindex aber nicht. Wie kann ich per VBA diesen Zellenindex in mehreren Spalten nebeneinander ändern? Der Zellenindex muß in jeder Zeile um 1 größer sein.

Ich habe es schon mit "Cells.Replace What:=..." versucht, damit kriege ich nur das Ersetzen des Zellenindexes hin.

Kann mir jemand helfen?

Danke
Und tschüß
andreas