Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come visualizzare un Spinner Quando una macro VBA è in esecuzione

Il modo migliore per permettere un aumento di un utente o diminuire un valore nell'applicazione Microsoft Excel quando una macro è in esecuzione è quello di utilizzare un pulsante di selezione . Una macro è comunemente utilizzato per registrare una sequenza di azioni che possono essere eseguite in seguito eseguendo la macro manualmente o facendo clic su un pulsante . Una macro è creato attraverso l'utilizzo di Visual Basic, Applications Edition (VBA ) , un linguaggio di programmazione utilizzato in applicazioni di Microsoft Office per automatizzare le attività di routine, come la visualizzazione di un filatore . Istruzioni
1

lancio di Microsoft Excel , fare clic sulla scheda " sviluppatori" e fare clic sull'icona "Inserisci" nel pannello " Controlli " . Fare clic su "Pulsante" e fare clic sul foglio di calcolo per aggiungere un nuovo pulsante di comando . Fare clic su " Pulsante di selezione " sotto " Controlli ActiveX " e aggiungerlo al foglio di calcolo .

2 Fare clic con il filatore e cliccare su "Proprietà " per visualizzare la finestra delle proprietà . Scegliere " False" accanto alla proprietà " Visible " . Fare clic sull'icona " Macro " e di tipo " IncrementValues ​​" sotto " Nome macro ". Fare clic sul pulsante "Crea " per creare una nuova macro .
3

Copia e incolla il seguente codice per creare un " While ... Loop" e aggiornare il foglio di calcolo con i valori ogni volta che il utente fa clic sul pulsante filatore :

Sheet1.SpinButton1.Visible = True

Do While ( contatore < > 10)


Range ("A1 " ) Selezionare < . br

Gamma > ( "A1") . Valore = contatore

Range (" A2" ) . Selezionare

Range (" A2" ) . Value = " Macro esecuzione ... "

Application.Wait ora + TimeValue Selezionare ( " 00:00:02 " ) per

DoEvents

loop

Range (" A1 " ) .

Range (" A1") . Value = " "

Range (" A2" ) . Selezionare

Range (" A2" ) . Value = " Macro conclusa. "

Sheet1.SpinButton1.Visible = False

contatore = 0
4

Aggiungere la seguente riga di codice nella parte superiore del modulo per creare un globale variabile :

contatore globale As Integer
5

tornare a destra clic su Microsoft Excel e "Button 1 ". Fare clic su " Assegna macro " e cliccare su " IncrementValues ​​. " Fare clic su "OK".
6

Fare clic con il pulsante filatore e fai clic su " Visualizza codice " per aprire un modulo di codice VBA . Copiare e incollare il seguente codice per aumentare o diminuire il valore della variabile globale :

SpinButton1_SpinDown Private Sub ( ) per

contatore = contatore - 1

End Sub

 

Programmazione © www.354353.com