Excel Hints

Results 1 to 4 of 4

Thread: Solved: auto open password protected excel file

  1. #1

    Solved: auto open password protected excel file

    i need to auto-open my password protected excel file in my computer through vba.

    i will save my excel file with default password.

    vba macro should open this my file automatically with default password (which can be included in vba).

  2. #2
    Hi

    You've not given a great deal of info on exactly what you mean but perhaps something like this will give you a start.
    VB:
    Sub OpenBookTest() 
        Dim myFile As String 
        Dim myPath As String 
        myPath = "C:\My Documents" 
        myFile = "My Workbook.xls" 
        Workbooks.Open myPath & "\" & myFile, password:="password" 
    End Sub 
    
    
    Formatting tags added by mark007
    Is this what you mean?

    Regards
    Iain - XL2010 on Windows XP


  3. #3

    Arrow

    glaswegian, thanku for ur reply,

    I hv solved my solution like this...

    I hv created two toolbar icon namely "Lock file" and "Unlock file"...

    VB:
     
    Sub LockFile() 
         '
        ActiveWorkbook.Password = "123" 
        ActiveWorkbook.WritePassword = "123" 
    End Sub 
     
    Sub UnlockFile() 
         '
        ActiveWorkbook.Password = "" 
        ActiveWorkbook.WritePassword = "" 
    End Sub 
    
    
    Formatting tags added by mark007

  4. #4
    Hi
    If you want to open a worksheet
    this is the way :

    Worksheets(i).Unprotect Password:="456"

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •