ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Cell References absolute? (https://www.excelbanter.com/excel-discussion-misc-queries/195636-cell-references-absolute.html)

BobC

Cell References absolute?
 
My knowledge of Macros is that I know how to record them and not much else!

I want to pick a cell and copy it down 3 rows - and then delete the original
cells.

The next month I need to pick the new cells and then copy them down another
3 cells.

I can use ctrl down arrow to find the first bit of data but when I select it
it gives an absolute range

Range("E6:F6").Select

This means the next month it picks up the cells I deleted earlier - not the
new value that is now 3 cells lower.

How can I change this so it doesn't have an absolute reference and will
simply pick up the first 2 cells it comes across?

Thanks for any help with this...

Bob

Jarek Kujawa[_2_]

Cell References absolute?
 
use:

Sub kopying()
Selection.Copy
ActiveCell.Offset(3, 0).Select
ActiveSheet.Paste
End Sub

BobC

Cell References absolute?
 
Jarek - thanks for this I'm still struggling - in my code where does your sub
go?

Thanks Bob

Range("C1").Select
Selection.End(xlDown).Select
Range("C7:D7").Select
Selection.Copy
Range("C10").Select
ActiveSheet.Paste
Range("C7:D7").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1").Select
End Sub


"BobC" wrote:

My knowledge of Macros is that I know how to record them and not much else!

I want to pick a cell and copy it down 3 rows - and then delete the original
cells.

The next month I need to pick the new cells and then copy them down another
3 cells.

I can use ctrl down arrow to find the first bit of data but when I select it
it gives an absolute range

Range("E6:F6").Select

This means the next month it picks up the cells I deleted earlier - not the
new value that is now 3 cells lower.

How can I change this so it doesn't have an absolute reference and will
simply pick up the first 2 cells it comes across?

Thanks for any help with this...

Bob


BobC

Cell References absolute?
 
Jarek,

Go it to to work!!

Fantastic - many thanks

Bob

"Jarek Kujawa" wrote:

use:

Sub kopying()
Selection.Copy
ActiveCell.Offset(3, 0).Select
ActiveSheet.Paste
End Sub



All times are GMT +1. The time now is 11:17 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com