Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > it.comp.lang.visual-basic > #19815
| Newsgroups | it.comp.lang.visual-basic |
|---|---|
| Date | 2020-07-07 03:13 -0700 |
| Message-ID | <25f889bd-4daf-4c09-9c36-57ad91fb8deao@googlegroups.com> (permalink) |
| Subject | VBA Excel - form apertura file |
| From | Marco75 <marcoporzi75@gmail.com> |
ciao,
su apertura di un file (Workbook Open) eseguo una serie di attività (lancio delle query e popolo delle tabelle). Mentre esegue il codice, mostro un form di attesa con al suo interno il titolo del file e un'immagine.
Private Sub Workbook_Open()
Application.ScreenUpdating = False
ufWait.Show vbModal
mio codice
mio codice
..........
Application.Wait (Now + TimeValue("00:00:07"))
Unload ufWait
Application.ScreenUpdating = True
se uso ufWait.Show vbModal vedo tutta la grafica del form immediatamente ma non si chiude al termine di Application.Wait
se uso ufWait.Show vbModeless la grafica del form non si vede per diversi secondi poi compare e alla fine di Application.Wait si chiude
come faccio a mostrare il form con titolo e grafica e non un form bianco che si chiude dopo l'esecuzione del codice?
grazie
Marco
Back to it.comp.lang.visual-basic | Previous | Next | Find similar
VBA Excel - form apertura file Marco75 <marcoporzi75@gmail.com> - 2020-07-07 03:13 -0700
csiph-web