Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Tabelle aus anderer Tabelle sortieren lassen

Betrifft: Tabelle aus anderer Tabelle sortieren lassen von: gerhard
Geschrieben am: 18.03.2016 23:19:50

Hallo zusammen,
Bitte um VBA Hilfe!

Wie muss der VBA Code in der beiliegenden Testmappe abgeändert werden, dass
das ausgeblendete Tabellenblatt Adresse aus dem Tabellenblatt Start sortiert wird,
ohne das Tabellenblatt Adresse einzublenden und selektiert werden muss?

Vielen Dank für Eure Hilfe
Gruß Gerhard

https://www.herber.de/bbs/user/104461.xls

  

Betrifft: AW: Tabelle aus anderer Tabelle sortieren lassen von: Hajo_Zi
Geschrieben am: 19.03.2016 09:12:37

Sub Dynamisches_sortieren()
    Dim letzteSpalte As Long
    Dim letzteZeile As Long
    With Worksheets("Adressen")
        letzteSpalte = .Cells(2, 1).End(xlToRight).Column
        letzteZeile = .Cells(2, 1).End(xlDown).Row
       .Range(.Cells(2, 1), .Cells(letzteZeile, letzteSpalte)).Sort _
            Key1:=.Range("A2"), Order1:=xlAscending, _
            Header:=xlNo, OrderCustom:=1, MatchCase:=False, _
            Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
        MsgBox "Sortierung ist erfolgt"
    End With
End Sub
GrußformelHomepage


  

Betrifft: AW: Tabelle aus anderer Tabelle sortieren lassen von: gerhard
Geschrieben am: 19.03.2016 09:41:34

Hallo Hajo und guten Morgen,

Vielen Dank für Deine schnelle Hilfe
funktioniert super!!

Gruß Gerhard
und ein schönes Wochenende


 

Beiträge aus den Excel-Beispielen zum Thema "Tabelle aus anderer Tabelle sortieren lassen"