Avatar billede ramp Nybegynder
14. august 2008 - 22:40 Der er 4 kommentarer og
1 løsning

suméring eller ligende

hej igen.

Lad os sige dette er min data i ark1:

morten
peter
lars
jørgen
lars
morten
jens

Så ønsker jeg i ark2 fra celle A1 at navnene bliver skrevet ind nedaf. Dog skal hvert forskelligt navn, kun figurer en gang. Så ark2 ser således ud:

morten
peter
lars
jørgen
jens

Det skal selvfølgelig virke hvad end der er 7 navne eller 500.

Er det muligt?
Avatar billede kabbak Professor
14. august 2008 - 22:49 #1
Stå på ark2 og kør makroen

Sub Makro3()

    Sheets("Ark1").Columns("A:A").AdvancedFilter Action:=xlFilterCopy, _
        CopyToRange:=Range("A1"), Unique:=True
       
        Range("A3").Select
    Range("A1").CurrentRegion.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes _
        , OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub
Avatar billede kabbak Professor
14. august 2008 - 22:49 #2
NB, der SKAL være overskrift I A1
Avatar billede kabbak Professor
14. august 2008 - 23:04 #3
hvis de ikke skal sorteres, så skal du kun bruge

Sheets("Ark1").Columns("A:A").AdvancedFilter Action:=xlFilterCopy, _
        CopyToRange:=Range("A1"), Unique:=True
Avatar billede ramp Nybegynder
14. august 2008 - 23:19 #4
super... takker
smid et svar:-)
Avatar billede kabbak Professor
14. august 2008 - 23:37 #5
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester