Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > it.comp.lang.visual-basic > #19815

VBA Excel - form apertura file

X-Received by 2002:ae9:de02:: with SMTP id s2mr26589825qkf.396.1594116813840; Tue, 07 Jul 2020 03:13:33 -0700 (PDT)
X-Received by 2002:ac8:2fa9:: with SMTP id l38mr54462835qta.40.1594116813624; Tue, 07 Jul 2020 03:13:33 -0700 (PDT)
Path csiph.com!xmission!news.snarked.org!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups it.comp.lang.visual-basic
Date Tue, 7 Jul 2020 03:13:33 -0700 (PDT)
Complaints-To groups-abuse@google.com
Injection-Info google-groups.googlegroups.com; posting-host=165.225.203.44; posting-account=yvxj_woAAABxrxq8XihQzP-tWUWpycQc
NNTP-Posting-Host 165.225.203.44
User-Agent G2/1.0
MIME-Version 1.0
Message-ID <25f889bd-4daf-4c09-9c36-57ad91fb8deao@googlegroups.com> (permalink)
Subject VBA Excel - form apertura file
From Marco75 <marcoporzi75@gmail.com>
Injection-Date Tue, 07 Jul 2020 10:13:33 +0000
Content-Type text/plain; charset="UTF-8"
Content-Transfer-Encoding quoted-printable
Lines 28
Xref csiph.com it.comp.lang.visual-basic:19815

Show key headers only | View raw

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

Thread

VBA Excel - form apertura file Marco75 <marcoporzi75@gmail.com> - 2020-07-07 03:13 -0700

csiph-web