Nicht wirklich.
nummer = InputBox ("Geben Sie die Nummer ein")
zustand = InputBox ("Geben Sie den Zustand ein")
If Cells(zl , sp + 1 ).Value = nummer then: Rem was für werte stehen in Spalte sp +1 und welchen wert hat sp?
Select Case
-------
-------
End Select
If Cells(zl ,sp + 1 ).Value = nummer And Cells(zl, sp +2). Value = Zustand: rem Warum nochmal If Cells(zl ,sp + 1 ).Value = nummer ? ist doch schon "=nummer", da du noch in der 1. IF-Schleife bist und andernfalls rausgesprungen wärest.
Select Case
----------
----------
End Select
End If
End If
Wenn du erklären könntest, was dein Makro machen soll (ohne irgendwelchen Code,, nur Text), wäre es vieel besser.
z.B. Wenn nummer = das und das, soll das und das passieren und zwar deswegen usw.
Wenn ich auch noch wüßte, wofür das Ganze gut ist, wäre es noch besser.
Ideal wäre es, wenn du mir auch noch die Datei schicken könntest (/sensible Daten anonymisiert natürlich).
|