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