Avatar billede krohn Praktikant
02. marts 2005 - 21:25 Der er 4 kommentarer og
1 løsning

Hjælp til denne markro

Jeg prøver at omskrive en markro der lyder:
Sub Muster()

r = ActiveCell.Row
c = ActiveCell.Column
Cells(r, c) = Range("B24")
Cells(r, c + 1) = Range("c24")
Cells(r, c + 2) = Range("d24")
Application.CutCopyMode = False
End Sub
Jeg skal hente værdier fra et ark og sætte dem ind på et andet (der hvor man har den active celle)
Værdierne skal hentes fra: Sheetes ("Ref") F3-1 F3 F3+1 F3+2 F3+3
Dette er Ark1
Og de skal sættes ind i Sheetes ("Daily POB")
Dette er Ark2
Er der nogen der kan hjælpe mig (igen) den er fra http://www.eksperten.dk/spm/332501
Avatar billede kabbak Professor
03. marts 2005 - 00:05 #1
Sub Muster()
a = ActiveCell.Address
Sheets("Ref").Range("E3:i3").Copy
Sheets("Daily POB").Select
  ActiveSheet.Paste
Range(a).Select
End Sub

et forslag
Avatar billede krohn Praktikant
03. marts 2005 - 08:54 #2
Jeg får en fejl når jeg køre den:(
Denne her virker når den bliver afviklet på siden sheets("Ref ")
Sub Mustername()
' Makro indspillet 2-03-2005 af Jacob Krohn

r = ActiveCell.Row
c = ActiveCell.Column
Cells(r, c) = Range("f3")
Cells(r, c - 1) = Range("e3")
Cells(r, c + 1) = Range("g3")
Cells(r, c + 2) = Range("h3")
Cells(r, c + 3) = Range("i3")
Application.CutCopyMode = False


End Sub
Men hvis jeg afvikler der på sheets ("Daily POB ") så virker den ikke det er det jeg skal have den til
Avatar billede kabbak Professor
03. marts 2005 - 08:58 #3
Sub Mustername()
' Makro indspillet 2-03-2005 af Jacob Krohn

r = ActiveCell.Row
c = ActiveCell.Column
Cells(r, c) = Sheets("Ref").Range("f3")
Cells(r, c - 1) = Sheets("Ref").Range("e3")
Cells(r, c + 1) = Sheets("Ref").Range("g3")
Cells(r, c + 2) = Sheets("Ref").Range("h3")
Cells(r, c + 3) = Sheets("Ref").Range("i3")
Application.CutCopyMode = False


End Sub
Avatar billede krohn Praktikant
03. marts 2005 - 09:02 #4
Så var den der, takker, lægger du et svar?
Avatar billede kabbak Professor
03. marts 2005 - 09:22 #5
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
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