Moderatori: Anthony47, Flash30005
Private Sub Workbook_Open()
Dim Orig As String
‘Stop
Orig = "D:\DDownloads\byMILANOOO_C41125_Esempio.xlsm" '<<< Percorso e nome del file
ThisWorkbook.Unprotect Password:="pippo"
If Not ThisWorkbook.ReadOnly And ThisWorkbook.FullName = Orig Then
Sheets("master").Visible = xlSheetVisible
Else
Sheets("Master").Visible = xlSheetVeryHidden
End If
ThisWorkbook.Protect Password:="pippo"
End Sub
Torna a Applicazioni Office Windows
confrontare e evidenziare 2 fogli excel Autore: niccia |
Forum: Applicazioni Office Windows Risposte: 5 |
File batch per copiare file selezionato da menu contestuale Autore: valle1975 |
Forum: Programmazione Risposte: 3 |
[EXCEL] controllo corrispondenza tra valori con un vincolo Autore: sbs |
Forum: Applicazioni Office Windows Risposte: 9 |
Visitano il forum: Nessuno e 36 ospiti