Optisches Problem
18.01.2009 20:38:00
Martin
Habe diesen Code durch Aufzeichnung erhalten und leicht angepasst.
Er funktioniert auch, macht aber leichte optische Probleme.
Wenn ich das Makro laufenlasse, werden die Daten nach ABC sortiert. Dies geht auch!
Da ich aber in einem andern Sheet bin, blinkt die Tabelle ("Kunden") schnell auf. Sie verschwindet auch wieder.
Aber auf einem Button den ich im Sheet plaziert habe erscheint auf einmal ein komischer Balken?
Kann dies mit der Datenmenge zu tun haben?
Worksheets("Kunden").Sort.SortFields.Clear
Worksheets("Kunden").Sort.SortFields.Add Key:=Range("A3"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With Worksheets("Kunden").Sort
.SetRange Range("A3:K65536")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Gruss aus der Schweiz
Martin