Workbooks("TBD.xls").Worksheets("Sheet1").Range("F 34") = isum
note the s at the end of 'worksheets' and 'workbooks'
Pascal

"Jeff" wrote in message
...
Hi,

I have 2 workbooks:
# 1 Workbook.("TBD.xls").worksheet("Sheet1")

#2 is a workbook that I open with this VBA macro:
fName = Application.GetOpenFilename
Workbooks.Open filename:=fName
I also have this VBA Macro for fname
blastrow = Cells(Rows.Count, "B").End(xlUp).Row
isum = Application.WorksheetFunction.Sum(Range("b1:b10000 "))
Cells(blastrow + 2, "B").Value = isum

My Question is: How do I copy the value of "Isum" in the
Workbook.("TBD.xls").worksheet("Sheet1") in cell "F34"
Thanks,