Come rendere dinamico il nome del pulsante di comando in Excel?
Questo articolo parla di modificare dinamicamente il nome di un pulsante di comando con un valore di cella specificato. Ad esempio, quando il valore nella cella A1 è stato modificato in "test", il nome di un determinato pulsante di comando verrà modificato automaticamente in "test".
Rendi dinamico il nome del pulsante di comando con il valore della cella tramite codice VBA
Rendi dinamico il nome del pulsante di comando con il valore della cella tramite codice VBA
Il seguente codice VBA può aiutarti a rendere dinamico il nome di un pulsante di comando con un valore di cella specificato in un foglio di lavoro. Si prega di fare quanto segue.
1. Clic Costruttori > inserire > Pulsante di comando (controllo ActiveX) per inserire un pulsante di comando nel foglio di lavoro. Vedi screenshot:
2. Dopo aver inserito il pulsante di comando, fare clic con il pulsante destro del mouse sulla scheda del foglio e fare clic Visualizza codice dal menu di scelta rapida come mostrato nell'immagine sottostante:
3. In apertura Microsoft Visual Basic, Applications Edition finestra, copia e incolla sotto il codice VBA nella finestra.
Codice VBA: rendi dinamico il nome del pulsante di comando con il valore della cella
Dim xStr As String
Private Sub Worksheet_Change(ByVal Target As Range)
Dim xShapeRg As ShapeRange
On Error Resume Next
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Me.CommandButton1.Caption = Target.Text
Set xShapeRg = ActiveSheet.Shapes.Range(xStr)
If xShapeRg Is Nothing Then Set xShapeRg = ActiveSheet.Shapes.Range("CommandButton1")
Application.EnableEvents = False
xShapeRg.Select
Application.EnableEvents = True
Selection.Name = Target.Text
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If (Not Intersect(Target, Range("A1")) Is Nothing) And Target.Text <> "" Then
xStr = Target.Text
End If
End Sub
Note:: nel codice, CommandButton1 è il nome del pulsante a cui vuoi rendere dinamico il nome e A1 è la cella a cui farai automaticamente riferimento il valore al nome del pulsante.
4. premi il altro + Q tasti per uscire da Microsoft Visual Basic, Applications Edition finestra.
5. Disattivare la modalità di progettazione facendo clic su Costruttori > Modalità di progettazione.
D'ora in poi, il nome del pulsante di comando verrà modificato dinamicamente con il valore della cella specificato nel foglio di lavoro.
Come mostrato nell'immagine sottostante, quando il valore della cella A1 è stato modificato, il nome del pulsante di comando verrà modificato automaticamente con lo stesso valore.
Articoli Correlati:
- Come utilizzare il pulsante di comando per salvare il foglio di lavoro attivo come file PDF in Excel?
- Come inserire automaticamente una nuova riga vuota dal pulsante di comando in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!