Come disabilitare la modifica in una casella di testo per impedire all’utente di inserire dati in Excel?
Questo articolo spiega come disabilitare la modifica in una casella di testo (controllo ActiveX) o in più caselle di testo (controlli ActiveX) per impedire agli utenti di inserire dati in Excel.
Disabilita la modifica in una casella di testo modificandone le proprietà
Disabilita la modifica in più caselle di testo con codice VBA
Disabilita la modifica in una casella di testo modificandone le proprietà
Questa sezione spiega come modificare le proprietà di una casella di testo per renderla non modificabile. Seguire questa procedura.
1. Attiva la modalità Progettazione facendo clic su Sviluppo > Modalità progettazione. Guarda lo screenshot:
2. Fare clic con il pulsante destro del mouse sulla casella di testo e selezionare Proprietà dal menu contestuale, come mostrato nello screenshot seguente.
3. Nella finestra di dialogo Proprietà aperta, seleziona False nella casella Abilitato, quindi chiudi la finestra Proprietà. Vedere lo screenshot:
Ora la casella di testo selezionata è grigia e non può essere modificata.
Sblocca la magia di Excel con KUTOOLS AI
- Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
- Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
- Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
- Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.
Disabilita la modifica in più caselle di testo con codice VBA
Per disabilitare la modifica in più caselle di testo all’interno di un foglio di lavoro, applica il seguente codice VBA.
1. Nel foglio di lavoro che contiene le caselle di controllo da disabilitare, fai clic su Sviluppo > Inserisci > Casella di controllo (Controllo ActiveX) per inserire una casella di controllo nel foglio. Vedere lo screenshot:
2. Fare clic con il pulsante destro del mouse sulla casella di controllo e selezionare Visualizza codice dal menu contestuale. Vedere lo screenshot:
3. Nella finestra di Microsoft Visual Basic, Applications Edition, sostituire il codice originale con il seguente codice VBA.
Codice VBA: Disabilita la modifica in più caselle di testo
Private Sub CheckBox1_Click()
Dim xTextBox As OLEObject
Dim xFlag As Boolean
Dim I As Long
Dim xArr
xArr = Array("TextBox1", "TextBox2", "TextBox3")
xFlag = True
If Me.CheckBox1 Then xFlag = False
For Each xTextBox In ActiveSheet.OLEObjects
If TypeName(xTextBox.Object) = "TextBox" Then
For I = 0 To UBound(xArr)
If xTextBox.Name = xArr(I) Then
xTextBox.Enabled = xFlag
End If
Next
End If
Next
End SubNote:
1. Nel codice, CheckBox1 è il nome della casella di controllo inserita. Inoltre, TextBox1, TextBox2 e TextBox3 sono le caselle di testo per cui si desidera disabilitare la modifica nel foglio di lavoro. Modificale in base alle tue esigenze.
2. Per disabilitare la modifica di ulteriori caselle di testo, aggiungi i nomi delle caselle tra virgolette nella riga xArr = Array("TextBox1", "TextBox2", "TextBox3").
4. Quindi salva e chiudi il codice, disattiva la modalità Progettazione; ora, selezionando la casella di controllo, tutte le caselle di testo specificate diventeranno non modificabili nel foglio di lavoro. Vedere lo screenshot:
Nota: se deselezionate la casella di controllo, le caselle di testo torneranno modificabili.
Articoli correlati:
- Come fare in modo che il testo di una casella di testo venga selezionato automaticamente quando la casella è selezionata in Excel?
- Come attivare il completamento automatico in una casella di testo mentre si digita in Excel?
- Come cancellare automaticamente il contenuto di una casella di testo con un semplice clic in Excel?
- Come si fa a unire il testo di più celle in una singola casella di testo in Excel?
- Come si formatta una casella di testo come percentuale in Excel?
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- 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 all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi