Michael

You are missing the property you are returning at the end of the examples
you give. (I am presuming .Value). You should then be careful it is not
returning a Double, although that should not give you this error. I suspect
the .xlsm on the end of the file names as this should not be necessary if
the workbooks are open when the code is run, as they would need to be. (Even
if they are hidden)., so

Workbooks("BookDates1").Range("A19").Value

will work if the workbook is open

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
DTHIS
web: www.excelusergroup.org
web: www.nickhodge.co.uk





"MichaelDavid" wrote in message
...
I am having great difficulty referencing other workbooks and their
worksheet
data from a macro in the Personal Workbook (PERSONAL.XLSB). For example,
the
following instruction should be, but does not seem to be supported when it
occurs in a macro in my Personal Workbook, Personal.xlsb:
RowIndex = Workbooks("BookDates1.xlsm").Range("A19").
The following instruction is not supported either:
RowIndex = Workbooks("BookDates1.xlsm").cells(19, 1).
(RowIndex is defined as: "Dim RowIndex As Long" near the top of the Sub
Procedure.)
Both of these give the error message: "Run time error '438'. Object
doesn't
support this property or method. My email address is .
Thank
you very much.
Sincerely,
Michael D Fitzpatrick

--
May you have a most blessed day!

Sincerely,

Michael Fitzpatrick