Rendere visibile un foglio di lavoro.

Versione Completa Stampa Cerca Utenti Iscriviti Condividi :

Excel Forum » Excel Forum » » Soluzioni Excel Domande e Risposte

digito

00lunedì 20 febbraio 2017 11:13

Gent.mi,

sono a chiedervi gentilmente se è possibile ottenere:

in Excel 2010 ho 15 fogli di lavoro ed una UserForm.

con il seguente codice:

- Application.visible = False.

regolarmente i fogli non vengono visualizzate ed appare regolarmente l'UserForm1.

Gradirei con un pulsante, inserito all'UserForm, che un foglio per es. Foglio9 apparisse nascondendo UserForm.

ho applicato il seguente codice con esito negativo:

- Foglio9.application.visible = True
o
- Foglio9.visible = True
- UnLoad UserForm1

e dal Foglio9, con un pulsante rendere invisibile il foglio9 richiamando UserForm1.

Ringrazio e con cordialità saluto.

patel45

00lunedì 20 febbraio 2017 11:17

allega un file di esempio da testare, io farei

Application.visible = True
Sheets("Foglio9").select
UserForm1.Hide

digito

00lunedì 20 febbraio 2017 12:16

Gent.mo Patel,

invio il file e scusa per non averlo fatto prima pensando che fosse semplice ma....

il codice in se funziona e gradirei che alla visualizzazione del foglio9 gli altri non dovrebbero essere visualizzati.

al pulsante del foglio9, che regolarmente richiama UserForm1, il foglio9 dovrebbe non essere visualizzato.

Nel ringraziarti dell'aiuto, saluto.

patel45

00lunedì 20 febbraio 2017 18:04

Private Sub Button2_Click()
Application.Visible = True
For Each sh In Sheets
  If sh.Name <> "Foglio9" Then sh.Visible = False
Next
UserForm1.Hide

End Sub

digito

00martedì 21 febbraio 2017 10:34

Gent.mo Patel45,

scusa il ritardo funziona e grazie dell'aiuto.

Saluto.

Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 03:11.