Risultati da 1 a 19 di 19

Discussione: Proteggere intervalli di un foglio contenente tabella



  1. #1
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Proteggere intervalli di un foglio contenente tabella

    Ciao a tutti,


    C'è un modo per poter proteggere intervalli di celle in un foglio Excel contenente una tabella e contemporaneamente poter incrementare le righe della stessa con il tasto Tab?


    Ci sto sbattendo la testa, ma da solo non ne vengo a capo, se proteggo un foglio contenente una tabella infatti non posso incrementare le righe con il tasto Tab.


    Saluti Maurizio.
    Ultima modifica fatta da:Canapone; 14/07/17 alle 09:57

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao,
    sto scrivendo dal cellulare quindi non posso provare ciò che dico ma credo che potresti usare il metodo "Application.OnKey" per eseguire una macro che sblocca il foglio (alla pressione del tasto TAB), aggiunge la riga e dopo riblocca il foglio.

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Ri-Ciao,

    anche se non hai risposto, lasciamo perdere i vari OnKey, SendKey etc... che mi fanno venire l'orticaria..

    Potresti sfruttare l'evento "Worksheet_SelectionChange".
    Se ti posizioni sulla tabella, il foglio si sblocca altrimenti rimette la password:

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    
        If Not Intersect(Target, Range("Tabella1")) Is Nothing Then
            Worksheets("Tabella").Unprotect "123"
        Else
            Worksheets("Tabella").Protect "123"
        End If
    
    
    End Sub
    File Allegati File Allegati

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  4. #4
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Non ho risposto prima perchè sono appena tornato dal lavoro, ho provato con il tuo suggerimento ma mi da:
    errore di run-time '9':
    Indice non incluso nell'intervallo
    e il debug mi evidenzia il 1° Workset("Tabella").Unprotect "123"
    Quanto sotto è quello che ho inserito ho cambiato il nome della tabella perchè la mia si chiama Tabella2.

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    If Not Intersect(Target, Range("Tabella2")) Is Nothing Then
    Worksheets("Tabella").Unprotect "123"
    Else
    Worksheets("Tabella").Protect "123"
    End If
    
    End Sub
    Ultima modifica fatta da:cromagno; 21/05/16 alle 23:06 Motivo: Inserito codice tra i tag CODE...

  5. #5

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7125
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1298

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao a tutti,
    prova col metodo "Application.OnKey" (suggerito da cromagno a cui però fa venire l'orticaria :288:), che dovrebbe fare quello che hai chiesto, cioè inserire una riga alla tabella col tasto TAB.

    Codice da inserire in un modulo standard:
    Codice: 
    Sub inserisciriga()
    Dim wks As Worksheet
    Set wks = Sheets("Foglio1")
    With wks
        .Unprotect
            uRow = .Range("D" & Rows.Count).End(xlUp).Row - 1
            .Range("D" & uRow).Offset(1, 0).EntireRow.Insert
         .Protect
     End With
    End Sub


    Codice da inserire nel modulo del "Foglio1":
    Codice: 
    Private Sub Worksheet_Activate()
    Application.OnKey "{TAB}", "inserisciriga"
    End Sub

    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  6. I seguenti utenti hanno dato un "Like"


  7. #6

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao,
    il codice di esempio che ti ho postato prima è adattato al file che ho allegato.
    Da li prendi spunto per adattarlo al tuo file.

    Ma quindi hai risolto?
    Se non hai risolto allega il file per capire meglio.

    P.S.
    I codici dovresti metterli tra i tag CODE:
    http://www.forumexcel.it/forum/2-ann...tra-i-tag-code

    [EDIT]
    Scusa ges, non avevo visto la tua risposta ;)

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  8. #7

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao ges,
    si, mi fanno venire l'orticaria perchè ogni volta c'è sempre qualcosa non funziona a dovere e per risolvere sei costretto ad allungare di molto il codice :174:.

    Se posso.... nel tuo codice aggiungerei anche questa parte (tanto per tornare al discorso di "allungamento del codice" :166: ):

    Codice: 
    Private Sub Worksheet_Deactivate()
    Application.OnKey "{TAB}"
    End Sub
    Altrimenti aggiungerebbe una riga anche se premi il tasto TAB dal "Foglio2".

    [EDIT]
    ho modificato leggermente il codice:

    da cosi:
    Codice: 
    Application.OnKey "{TAB}", ""
    a cosi:
    Codice: 
    Application.OnKey "{TAB}"

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  9. #8

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7125
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1298

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao cromagno,
    nessun problema e poi non potevi vedere la mia risposta postata solo pochi secondi prima. :90:
    Solo che ho riposto tenendo conto della richiesta di Mausa ma veramente non ho ben capito cosa deve fare..... :92:

    [EDIT]@ cromagno:Grazie della correzione/integrazione del codice.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  10. #9
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Allego il file,

    nella parte in alto ci sono le formule che vorrei proteggere.
    File Allegati File Allegati

  11. #10

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7125
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1298

    Re: Proteggere intervalli di un foglio contenente tabella

    Ciao Mausa,
    scusa vedo solo due formule: =OGGI() e =SOMMA.SE(A:A;"<="&$B$2;D:D)
    ma vuoi proteggere solo queste formule o tutta la tabella?
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  12. #11
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Solo quelle formule.

  13. #12

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7125
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1298

    Re: Proteggere intervalli di un foglio contenente tabella

    Allora non serve nessun codice, basta solo selezionarle e bloccarle.
    Selezioni tutto il foglio tasto destro-> Formato celle ->Protezione e deselezioni la voce "Bloccate"
    Quindi selezioni le due celle interessate e Formato celle ->Protezione e questa volta selezioni la voce "Bloccate"
    Vai su Revisione e blocca tutto il foglio e le due sole formule saranno bloccate.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  14. #13
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Ehmm...
    Purtroppo Ges non è così semplice, forse ti sfugge una parte molto importante della mia domanda iniziale e cioè : io vorrei poter inserire le righe all'occorrenza, ma con il foglio protetto scompare questa possibilità.
    Infatti se proteggi il foglio scompare il "segnetto" nell'ultima cella in basso a destra se ti posizioni qui e schiacci Tab non ti crea un'altra riga.
    In un'altra occasione ho risolto associando una macro a due pulsanti, uno per proteggere e l'altro per togliere la protezione, ma spero che ci sia un modo più semplice.

  15. #14

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Citazione Originariamente Scritto da Mausa Visualizza Messaggio
    Non ho risposto prima perchè sono appena tornato dal lavoro, ho provato con il tuo suggerimento ma mi da:
    errore di run-time '9':
    Indice non incluso nell'intervallo
    e il debug mi evidenzia il 1° Workset("Tabella").Unprotect "123"
    Quanto sotto è quello che ho inserito ho cambiato il nome della tabella perchè la mia si chiama Tabella2.

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    If Not Intersect(Target, Range("Tabella2")) Is Nothing Then
    Worksheets("Tabella").Unprotect "123"
    Else
    Worksheets("Tabella").Protect "123"
    End If
    
    End Sub
    Ho visto il tuo file....
    beh, certo che ti dava errore alla riga da te indicata, solamente perchè stavi cercando di togliere la protezione (e metterla) ad un foglio chiamato "Tabella" (che si trovava nel file che ti avevo allegato) che non esiste... nel tuo file è "Foglio1".

    Per tagliare la testa al toro, usa direttamente "ActiveSheet" invece di indicare il nome del foglio:

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    
    If Not Intersect(Target, Range("Tabella2")) Is Nothing Then
    ActiveSheet.Unprotect "123"
    Else
    ActiveSheet.Protect "123"
    End If
    
    
    End Sub
    File Allegati File Allegati

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  16. #15

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7125
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1298

    Re: Proteggere intervalli di un foglio contenente tabella

    Citazione Originariamente Scritto da Mausa Visualizza Messaggio
    Ehmm...
    Purtroppo Ges non è così semplice, forse ti sfugge una parte molto importante della mia domanda iniziale e cioè : io vorrei poter inserire le righe all'occorrenza, ma con il foglio protetto scompare questa possibilità.
    Infatti se proteggi il foglio scompare il "segnetto" nell'ultima cella in basso a destra se ti posizioni qui e schiacci Tab non ti crea un'altra riga.
    In un'altra occasione ho risolto associando una macro a due pulsanti, uno per proteggere e l'altro per togliere la protezione, ma spero che ci sia un modo più semplice.
    Evidentemente c'è un errore nella comunicazione tra noi: se tu mi dici che vuoi proteggere solo le due formule perchè devi bloccare tutte le celle del foglio? :92:
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  17. #16
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Non voglio bloccare tutte le celle del foglio, infatti le celle sono tutte sbloccate tranne quelle della parte alta (A1-D3 per intenderci) solo che quando proteggo il foglio le celle della parte alta sono bloccate, come voglio che sia, le restanti sono sbloccate, come voglio che sia, ma mi viene preclusa la possibilità di inserire ulteriori righe perchè scompare il segnetto nell'ultima riga in basso a destra.
    Se voglio farlo devo togliere la protezione, inserire la o le righe e ri-proteggere.

  18. #17

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Ma hai provato l'ultimo file allegato allegato?

    :92::174:

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  19. #18
    L'avatar di Mausa
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Lecce
    Età
    55
    Messaggi
    48
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    1

    Re: Proteggere intervalli di un foglio contenente tabella

    Si, e funziona tutto correttamente, ho anche scritto un messaggio per ringraziarti intorno alle 13:30, non capisco cosa sia successo, non vedo il mio messaggio.
    Grazie ancora cromagno.
    Ultima modifica fatta da:Canapone; 14/07/17 alle 09:58

  20. #19

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923

    Re: Proteggere intervalli di un foglio contenente tabella

    Citazione Originariamente Scritto da Mausa Visualizza Messaggio
    Si, e funziona tutto correttamente, ho anche scritto un messaggio per ringraziarti intorno alle 13:30, non capisco cosa sia successo, non vedo il mio messaggio.
    Grazie ancora cromagno.
    Ciao,
    non saprei... non c'è nessun messaggio in moderazione :273:

    Comunque....
    se hai risolto il problema, segna questo thread come "RISOLTO".
    Vai sul menù "Strumenti Discussione" (all'inizio del thread) e scegli la voce "Segna questa discussione come Risolta...".

    Ciao
    Tore

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

Discussioni Simili

  1. Excel 2003 e EP6 Lo strumento TABELLA per intervalli dinamici di excel
    Di AiaceT nel forum Domande su Excel in generale
    Risposte: 0
    Ultimo Messaggio: 23/01/17, 00:06
  2. proteggere il foglio
    Di principiante nel forum Domande su Excel VBA e MACRO
    Risposte: 11
    Ultimo Messaggio: 13/12/16, 22:34
  3. Risposte: 2
    Ultimo Messaggio: 18/11/16, 18:27
  4. Proteggere un foglio excel con macro
    Di klaudios nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 11/08/16, 23:45
  5. Proteggere Foglio di Lavoro lasciando qualche cella modificabile
    Di Bestpaul nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 08/12/15, 14:47

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •