Jan,

Workbooks have a ReadOn ly property that you can test

If ActiveWorkbook.ReadOnly Then
ActiveWorkbook.SaveAs fileName:="NEWFILE.XLS"
End If-- HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Jan V." wrote in message
...
I have an Excel-file on a p2p network.
It has a password so that most network-users can open it for reading and
only some are able to change it (after they have entered the password).

*** I would like to make certain buttons available only when opened by the
latter and not available when opened "read-only". ***
Any ideas are welcome!

The password is added the "normal" way (Save As + Extra and enter the
password), so it is not programmed in some VBA routine or so (don't even
know if this can be done and this isn't my question either).

Jan V.