Password exposure

  • Thread starter Thread starter Joe Bannister
  • Start date Start date
J

Joe Bannister

Hello all,

I have a macro that does various things and then saves
the new spreadsheet under a new name.

The code is as follows:

Sheets("MON AFT").Select
thisFilename = "C:\headoffice\"
thisFilename = thisFilename & CStr(Range("BW3"))
thisFilename = thisFilename & "_04_abcsheet"
ActiveWorkbook.SaveAs thisFilename

The users are not the most diligent and may access the
original file and run the macro again. When it comes to
save it tells them that the file already exists, do they
want to overwrite? It's possible they will say no.

If they do i get an error and the programming is exposed
which contains details of the passwords. Is there a way
of stopping this happening?

Cheers

Joe
 
Joe,

Try this

Sheets("MON AFT").Select
thisFilename = "C:\headoffice\"
thisFilename = thisFilename & CStr(Range("BW3"))
thisFilename = thisFilename & "_04_abcsheet"
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=thisFileName
Application.DisplayAlerts = True

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
If your code contains passwords I would also protect the VBA project a
follows;

In the VBA Editor select the workbook in the Project Explorer pane an
then select Tools/VBAProject properties ( this assumes you have no
renamed the project ).

On the Protection tab, check the Lock Project for Viewing checkbox an
enter and confirm a password ( don't forget this as without it yo
won't be able to edit your code ).

Now you won't be able to view the code without entering this password
 
Back
Top