Avatar billede brilleabe Nybegynder
07. april 2004 - 17:02 Der er 8 kommentarer og
1 løsning

kopiering af celler ned-ad

Jeg vil gerne lave noget a la nedenstående (vba), men jeg kan ik' få det til at virke...

r = ActiveCell.Row
c = ActiveCell.Column
Range("A2").Select
Selection.AutoFill Destination:=Range(c, r), Type:=xlFillDefault

NOgen som har et bud ?
Avatar billede Slettet bruger
07. april 2004 - 17:09 #1
Du skal huske at AutoFill, Destination skal indeholde det oprindelige område.
Avatar billede kabbak Professor
07. april 2004 - 18:49 #2
Sub Makro1()

X = 5 'antal celler nedad
   
    ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & ":" & ActiveCell.Offset(X, 0).Address), Type:=xlFillDefault
   
End Sub
Avatar billede brilleabe Nybegynder
07. april 2004 - 19:54 #3
Tak for det kabbak - det var lige det som skulle til !
Avatar billede brilleabe Nybegynder
07. april 2004 - 20:26 #4
smid lige et svar.
Avatar billede kabbak Professor
07. april 2004 - 21:05 #5
et svar. ;-))
Avatar billede brilleabe Nybegynder
07. april 2004 - 23:48 #6
point.;-))
Avatar billede kabbak Professor
08. april 2004 - 00:35 #7
du har ikke accepteret, jeg har ikke fået nogen.
Avatar billede brilleabe Nybegynder
08. april 2004 - 09:05 #8
ups, den kommer her...
Avatar billede kabbak Professor
08. april 2004 - 18:47 #9
tak for point. ;-))
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