codice fiscale

Question

è possibile inserire automaticamente gli spazi tra i gruppi di carattere nei codici fiscali scritti tutti di seguito?

grazie

Answer 1

Ciao

in un modulo 

Sub DIVIDI()

CONC = Range("A" & Rows.Count).End(xlUp).Row

For i = 2 To CONC

If Cells(i, 1) <> "" Then

Cells(i, 1) = Mid(Cells(i, 1), 1, 3) & " " & Mid(Cells(i, 1), 4, 3) & " " & Mid(Cells(i, 1), 7, 2) & " " & Mid(Cells(i, 1), 9, 1) _

& " " & Mid(Cells(i, 1), 10, 2) & " " & Mid(Cells(i, 1), 12, 4) & " " & Mid(Cells(i, 1), 16, 1)

End If

 Next

End Sub

puoi abbinarla ad un pulsante

o inserirla sul foglio all'evento che ti interessa.

la cella  A1 è stata volutamente ignorata per permetterti

di controllare il funzionamento.

per includerla basta variare

For i = 2 To CONC

in

For i = 1 To CONC

https://www.dropbox.com/s/9xve9tzm0xsnd2p/inserire%20spazi%20irregolari%20su%20stringa.xlsm?dl=0

Answer 2

Ciao Renzo,

ci scusiamo per il ritardo della risposta dovuto da un elevato numero di richieste di supporto ma siamo qui per aiutarti.

Nel tuo messaggio ci dici di voler inserire automaticamente uno spazio tra i caratteri del codice fiscale che inserisci in un foglio Excel giusto?

Per questo motivo vorrei innazitutto chiederti quale versione di Office stai utilizzando. Per scoprirlo apri una delle app e recati in File>Account. Sulla destra ti apparirà una schermata con la tua versione di Office.

A ogni modo, come potrai leggere in questa guida, attraverso la funzione CONCATENA, sarebbe possibile collegare in automatico il testo in due celle separandole con uno spazio.

Credo che questo possa fare al tuo caso ma aper ricevere suggerimenti e consigli da parte di un team di esperti al riguardo ti suggerisco di postare la tua domanda sul forum dedicato di Msdn che puoi trovare qui.

Facci sapere come procede e ricorda che siamo qui per ogni domanda,

Claudia