Zelle formatieren mit VBA!!?
ing.grohn
ich möchte eine Zelle formtieren mit folgendem Code:
.Cells(I + N, Spalte).Value = Beginn(K)
If istFlag(K, 1) = True Then
MsgBox (CDate(.Cells(I + N, Spalte).Value))
With .Cells(I + N, Spalte)
.Value = "testa1"
.Font.Bold = True
.Font.Italic = True
.Font.Underline = xlUnderlineStyleSingle
.Font.ColorIndex = 5
End With
End If
vorher kommt noch ein WITH mit Tabelle und das läuft über mehrere Tabellen und funktioniert auch richtig!
Auch wird in die IF-Schleife verzweigt, der Wert wurde richtig übergeben, richtige Zeile, richtige Spalte, alles rodger. Nur wenn ich die Zelle formtieren will passiert nichts.
Allein wenn ich den Wert in dem Zweig With Cells(I+N,Spalte) ändere, funktionierts!
Warum wird nicht formatiert?
för dien tiet un dien gedannken west bedankt?
Mit freundlichen Grüßen
Albrecht