Supportnet / Forum / Tabellenkalkulation
exel2000
Frage
Wie kann man eine beliebige art der
zellenformatierung unter vba abfragen.
zum beispiel waehrung oder Rahmen.
Bitte ein beispiel.
Antwort 1 von Locke
Einfach mit If in Verbindung mit XL-Schlüsselwörtern. Schau Dir mal die Datei VBALISTE.XLS in deinem Excel/Office Verzeichnis an.
Antwort 2 von Warspell
Bin mir nicht sicher ob ich dich richtig verstanden habe aber wenn du z.B eine Zelle A 2 abfragen willst nach dem Wert dann gehts so
Sub Abfrage()
Dim a as integer
a = Tabelle1.Range("A2").Value
End Sub
Sub Abfrage()
Dim a as integer
a = Tabelle1.Range("A2").Value
End Sub
Antwort 3 von Locke
Hmm.... Zellformatierung ist nich Wert. Mein Beispiel um festzustellen ob z.B. die Schriftart Durchgestichen ist, wenn ja gebe ich in A2 den Wert 1 aus, wenn nein den Wert 2:
If Range("A1").Font.Strikethrough = True Then
Range("A2").Value = 1
Else: Range("A2").Value = 2
End If
If Range("A1").Font.Strikethrough = True Then
Range("A2").Value = 1
Else: Range("A2").Value = 2
End If
Antwort 4 von michael oberley
ohje so spaet entschuldigung
von locke war die richtige antwort danke auch den anderen.
gruss micha
von locke war die richtige antwort danke auch den anderen.
gruss micha