Microsoft Excel

Herbers Excel/VBA-Archiv

Sortieren erst wenn Spalte B befüllt ist | Herbers Excel-Forum


Betrifft: Sortieren erst wenn Spalte B befüllt ist von: Josef_T
Geschrieben am: 02.01.2012 14:23:18

Hallo zusammen.

Brauche mal wieder Hilfe.

Kann man den Code in der hochgeladenen Datei so abändern, dass die Sortierung erst dann ausgelöst wird, wenn in Spalte "B" ein Wert eingegeben wurde?

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

habe in der Recherche nichts passendes gefunden.

Danke

Gruß
Josef

  

Betrifft: AW: Sortieren erst wenn Spalte B befüllt ist von: Reinhard
Geschrieben am: 02.01.2012 17:09:18

Hallo Josef,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
If Application.Intersect(Target, Range("B2:B300")) Is Nothing Then Exit Sub
'Sortierkriterien
Range("A2:B300").Sort Key1:=Range("A2:B2"), Order1:=xlAscending, _
  Header:=xlGuess, OrderCustom:=1, MatchCase:=False, _
    Orientation:=xlTopToBottom
    'Zelle A1 auswählen
Range("A2").Select
End Sub

Gruß
Reinhard


  

Betrifft: AW: Sortieren erst wenn Spalte B befüllt ist von: Josef_T
Geschrieben am: 02.01.2012 17:54:18

Hallo Reinhard, Frohes neue Jahr.

Jetzt passt alles ganz genau. - Super.

Danke für Deine Hilfe und das fertige Modul!

Gruß
Josef


Beiträge aus den Excel-Beispielen zum Thema "Sortieren erst wenn Spalte B befüllt ist"