Notifikationer

Markér alle som læst Log ud

gladhund Nybegynder

05. oktober 2010 - 15:32 Der er 5 kommentarer og
1 løsning

Flyt markerede rækker en række ned

Hej eksperter,

En lille hurtig en:

Jeg bruger denne kode til at flytte x markerede rækker en række op (og bevare markeringen). Hvilken kode skal jeg bruge for at flytte dem en række ned ned, og bevare markeringen? Det er på en eller anden måde ikke ligeså simpelt :).

Public Sub flytrækkeop()

Selection.EntireRow.Select
Selection.Cut
Selection.Offset(-1, 0).Select
Selection.Insert Shift:=xlDown

End sub

Synes godt om

j3ppah Novice

05. oktober 2010 - 15:45 #1

nu er jeg ikke ekspert i vb må jeg indrømme. Men synes det virker meget logisk hvis det bare var

Public Sub flytrækkened()

Selection.EntireRow.Select
Selection.Cut
Selection.Offset(+1, 0).Select
Selection.Insert Shift:=xlDown

End sub

eller

Public Sub flytrækkeop()

Selection.EntireRow.Select
Selection.Cut
Selection.Offset(1, 0).Select
Selection.Insert Shift:=xlDown

End sub

Synes godt om

gladhund Nybegynder

05. oktober 2010 - 15:52 #2

Den har jeg prøvet :). Det er desværre ikke så enkelt.

Synes godt om

kabbak Professor

05. oktober 2010 - 16:57 #3

man tæller rækker i det markerede og lægger 1 til

Public Sub flytrækkened()

Selection.EntireRow.Select
Selection.Cut
Selection.Offset(Selection.Rows.Count + 1, 0).Select
Selection.Insert Shift:=xlDown

End Sub

Synes godt om

kabbak Professor

05. oktober 2010 - 17:02 #4

nåå der var det med markeringen

Public Sub flytrækkened()
Dim A As Integer
A = Selection.Rows.Count
Selection.EntireRow.Select
Selection.Cut
Selection.Offset(A + 1, 0).Select
Selection.Insert Shift:=xlDown
Selection.Offset(-A, 0).Select
End Sub

Synes godt om

gladhund Nybegynder

05. oktober 2010 - 17:06 #5

Tænkte nok, at det var noget med at tælle antal markerede rækker, men jeg vidste ikke hvordan! Sweet, kabbak, tak :). Jeg prøver det lige af og hakker jeg af ved dit svar.

Synes godt om

gladhund Nybegynder

05. oktober 2010 - 17:11 #6

Perfect :)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Samle data fra flere kolonner i 1 Af FinnLauridsen i Excel	5	17/04/202616:11	27/04/202617:58
Træk data fra ny lokation ved måneds skift Af Hezo i Excel	6	13/04/202614:32	15/04/202611:04
Makro der gemmer vedhæftet fil fra Msg og omdøber filen Af lokesa i Excel	2	31/03/202610:22	31/03/202611:47
Stempel ur start og stop Af lurup i Excel	2	23/03/202613:24	31/03/202610:27
Hvordan bruges indeks & sammenlign når der skal søges over flere kolonner? Af Laugesen1 i Excel	4	08/03/202611:56	08/03/202613:57

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS