If Then, wenn Gleichung falsch dann MsgBox
18.05.2016 13:03:11
Zoe
ich hänge gerade an einer If/Then Funktion.
Ich habe hier 120 Zeilen (z=120)und habe in C12 die Zahl 20 und in C13 die Zahl 4
Jetzt möchte ich eine If/Then Makro schreiben indem ich sagen
Wenn z geteilt durch C12 ungleich C13 ist soll eine Message Box mit "Fehler" erscheinen.
Sub DatenZaehlen()
Dim z As Boolean
Sheets("Tabelle3").Select
Range("A2").Select
Range(Selection, Selection.End(xlDown)).Select
z = Selection.Rows.Count
Sheets("Tabelle1").Select
If...?
End If
End Sub
Grüße,
Zoe