Nwlapcug.com


Come controllare ogni controllo di un gruppo in Excel VBA

VBA o Visual Basic Applications Edition, è una macro potente linguaggio di programmazione che viene fornito con il programma di foglio di calcolo Microsoft Excel. È possibile controllare ogni controllo di un gruppo di controlli in un programma, o una macro, è scrivere per salvare voi da dover specificare un particolare controllo per leggere le proprietà. Excel consente di raggruppamento controllo grazie al controllo di "Frame". La proprietà di "Controlli" di questo controllo fornisce l'accesso ai controlli all'interno del telaio. Oltre a utilizzare la proprietà di "Controlli" per leggere i valori di un controllo "Frames", è possibile impostare anche i valori di controllo. Ad esempio, si possono nascondere o visualizzare i controlli all'interno di una cornice con la proprietà "Visibile".

Istruzioni

1

Fare clic sul pulsante "Visual Basic" della scheda "Developer" per entrare nell'ambiente di programmazione VBA, quindi fare clic su elemento "Userform" del menu "Inserisci" per creare un nuovo modulo su cui posizionare i controlli. Se la scheda "Sviluppo" non è tra le vostre scelte di menu in Excel, potrebbe essere necessario attivare la visualizzazione in opzioni di Excel.

2

Fare clic sul "Pulsante" controllo nella casella degli strumenti, quindi trascinare l'oggetto UserForm per creare un pulsante. Fare clic sul controllo "OptionButton" dalla casella degli strumenti, quindi trascinare l'oggetto UserForm per creare un pulsante di opzione. Questo pulsante fare clic destro e scegliere "Proprietà" per visualizzare un elenco di attributi per il controllo.

3

Fare clic sulla riga "Enabled" della finestra "Proprietà", quindi digitare "False" per indicare che il pulsante di opzione è in grado di elaborare l'input. Si noti che il pulsante di comando, che è stato creato nel passaggio 2, è attivato per impostazione predefinita.

4

Fare clic sul controllo "Frame" nella casella degli strumenti, quindi trascinare l'oggetto UserForm. Fare clic sul pulsante controllo apportate nel passaggio 1, quindi premere contemporaneamente "Controllo" e "X" per tagliare questo controllo negli Appunti.

5

Fare clic sul controllo "Frame", quindi premere contemporaneamente "Controllo" e "V" per incollare il pulsante all'interno della cornice. Ripetere il taglio e incollare con il pulsante di opzione per incollare il telaio pure. Inserendo entrambi i controlli nel telaio, hai fatto un gruppo che contiene entrambi i controlli. Ora che scriverete codice che controlla una proprietà di ciascun controllo.

6

Fare doppio clic sul form per visualizzare la finestra di programmazione, quindi incollare il seguente programma nella finestra. Questo programma scorre ogni controllo nel telaio, leggere la proprietà di "Enabled" impostato nel passaggio 3 e stampare il valore di tale proprietà.

Private Sub UserForm_Click()

Dim ct As Control

Dim s As String

For Each ct In Frame1.Controls

If ct.Enabled = True Then

s = ct.Name & " is enabled."

Else

s = ct.Name & " is disabled."

End If

MsgBox s

Next

End Sub

7

Fare clic sul comando di "Esegui" del menu "Esegui" per visualizzare il form, quindi fate clic sulla forma che non dispone di un controllo. Il programma verrà eseguito, visualizzazione messaggio circa la proprietà di "Enabled" descritta nel passaggio 3.