Zellen mittel VBA markieren

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Sub Markieren_Master() Dim bereich As Range Dim wks As Worksheet Set wks = Workbooks("Masterfile.xls").Worksheets("Tabelle1") Set bereich = wks.Range("A1573:BO" & wks.Range("BO65536").End(xlUp).Row) End Sub

Hallo nochmals!
Habe jetzt das Makro fertig. möchte nur noch bitte wissen, ob es richtig wäre:
Sort werden die Spalten G, E und I


Sub Markieren_Master()
Dim bereich As Range
Dim wks As Worksheet
Set wks = Workbooks("Masterfile.xls").Worksheets("Tabelle1")
Set bereich = wks.Range("A1573:BO" & wks.Range("BO65536").End(xlUp).Row)
bereich.Sort Key1:=Range("E1573"), Order1:=xlAscending, Key2:=Range( _
"G1573"), Order2:=xlAscending, Key3:=Range("I1573"), Order3:=xlAscending _
, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _
DataOption3:=xlSortNormal
Set bereich = Nothing
End Sub

Danke
Josef

Sub Markieren_Master() Dim bereich As Range Dim wks As Worksheet Set wks = Workbooks("Masterfile.xls").Worksheets("Tabelle1") Set bereich = wks.Range("A1573:BO" & wks.Range("BO65536").End(xlUp).Row) bereich.Sort Key1:=wks.Range("E1573"), Order1:=xlAscending, Key2:=wks.Range( _ "G1573"), Order2:=xlAscending, Key3:=wks.Range("I1573"), Order3:=xlAscending _ , Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _ xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _ DataOption3:=xlSortNormal Set bereich = Nothing End Sub

Hi Selli,
in einem 10-zeiligen Makro ist es im Grunde wirklich völlig wurscht, ob man Select verwendet oder nicht.
Wenn Du ein größeres Projekt hast, dann geht das uU schon merklich auf die Performance, und wenn Du in so einem Projekt schonmal einen Fehler gesucht hast, dann weißt Du eine effiziente Programmierung, die auf überflüssige Zeilen verzichtet, sicherlich zu schätzen, oder? Warum sollte man also einen Anfänger nicht von Anfang an auf einen sauberen Programmier-Stil hinweisen, der im später evtl viel Ärger erspart?
Es ist nunmal leider (aber unvermeidlicherweise) so, dass Anfänger vom Makro-Rekorder die exzessive Verwendung von Select und Activate vorgelebt bekommen. Was spricht dagegen, in diesem Forum da bisschen gegen zu steuern?
Schönen Gruß,
Andi

Beliebteste Forumthreads (12 Monate)

21
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

82 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Zellen mittel VBA markieren

21 Beiträge zum Forumthread Beiträge zu diesem Forumthread

82 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

21
Beiträge zum Forumthread

Beiträge zu diesem Forumthread