Copy cell to another sheet [Closed]

Report
-
 Blocked Profile -
Hello,

I'm have a problem. How can i copy a cell with its properties like cell border to another cell(ActiveCell) in a different sheet.

I need a function for it , like

Function CopyCell( R as Range) as Long


End Function

so i can call it from a cell like =CopyCell(sheet1!A1)

this would copy the cell value with its borders from cell A1 on sheet1 to the ActiveCell(the cell that is calling the function) on another Sheet.


Please help!

1 reply


Dear Mimic,

Please consider using the below sample to have the problem solved:

If Sheets("Sheet1"). Range("I5").Value = "Sample" Then _
Range("I5").EntireRow.Copy Destination:=Sheets("Complete").Range("A1")


Thanks in advance.

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!