Hi,

I have a workbook which is password protected which I would like t
open as read-only.

I managed to get it to work if i used the following

Sub Macro1()

'cancel password which is Stewart

'Dim extractor As String
'extractor = ThisWorkbook.Name

'make file read-only
Application.SendKeys ("%r") '("stewart~")
Workbooks.Open Filename:= _
"C:\Documents and Settings\ME\Desktop\Test.xls"
Sheets("home").Select

' ActiveWindow.Close

End Sub

however when I run the sendkeys function it works however it places th
word stewart which is the password in my code any where that I have th
cursor. Is there a way I could stop this

--
funkymonkU
-----------------------------------------------------------------------
funkymonkUK's Profile: http://www.excelforum.com/member.php...fo&userid=1813
View this thread: http://www.excelforum.com/showthread.php?threadid=55258