La consultazione del forum è libera per tutti.
Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).
Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.
Ciao, secondo voi è possibile fare in modo che all'apertura del file si visualizzi solo una determinata userform e non anche tutte le pagine di excel? E se è possibile, si può creare un pulsante nella userform scelta per poterle riportare visibili secondo necessità?
ciao
in questa cartella di lavoro
Private Sub workbook_open() Application.WindowState = xlMinimized UserForm1.Show End Sub
in un pulsante del form
Private Sub CommandButton1_Click() Application.WindowState = xlMaximized UserForm1.Hide End Sub
@gianfranco55 grazie funziona perfettamente..non che avessi dubbi 😝
Mi sembra di capire che non sia possibile se necessario visualizzare sia la userform che i fogli di lavoro, sbaglio?
ciao
certo che si può
basta nel command button mettere
Private Sub CommandButton1_Click() Application.WindowState = xlMaximized End Sub
@gianfranco55 perdonami non mi sono spiegata bene. Intendevo poter utilizzare contemporaneamente la userform e il file excel. Al momento se dal pulsante della userform visualizzo il file, non posso inserire nulla manualmente a meno di chiudere la userform ma ho bisogno se necessario di poterli usare contemporaneamente
ciao
Private Sub CommandButton1_Click() Application.WindowState = xlMaximized UserForm1.Show vbModeless End Sub
il problema è che se cambi foglio devi ricordarti di chiudere la form altrimenti la vedi su tutti i fogli
allora aggiungiamo (per non dimenticarlo) in uscita del foglio
Private Sub Worksheet_Deactivate() Unload UserForm1 End Sub
@gianfranco55 aggiungendo il comando userform1.show vbmodeless mi restituisce un errore di runtime
..a questo punto ti allego il file così è più chiaro
ciao
Private Sub CommandButton4_Click() Application.WindowState = xlMaximized Unload Home ActiveSheet.Cells(1, 1).Select Home.Show vbModeless End Sub
spero i vbaisti intervengano a migliorare
ma funziona
@gianfranco55 grazie davvero, funziona perfettamente 😘