referring to a cell in anothjer sheet

[alberta]

I'm stiill a newbie, and I have been struggling with the syntax to make this work and hope that someone can help my through it.

The final set of spreadsheets generated by some VBA code will need to have a bit of text changed each time that it is run. The user can open the “text_copy” sheet in the workbook and make whatever changes to cell A1 and A2, and I was hoping that the VBA code would display it in B14 AND B15 of the new sheets.

This isn’t working out too well for me.

Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
With ws
.Range("B14") = text_copy!$A$1
.Range("B15") = text_copy!$A$2
End With
Next

Any suggestions would be appreciated.

Albert

 

[Von Pookie]

Try:

 Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
With ws
    .Range("B14") = sheets("text_copy").Range("A1").value
    .Range("B15") = sheets("text_copy").Range("A2").value
End With
Next

 

[alberta]

That's what I needed.

Thanks a bunch Kristy