Avatar billede masteraaen Novice
09. februar 2011 - 15:57 Der er 3 kommentarer og
1 løsning

Problemer med sortering VBA, Excel

Hej.

Jeg har en VBA-kode, hvor jeg skal have have sorteret et område.

jeg har lavet nedenstående kode, som fungerer fint i Excel2003 på min bærbare pc.
Men her på min stationære, så fungerer den ikke.

Er det ikke underligt?

Jeg synes ofte, jeg kommer i problemer, når jeg bruger Range-angivelser - er der noget om den slags?

Kan jeg angive området og sorteringsnøglen (Key) på andre måder, som fungere bedre?

Selection.Sort Key1:=Range("U1"), Order1:=xlAscending, Key2:=Range("W1") _
, Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False _
, Orientation:=xlTopToBottom

Området er ikke tomt, der er ingen tomme felter eller noget. Når jeg bruger Excels egen funktion på samme område, fungerer det upåklageligt....

Håber nogen kan hjælpe mig. Har brugt uendeligt lang tid på det her nu... :-(
Avatar billede tjp Mester
09. februar 2011 - 17:38 #1
Hvordan bliver din Selection selectet?
Med musen eller sådan måske?:
Range("U1:W7").Select
Avatar billede bak Forsker
09. februar 2011 - 22:27 #2
Uden at kunne kontrollere det, tror jeg at du har lavet en Custom sorteringrækkefælge på din bærbare, der ikke findes på din stationære.

Grunden til at jeg har mistanke til det er :
OrderCustom:=1,

Nu har jeg ikke længere xl2003 og kan derfor ikke kontrollere det.
Prøv evt. at fjerne dette fra makroen
Avatar billede masteraaen Novice
10. februar 2011 - 12:03 #3
Sorteringen kommer umiddelbart efter, at den indsætter data i et område, som derefter sorteres.

Ser sådan ud:
                ActiveSheet.Cells(1, 18).Select
                Selection.PasteSpecial
                       
                Selection.Sort Key1:=Worksheets(1).Range("U1"), Order1:=xlAscending, Key2:=Range("W1") _
                , Order2:=xlAscending, Header:=xlYes

Jeg har også fjerne OrderCustom:=1 men den fungerer stadig ikke. Jeg bliver snart tosset.
Avatar billede masteraaen Novice
20. februar 2011 - 00:25 #4
Det virker i en nyere udgave af excel... underligt.

Vil een lave 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
Kurser inden for grundlæggende programmering

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