Come impostare privilegi diversi per utenti diversi di un file Excel

Condividi ora:

La sicurezza di Excel è piuttosto importante per il tuo lavoro. In questo articolo, introdurremo il metodo per impostare privilegi diversi per utenti diversi tramite Excel VBA.

Nel nostro precedente articolo Come creare una finestra di accesso per proteggere la cartella di lavoro di Excel, abbiamo introdotto il metodo per creare una finestra di accesso per la cartella di lavoro di Excel. Ma quando più utenti devono accedere al documento, è necessario effettuare impostazioni aggiuntive. Inoltre, è necessario garantire che tali utenti non apportino modifiche errate al file. Ora segui i passaggi seguenti e scopri come completare questa attività.

Impostare diversi privilegi

Supponiamo ora che ci siano tre rappresentanti di vendita che devono modificare questo file. Il nome e la password sono impostati come mostrato nell'immagine qui sotto:Esempio

E ogni persona dovrà modificare un determinato foglio di lavoro.

  1. Premi i tasti di scelta rapida "Alt + F11" sulla tastiera per aprire l'editor di Visual Basic.
  2. E quindi inserisci un nuovo modulo utente nell'editor.Inserisci modulo utente
  3. In questo passaggio, inserisci due etichette, due caselle di testo e due pulsanti nel modulo utente.
  4. E poi cambia la didascalia per il modulo utente e quegli elementi che inserisci nel passaggio 3. Puoi anche fare riferimento all'immagine qui sotto:Modifica didascalia
  5. Successivamente, modifica "PasswordChar" in "*" per la seconda casella di testo.PasswordChar
  6. Successivamente, fai doppio clic sul modulo utente.
  7. Quindi inserisci i seguenti codici nel modulo:
Private Sub CommandButton1_Click()
  Dim objTargetWorksheet As Worksheet

  If (TextBox1.Value = "John" And TextBox2.Value = "234") _
    Or (TextBox1.Value = "Amy" And TextBox2.Value = "345") _
    Or (TextBox1.Value = "Paul" And TextBox2.Value = "456") Then
    Me.Hide: Application.Visible = True

    For Each objTargetWorksheet In ActiveWorkbook.Worksheets
      If objTargetWorksheet.Name = TextBox1.Value Then
        objTargetWorksheet.Unprotect Password:=12345
      Else
        objTargetWorksheet.Protect Password:=12345, DrawingObjects:=True, Contents:=True, Scenarios:=True
      End If
    Next
  Else
    MsgBox "Please input the right user name and the right password"
  End If
End Sub

Private Sub CommandButton2_Click()
  ThisWorkbook.Application.Quit
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
  ThisWorkbook.Application.Quit
End Sub

Nei codici, proteggeremo altri fogli di lavoro. E gli utenti possono modificare solo i fogli di lavoro corrispondenti. È inoltre possibile modificare le password in base alle proprie esigenze.

  1. Successivamente, fai doppio clic su "ThisWorkbook" nel progetto VBA.
  2. E quindi inserisci i seguenti codici in esso:
Private Sub Workbook_Open()
  Application.Visible = False: UserForm1.Show
End Sub

Questa cartella di lavoro

  1. Per impedire agli utenti di modificare i codici VBA, è necessario impostare la password per i progetti VBA. Nel nostro precedente articolo Come proteggere con password i codici VBA nel foglio di lavoro di Excel, abbiamo introdotto i metodi. Puoi anche impostare una password speciale.
  2. Alla fine, salva questo file Excel.
  3. Alla successiva apertura del file, il modulo utente non verrà visualizzato. È necessario fare clic sul pulsante "Abilita contenuto" nel file.
  4. E poi vedrai la finestra "Accedi". Immettere un nome e la password nelle due caselle di testo.
  5. Successivamente, fai clic sul pulsante "Accedi" nella finestra.Accedi

Al momento, John può solo modificare il suo foglio di lavoro. Non è in grado di modificare altri fogli di lavoro o i codici VBA. Inoltre, ad eccezione dei tre rappresentanti di vendita, nessun altro può aprire questo file senza la password. La prossima volta che avrai tale requisito, puoi anche impostare una tale finestra di accesso per la cartella di lavoro.

Riconoscere il problema nella corruzione di Excel

A volte Excel si corromperà a causa di numerosi fattori. Prima di te starPer correggere i file, è necessario identificare il problema insieme ai motivi del disastro dei dati. Inoltre, se non sai nulla sul recupero dei dati, puoi farlo riparare corrotto Excel xlsx utilizzando uno strumento di terze parti. Con l'algoritmo all'avanguardia, questo strumento può gestire almost tutti gli errori di Excel.

Introduzione dell'autore:

Anna Ma è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui riparare docx danneggiato e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com

Condividi ora:

I commenti sono chiusi.