[VBA] Impedire inserimento lettere (Excel)

[infinito8847]

Ciao a tutti ho bisogno di un aiuto, ho una macro che serve a sommare tutti i numeri inseriti nella colonna (C6:C46) es. se inserisco 5 e poi 6 sempre nella stessa cella i numeri si sommeranno e uscirà 11 e cosi via, il problema è ke se viene inserita una lettera o un carattere speciale la macro non funziona piu, quindi mi occorrerebbe ke in quella stessa colonna si potessero inserire solo numeri, è possibile? Aiutoo grazie a tutti in anticipo. ecco la macro:

Private valor As Long

Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Long
If Not Intersect(Target, [C6:C46]) Is Nothing Then
r = Target.Row
Application.EnableEvents = False
Cells(r, 3) = valor + Target.Value
Application.EnableEvents = True
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [C6:C46]) Is Nothing Then valor = Target.Value
End Sub

[alka]

A giudicare dal contenuto della domanda, si direbbe che tu stia utilizzando VBA all'interno di Excel, pertanto ho corretto il titolo opportunamente; tuttavia, in futuro, specifica tu il linguaggio e la versione di riferimento così come è indicato nel Regolamento, di cui consiglio la lettura.

Leggi anche come formattare correttamente il codice sorgente nei messaggi, così da semplificarne la lettura e facilitare l'aiuto da parte degli altri utenti.

Ciao!