Sub Test() If IsNumeric(Cells(1, a)) Then Range("A2").Value = "ja" Else Range("A2").Value = "nein" End If End Sub
58.4k Fragen
249k Antworten
7k Nutzer