Condividi:        

Nascondere formule

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Nascondere formule

Postdi ahidai » 13/05/15 19:54

Un saluto a tutti, girovagando ho trovato questa macro:
Codice: Seleziona tutto
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim formula As Range
On Error Resume Next
   Sh.Unprotect Password:="password"
   With Selection
   .Locked = False
   .FormulaHidden = False
End With
If Target.Cells.Count = 1 Then
If Target.HasFormula Then
   With Target
   .Locked = True
   .FormulaHidden = True
End With
   Sh.Protect Password:="password", UserInterFaceOnly:=True
End If
   ElseIf Target.Cells.Count > 1 Then
   Set formula = Selection.SpecialCells(xlCellTypeFormulas)
   If Not formula Is Nothing Then
   With Selection.SpecialCells(xlCellTypeFormulas)
   .Locked = True
   .FormulaHidden = True
End With
   Sh.Protect Password:="password", UserInterFaceOnly:=True
End If
End If
   On Error GoTo 0
End Sub

l'ho inserita in thisworkbook e in effetti nasconde le formule nelle varie celle. Il problema è che quando mi posiziono su una cella dove non ci sono formule si blocca il file.
Sicuramente c'è qualcosa che non funziona in questa macro.Per cortesia mi potete risolvere questo problema.
Grazie in anticipo e buona serata.
ahidai
Utente Senior
 
Post: 212
Iscritto il: 08/12/10 17:33

Sponsor
 

Re: Nascondere formule

Postdi Anthony47 » 13/05/15 22:27

Non capisco tutta questa complicazione, perche' per nascondere le formule basta proteggere il foglio di lavoro... Mi spieghi che cosa desidere ottenere, cosi' vediamo come farlo?

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Nascondere formule

Postdi ahidai » 14/05/15 14:06

Anthony47 ha scritto:Non capisco tutta questa complicazione, perche' per nascondere le formule basta proteggere il foglio di lavoro... Mi spieghi che cosa desidere ottenere, cosi' vediamo come farlo?

Ciao


Ciao e grazie di nuovo per la risposta Anthony. Le formule le volevo nascondere per evitare che si possono cancellare, e purtroppo non posso proteggere il foglio perché dovrà essere usato anche da altre persone.
Saluti.
ahidai
Utente Senior
 
Post: 212
Iscritto il: 08/12/10 17:33

Re: Nascondere formule

Postdi alfrimpa » 14/05/15 14:24

Ciao Ahidai

Potresti nel menù Formato Celle, Protezione sbloccare tutte le celle tranne quelle contenenti formule e per queste ultime selezionare la casella "Nascosta" e poi proteggere il foglio.

In questo modo il foglio di lavoro sarà completamente editabile e le formule saranno nascoste ed immodificabili.

Alfredo
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Nascondere formule

Postdi ahidai » 14/05/15 14:52

Grazie per la risposta Alfrimpa, si in effetti avevo già utilizzato questa soluzione ma senza spuntare "nascosta".
Grazie ancora così ho risolto il problema.
Un saluto a tutti e buon lavoro.
ahidai
Utente Senior
 
Post: 212
Iscritto il: 08/12/10 17:33


Torna a Applicazioni Office Windows


Topic correlati a "Nascondere formule":


Chi c’è in linea

Visitano il forum: Nessuno e 140 ospiti