|
Login
  • Page:
  • 1

TOPIC: macro con foglio protetto

macro con foglio protetto 2 years 5 months ago #12514

  • mcs032008
  • mcs032008's Avatar
  • OFFLINE
  • Junior Boarder
  • Posts: 21
  • Karma: 0
salve,
ho un file excel con alcune celle protette. nell'eseguire le macro, prima del codice macro inserisco la seguente stringa:
Sheets("Foglio1").Unprotect
quindi il codice macro
e per riproteggere le celle inserisco la seguente stringa:
Sheets("Foglio1").Protect
Tutto sembra funzionare ma con Ma: praticamente ad esecuzione della Macro, le celle protette nn risultano + protette.
esempio:
A1= Antonio (cella modificabile), la macro deve copiare il contenuto di A1 in D4 (cella protetta). quindi scrivo il seguente codice che, ripeto, mi esegue la macro ma non ripristina la protezione nella cella D4:

Sheets("Foglio1").Unprotect
Range("A1").Select
Selection.Copy
Range("D4").Select
ActiveSheet.Paste
Range("A1").Select
Application.CutCopyMode = False
Sheets("Foglio1").Protect
End Sub

Dove sbaglio?
grazie 1000
The administrator has disabled public write access.
  • Page:
  • 1
Time to create page: 0.525 seconds