Sortieren aus der Ferne...............
09.12.2007 15:45:00
Sonnenpeter
ich probiere gerade eine Tabelle aus der Ferne zu sortieren.
Sub Makro3()
Application.ScreenUpdating = False
Bereich = ("B:C")
With Worksheets("Daten")
Columns(Bereich).Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End With
Application.ScreenUpdating = True
End Sub
Wenn das Tabellenblatt Daten aktiv ist das kein Problem,der Button sitzt aber im Worksheet Datenverwaltung.
Geht das Sortieren einer Tabelle aus einer anderen Tabelle überhaupt? oder muss ich mit Worksheets("Daten").Select und Worksheets("Datenverwaltung").Select arbeiten?
Gruß / SP
Anzeige