sortere tal Automatisk

Prøv med denne VBA-kode:

Private Sub Worksheet_Change(ByVal Target As Range)
'Sorter efter tal i kolonne H med det største tal øverst
'Det forudsættes, at der er overskrifter i række 2
'Denne kode skal sættes ind som VBA-kode i et ark, f.eks. Ark1
On Error Resume Next

With Application
        .ScreenUpdating = False
        .EnableEvents = False
End With

Me.UsedRange.Sort _
Key1:=[H2], Order1:=xlDescending, Key2:=[A2], Order2:=xlAscending, _
Key3:=[B2], Order3:=xlAscending, Header:=xlYes, _ Orientation:=xlSortColumns

With Application
        .ScreenUpdating = True
        .EnableEvents = True
End With

On Error GoTo 0
End Sub

Hej natkatten

Jeg får en fejlkode syntax error når jeg prøver at skrive et tal i kolonne H

Må jeg sende filen til dig

Ja, send blot.

Der mangler et linieskift, når koden kopieres:

Me.UsedRange.Sort _
Key1:=[H2], Order1:=xlDescending, Key2:=[A2], Order2:=xlAscending, _
Key3:=[B2], Order3:=xlAscending, Header:=xlYes, _
Orientation:=xlSortColumns

tak det virker i et tomt ark

Mit ark som heder mesterrækken er der en masse navne og efternavne i som så bliver hente fra et anden ark som heder hovedrækken.

Så når man taster tal ind i kolonne H i ark mesterrækken bliver navn og efternavn ikke flytte med

Det er måske nemmer hvis du kunne se filen, jeg kunne downloade
filen til din mail adresse.

ok natkatten at gmail dot com

Jeg vil lige hører om du har fået min fil. jeg havde lidt problemer med min Google mail

natkatten
Jeg takker mange gange. Post venligst et svar, så jeg kan give dig point!!!

Et svar