inhoud van een cel kopieren, relatieve verwijzingen

[excelstarter]

Hallo,
Ik zou willen dat ik een macro kon maken met de volgende mogelijkheid:
staande in cel (x,y), hierbij staat x voor het kolomnummer en y voor het rijnummer, wil ik de inhoud van cel (3,y) kopiëren naar cel (x,2) en daarna weer terugkeren in cel (x,y).
Is zoiets mogelijk?

Bij voorbaat dank!

 

[Roncancio]

ActiveCell.Offset(2, 0).Value = ActiveCell.Offset(0, 3).Value

Met vriendelijke groet,


Roncancio

 

[excelstarter]

werkt (bij mij) niet

Dank voor het snelle antwoord.
Toepassend op een sheet gebeurt er bij mij echter nog niets.
Moet ik misschien nog een copy en paste-opdracht geven?

 

[sylvester-ponte]

hoi
probeer dit eens:

Sub test2()
x = ActiveCell.Column
y = ActiveCell.Row
Cells(x, 2) = Cells(3, y)
End Sub

groet

 

[excelstarter]

misschien betere vraagstelling

Wederom dank voor het reageren.
Omdat bij mij de toepassing van de macro nog niet tot het gewenste resultaat leidt, hier een meer expliciete vraag:
als ik in bijgevoegd excelbestand in cel G8 sta en ik voer de macro uit, dan wil ik dat de waarde van cel G8 (104) gecopieerd wordt naar cel G3.
Sta ik in K18, dan moet 114 terecht komen in K3, enz.
Dit lukt mij tot nu toe niet.

Bij voorbaat dank voor het uitproberen!Bekijk bijlage testbestandexcel.xlsx

 

[sylvester-ponte]

zo iets dan

Sub test2()
x = ActiveCell.Column
y = ActiveCell.Row
Cells(3, x) = Cells(y, 2)
End Sub

 

[excelstarter]

Dat is hem!

Dit is wat ik wilde.
Reuze bedankt!