Avatar billede Butterfly Ekspert
15. juni 2020 - 14:46 Der er 2 kommentarer og
1 løsning

Indsæt antal rækker, værdi i N1

Hvordan indsætter jeg et bestemt antal rækker, det antal som værdien i N1?
Avatar billede thomas_bk Ekspert
15. juni 2020 - 14:48 #1
mener du via en macro?

Det vil da ikke gøre noget hvis du skrev bare lidt mere uddybende....
Avatar billede thomas_bk Ekspert
15. juni 2020 - 14:52 #2
Avatar billede L_Amtoft Mester
16. juni 2020 - 12:17 #3
måske følgende kan bruges

Sub insertrows()
' insertrows Makro
' insætter et antal rækker efter række 25, udfra antal angivet i X25
Dim Antal As Integer

'Finder antal rækker, indtastet i celle X25
    Sheets("ark5").Select
    Range("X25").Select
    Antal = ActiveCell
    Range("A25").Select

'Opretter  loop til indsættelse af x antal rækker
        Dim loopantal As Integer
        loopantal = Antal - 1                  'Loopantal = antalrækker -1 da en array starter med 0
        For x = 0 To loopantal
        ActiveCell.Offset(1, 0).Select
   
'rækker indsættes fra række 26 og ned
    Rows("26:26").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
        Next x
   
' markør hopper til
    Range("X23").Select

End Sub
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

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