Hello,
I want to eecute the following VB code:
For Each Rng In Range(“a1:B5”)
Select Case Len(Rng.Value) 'hier Spalte A
Case Is < 4: Rng.NumberFormat = “##0”
Case 4 To 6: Rng.NumberFormat = "#'##0"
Case 7 To 11: Rng.NumberFormat = "#'###'##0"
End Select
Next
but did not know what argument to put as input (if i had an Excel file).