Cell Ref question
Hi Dave,
That works just terrific €“ Thanks.
Say, can I tap your brain one last time? How can I expand on that formula
to add nothing if cell H5 is empty. Right now it links and puts the value in
the front page, but I dont want to show a value in the H5 has nothing in its
cell?
Thanks so much for your review and thoughts - Roger
"Dave Peterson" wrote:
You could record a macro when you do
Edit|copy
followed by Edit|paste special|paste Link
Or you could just build the formula yourself:
ws.Cells(irow, 12).Formula _
= "=" & ActiveSheet.Range("h5").Address(external:=True)
Roger wrote:
Good Afternoon,
I have a macro that is writing from one workbook to another. After it has
finished opening and writing it's initial data, it calls this macro and
writes a special cell value to the front page. Though this works fine, I want
it to be a cell reference (linked value) vs. static.
Ive tried a couple ways unsuccessfully and was wondering if you might have
some ideas on how to accomplish this.
Thank you - Roger
Sub WritetoMainPage()
Dim irow As Long
Dim ws As Worksheet
Set ws = Worksheets("Sheet1")
irow = ws.Cells(1, 12) _
.End(xlDown).Offset(1, 0).Row
ws.Cells(irow, 12) = ActiveSheet.Range("h5").Value <<<This works but I want
a cell ref (link) vs. static value
Worksheets("sheet1").Select
End sub
Was this post helpful to you?
Why should I
--
Dave Peterson
|