Hallo liebes Forum,
folgendes Problem quält mich zur Zeit:
Ich habe zwei Tabellen mit je einer Spalte für's Datum. In Datei ist es so angegeben "dd.mm.yyyy." in der anderen so "dd/mm/yyyy".
Ich möchte aber, das beide wie in der ersten angegeben sind. Dafür hab ich Folgendes probiert:
Sub Datum
Cells.Find(What:="PaymentDate", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Columns(ActiveCell.Column).Select
Selection.NumberFormat = "dd.mm.yyyy"
End Sub
Mal abgesehen davon, dass das Suchen über ne Schleife sicherlich schöner wäre ergibt sich leider das Problem, dass das Format zwar intern geändert ist, aber man davon nichts sieht. D.h., wenn ich eine Zelle in dieser Spalte aktiviere, ändert sich das Format auch wie gewollt. Lasse ich aber nur das Makro laufen, tut sich optisch gar nichts.
Könnt ihr mir das bitte vielleicht helfen?
Grüße,
Max
|