Søg
Avatar billede vifa Novice
26. april 2012 - 19:33 Der er 5 kommentarer og
1 løsning

"Tilføj række" button

Hej,

Jeg er ved at lave et nyt regneark til mine regnskaber, så jeg kan stille en balance op over indtægter og udgifter. Det gamle regneark jeg havde lavet havde en væsentlig mangel, der i sidste ende begyndte at irritere mig: lige pludselig var der bare ikke flere rækker.

Da nogle af mine kolonner har dropdown menuer og andre er formateret til datoer og valuta indgivelser, har jeg behov for at kopiere én tom række med alle disse indstillinger, og placere under de andre når jeg løber tør for rækker.

Mvh.
Vifa
Avatar billede mireigi Novice
26. april 2012 - 20:16 #1
Marker hele rækken ved at trykke på den grå celle med rækkenummeret i venstre side. Tryk derefter [Ctrl] +
  • . Så indsætter du en række nedenunder den markerede række, med samme formatering og felter som den markerede række.
Avatar billede mireigi Novice
26. april 2012 - 20:16 #2
Hov, skulle være [Ctrl] + [ +]
Avatar billede vifa Novice
26. april 2012 - 21:29 #3
Det har jeg tidligere haft lidt problemer med, da baggrundsfarverne ikke bliver kopieret med ned.

Men det var nu heller ikke det jeg søgte, for jeg vil gerne have lavet en knap i regnearket man kan trykke på, og så bliver der sat en ekstra række ind.
Avatar billede store-morten Ekspert
27. april 2012 - 12:26 #4
Prøv på et test Ark:
Sub TilføjRækkeHer()
On Error GoTo Slut
home = ActiveCell.Address
homeArk = ActiveSheet.Name

Application.ScreenUpdating = False

        Rows(ActiveCell.Row).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
        Rows(ActiveCell.Row).Offset(-1, 0).Copy
        Rows(ActiveCell.Row).PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
        Application.CutCopyMode = False
       
Sheets(homeArk).Select
Range(home).Select

GoTo Slut
Slut:
Application.ScreenUpdating = True
End Sub

Indsætter en ny rækker, ved Active celle, og flytter alt under denne, en række ned.
Avatar billede vifa Novice
29. april 2012 - 09:32 #5
Super, det virkede :-)

Smider du et svar op, så giver jeg point.
Avatar billede store-morten Ekspert
29. april 2012 - 09:42 #6
Det var godt ;-)
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
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
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
Tips til at mestre Excel hurtigt Af MonikaG32 i Excel 4 04/03/202617:11 06/03/202609:37
Båndet i Excel online har ændret størrelse Af Monique i Excel 3 19/02/202614:23 20/02/202608:26
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 17:32 Jeg kan ikke opdatere min iPad til ios 26.4.1. Af Bettina i Apps til iOS
I går 08:32 Office pakke LTSC vs Retail? Af Don G i Office & Kontorpakker
10/0421:19 Lydindstilling Prosonic TV Af TageArent i Fjernsyn & projektorer
10/0415:37 Sort skærm Af mort1 i Windows
09/0412:32 iPadOS 26.4.1 kan ikke opdatere Af claes57 i Apps til iOS
White papers
Flere white papers »