weiß jemand, wie ich folgende "Wenn"-Anweisungen verkürzen kann?
Sub Test()
i=Userform1.Textbox1
If i
Sub Test()
i=Userform1.Textbox1
If i
Sub t()
Dim i As Long, x As Long
i = 8300
x = WorksheetFunction.RoundUp((i - 6559) / 600, 0)
If x 5 Then x = 5
MsgBox x
End Sub
newLengthc = "5"
If i