ich möchte einen Bereich Range auswerten, in welchem Zahlen und Zeichenketten stehen. Ich will nur jene Zellen greifen, in denen eine Zahl steht. Wer kann helfen?
Danke!
Sub Zahlen_markieren()
Range("A1:A10").SpecialCells(xlCellTypeConstants, 1).Select
End Sub
markiert alle Zellen im Bereich A1:A10, die Zahlen als Konstante enthalten, nicht hingegen solche, die Zahlen als Ergebnis einer Formel enthalten. Falls das nicht ausreicht, schreibe nochmal, was Du genau brauchst.
Gruß
Martin
Sub Zahlen_markieren_alle()
Union(Range("A1:A10").SpecialCells(xlCellTypeFormulas, 1), Range("A1:A10").SpecialCells( _
xlCellTypeConstants, 1)).Select
End Sub
Gruß
Martin