ActiveWorkbook

[cccbzg]

Hi,

I'm wondering how I can change this line of code to make my field (CsaveDAYS) contain both the value AND the format from my range ("D" & i).

Thanks in advance for your help!

Bonnie

CsaveDAYS = ActiveWorkbook.Sheets("Summary Sheet").Range("D" & i).Value

 

[Peter_SSs]

What is you ultimate goal with this?
That is, what are you going to do with that cell's value and its formatting?

 

[cccbzg]

What is you ultimate goal with this?
That is, what are you going to do with that cell's value and its formatting?

Im going to output the value with format into a cell in another sheet eventually, but I need to hold onto it until I get to a certain record type. So, I’ve got header type records and detail records on my input sheet and only detail records which need header data on my output sheet.

Hope me that makes sense.

Thanks so much.

Bonnie

 

[Peter_SSs]

So, if you don't yet know where you are going to put it, set it to a Range variable

Dim rng as Range
Set rng = ActiveWorkbook.Sheets("Summary Sheet").Range("D" & i)

Then, when you have worked out where to put it (say in the same workbook, sheet "abc", cell K5)

rng.Copy Destination:= ActiveWorkbook.Sheets("abc").Range("K5")

 

[cccbzg]

So, if you don't yet know where you are going to put it, set it to a Range variable

Dim rng as Range
Set rng = ActiveWorkbook.Sheets("Summary Sheet").Range("D" & i)

Then, when you have worked out where to put it (say in the same workbook, sheet "abc", cell K5)

rng.Copy Destination:= ActiveWorkbook.Sheets("abc").Range("K5")

Thanks! Will try later today and let you know how it goes.

I appreciate your your time and willingness to share expertise.

Bonnie