Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

***Contare i caratteri inseriti con excel***

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

***Contare i caratteri inseriti con excel***

Postdi ProbePotter » 03/02/08 17:21

Salve, inserendo sempre dei numeri alfanumerici del tipo aa321151401 (11 Caratteri) può
capitare di errare la lunghezza del numero, in questo caso vorrei un MsgBox che mi avvertisse
che il numero dei caratteri inserito è di 12 (>)oppure 10 (<) , quindi errato.
Ho realizzato una cosa del genere ma funziona solo in B2. Mentre il controllo mi occorre con
Range ("B2:B6000"). Grazie

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rCell As Range

MsgBox "il testo è lungo" & Len(Range("A1")) & " caratteri"


End Sub
Avatar utente
ProbePotter
Utente Senior
 
Post: 159
Iscritto il: 20/09/06 18:37

Sponsor
 

Re: ***Contare i caratteri inseriti con excel***

Postdi Anthony47 » 04/02/08 14:37

Il sistema piu’ diretto e’ di stabilire una “Convalida” sulle celle B2:B6000.
Per questo: selezioni le celle; poi Menu /Dati /Convalida; tab Impostazioni; scegli consenti=Lunghezza testo, dati=uguale a, lunghezza=11; magari imposti su Messaggio di input qualcosa come “Codice parte, 11 crt!” (sara’ visualizzato quando selezioni una delle celle); se vuoi imposti anche il Messaggio di errore; completi con Ok.

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: ***Contare i caratteri inseriti con excel***

Postdi ProbePotter » 04/02/08 16:37

Ciao Anthony, il Tuo suggerimento funziona se si scrive direttamente sul Foglio di excel.
Purtroppo nel mio caso (scusa non lo avevo menzionato prima), i dati vengono inseriti
tramite uno UserForm VBA Application di excel. Ho fatto una prova ed ignora il parametro
"Convalida dati". Cortesemente hai qualche altro suggerimento ? Provo anch' Io, ma sono
a un "Binario ... morto".
Grazie
Avatar utente
ProbePotter
Utente Senior
 
Post: 159
Iscritto il: 20/09/06 18:37

Re: ***Contare i caratteri inseriti con excel***

Postdi Anthony47 » 04/02/08 16:57

Allora devi inserire nel codice di controllo della form la verifica che la lunghezza di quel campo e' corretta; qualcosa come
Codice: Seleziona tutto
If Len(TextBox1) <> 11 Then
MsgBox ("Errore di lunghezza campo")
'. . .
Exit sub
End If

E' un esempio che va mappato sulla tua form e relativo codice.

Trovi lo spunto?
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: ***Contare i caratteri inseriti con excel***

Postdi ProbePotter » 05/02/08 18:42

Ciao Anthony, sto provando il Tuo codice ma ancora non riesco a farlo funzionare
come vorrei. Praticamente l' istruzione deve comprendere YesNo se Yes inserisce
i dati se No ....è qui che sto provando.
Avatar utente
ProbePotter
Utente Senior
 
Post: 159
Iscritto il: 20/09/06 18:37

Re: ***Contare i caratteri inseriti con excel***

Postdi Anthony47 » 05/02/08 19:59

Eventualmente posta il codice che usi per effettuare l' input da form a foglio.

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "***Contare i caratteri inseriti con excel***":


Chi c’è in linea

Visitano il forum: Nessuno e 20 ospiti