CELL Function in VBA ?

[Guest]

The formula
=CELL("filename",A1) gives me something like
C:\Documents and Settings\Owner\Desktop\[Book1.xls]Sheet1


in VBA
s = Application.WorksheetFunction.Cell("filename", A1)
does nothing. How can I get the same string in VBA that CELL() gives me in
the worksheet?

Thanks in advance for any help or suggestions.

 

[Don Guillett]

Sub mypathis()
'MsgBox ActiveWorkbook.Path
'MsgBox ActiveWorkbook.Name
With ActiveWorkbook
MsgBox .Path & "\" & .Name
End With
End Sub

 

[Doug Glancy]

jake,

It doesn't look like Cell is a supported worksheet function.

Try using a combination of ActiveWorkbook.FullName and Activesheet.Name

hth,

Doug

 

[Guest]

Don & Doug:

Thank you both very much.
--
jake

jake,

It doesn't look like Cell is a supported worksheet function.

Try using a combination of ActiveWorkbook.FullName and Activesheet.Name

hth,

Doug

The formula
=CELL("filename",A1) gives me something like
C:\Documents and Settings\Owner\Desktop\[Book1.xls]Sheet1


in VBA
s = Application.WorksheetFunction.Cell("filename", A1)
does nothing. How can I get the same string in VBA that CELL() gives me
in
the worksheet?

Thanks in advance for any help or suggestions.