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