.HorizontalAlignment = xlRight
20.08.2017 11:26:21
harti
ich habe ein (sehr seltsames?) Problem mit folgendem Befehl:
.HorizontalAlignment = xlRight
Ich habe ein kleines Makro geschrieben was bisher auch funktionierte (siehe weiter unten).
Mit dem Makro werden Tippergebnisse aus einem Bundesliga-Tippspiel von einem in ein anderes Tabellenblatt kopiert. Bei manchen Tippern steht weil sie ihren Tipp nicht abgegeben haben nur ein : statt z. B. 3:2.
Ich möchte jetzt den Befehl .HorizontalAlignment = xlRight eigentlich nur nach xlCenter abändern damit die Ergebnisse nach dem kopieren mittig in der Zelle stehen. Doch da erscheint jetzt ein 0:0 statt nur :.
Ändert man den Befehl wieder auf xlRight ist wieder alles ok...woran kann das liegen?
Range("B9:J9").Select
With Selection
.HorizontalAlignment = xlRight
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Vielen Dank im Voraus...
harti