copy range via VBA

white_flag

Active Member
Joined
Mar 17, 2010
Messages
331
I have the following code:


Code:
Option Explicit
Public Sub test()

Dim my_range As Range
Dim c, mc As Variant

Set mc = ActiveSheet.Cells(3, 4)
Set my_range = ActiveSheet.Range("B8:C20")

For Each c In my_range
        Worksheets("Feuil2").Cells(c.Row, c.Column).Value = "=" & Worksheets("Feuil1").Cells(c.Row, c.Column).Value & "*" & Worksheets("Feuil1").mc.Address()

Next c

End Sub

and the error is: Object does not support this method ...

for me, this code has to do this: Copy an value from an range add an address cell and make an new range.
 

Some videos you may like

Excel Facts

Move date out one month or year
Use =EDATE(A2,1) for one month later. Use EDATE(A2,12) for one year later.

Watch MrExcel Video

Forum statistics

Threads
1,109,001
Messages
5,526,196
Members
409,686
Latest member
Tori83

This Week's Hot Topics

Top