Come modificare il valore di una cella facendo clic su di essa?

È possibile modificare il valore di una cella facendo clic su di essa in Excel? Ad esempio, quando fai clic per la prima volta su una cella specifica A1, viene visualizzato il testo “Excel”; se fai nuovamente clic su A1, viene mostrato il testo “Word”, e al terzo clic su questa cella viene visualizzato il testo “Outlook”. In questo caso, il valore nella cella A1 cambierà ciclicamente da “Excel” a “Word”, poi a “Outlook” e di nuovo a “Excel” …… come mostrato nello screenshot seguente:

Modificare il valore di una cella facendo clic su di essa con il codice VBA

Modificare il valore di una cella facendo clic su di essa con il codice VBA

Per completare questa operazione in Excel, il seguente codice VBA potrebbe esserti utile, procedi come segue:

1. Fai clic con il tasto destro sul tab del foglio di lavoro in cui desideri modificare il valore della cella facendo clic su di essa, quindi scegli Visualizza Codice dal menu contestuale. Nella finestra aperta di Microsoft Visual Basic for Applications, copia e incolla il seguente codice nel modulo vuoto:

Codice VBA: Modifica il valore di una cella facendo clic su di essa:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
  Application.EnableEvents = False
  With Target
  If .Address = Range("A1").Address Then
    Select Case .Value
      Case "Excel"
        .Value = "Word"
      Case "Word"
        .Value = "Outlook"
      Case "Outlook"
        .Value = "Excel"
      Case Else
        .Value = "Word"
    End Select
  End If
  End With
  Range("A2").Select
  Application.EnableEvents = True
End Sub

Nota: Nel codice sopra, A1 è la cella in cui desideri modificare il valore facendo clic su di essa; “Excel”, “Word”, “Outlook” sono i valori delle celle che desideri visualizzare ciclicamente. Puoi modificarli secondo le tue esigenze.

2. Dopo aver incollato il codice, salva il codice e chiudi la finestra. Ora, quando fai clic sulla cella A1 per la prima volta, il testo “Excel” viene visualizzato immediatamente; fai clic di nuovo e appare il testo “Word”; al terzo clic, viene mostrato il testo “Outlook”, come illustrato nello screenshot:

Altri articoli correlati:

Come filtrare i dati semplicemente facendo clic sul contenuto della cella in Excel?

Come ordinare i dati di una colonna facendo clic sull'intestazione in Excel?