Hallo zusammen

Ich möchte gerne die Diagonale in einer neuen Spalte darstellen. Nachfolgend ist das Problem noch illustriert. Die rechte Spalte sollte aus den vier ersten erzeugt werden.

1 8 8 8 8 1
8 2 8 8 8 2
8 8 3 8 8 3
8 8 8 4 8 4
8 8 8 8 5 5


Ich bin der Sprache Visual Basic leider nicht mächtig und von daher froh, wenn es ohne einem Macro gehen würde.

Besten Dank für die Bemühungen
Chris