bin Anfänger und habe folgendes Problem: In einer Tabelle stehen in einer Spalte, z.B. A1 bis A20 verschiedene Daten und die möchte ich jetzt durch eine case-Anweisung mit einem Wert vergleichen. Wie schaffe ich es, die Zellennummer um eins zu erhöhen in der for-case Anweisung. Hier ist meine funktionierende case - Anweisung:
Select Case Range("B112").Value
' Eins
Case Is = Range("A1")
Range("D112:H112").Select
Selection.Copy
Range("C1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Wie schaffe ich es also, den Range-Wert A1(C1) auf A2-A20 (C2-C20)zu erhöhen?
Bisher schreibe ich mehrere Case-Anweisungen. Bei 50 Werten ist eine Schleife wohl besser.
Danke im Voraus,
Christian