La consultazione del forum è libera per tutti.
Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).
Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.
Ciao,
un'informazione. Faccio parte di un'associazione di volontariato. Devo fare elenchi con nomi e cognomi, sia soci che partecipanti alle varie attività. Negli anni ho "costruito" un file excel che soddisfi alle mie esigenze. Ho l'accesso anche ad un gestionale di proprietà dell'associazione nazionale. Da li acquisisco un file in *.xls con i dati anagrafici, questi dati li copio successivamente nel mio file, dal quale posso produrre i vari elenchi. I dati presenti in questo file *.xls (il file acquisito dal gestionale) sono privi dei caratteri accentati (mancano accenti, apostrofi e quant'altro). Di conseguenza quando li copio nel mio file personale le formule impazziscono perchè non trovano corrispondenza e io perdo associati. Ho contattato la segreteria ma riferisce che il programma è datato e al momento non c'è soluzione, suggerisce di cercare in rete se c'è qualche programma adatto. Avete qualche suggerimento?
Grazie.
Alessandro
ciao
forse un controllo ortografico ma
onestamente dubito ci sia qualche cosa di specifico.
prova a scrivere un campione di errori che trovi e vediamo
se si può fare qualche cosa
Grazie,
infatti dubito anche io ma ..... è "fastidioso" come problema e se riuscissi a risolverlo sarebbe un grande risultato, visto che sto perdendo tempo a gratis per un problema del programma.
Diciamo che sono nomi e cognomi.
Es.:
Dall'Amore Nicolò diventa Dallamore Nicolo
Dall'Acqua Niccolò diventa Dallacqua Niccolo
Rossi-Verdi Desirè diventa Rossiverdi Desire
Diciamo che i caratteri accentati "spariscono" e ne ho parecchi e sempre di più perchè un tempo c'era Nicola e ora Nicolò, c'era Mario e adesso c'è Mariò.
Il problema deriva dal fatto che i dati estratti da questo file sul gestionale io li devo comparare con i dati che derivano da un form di google (con i dati originali e corretti) e quindi excel "perde" tutti questi nomi e cognomi. Da google deriva Nicolò e dal file del gestionale Nicolo. Quindi negli elenchi che devo costruire quel nome li è "perso".
Grazie
ciao
l'unica cosa che mi viene in mente
è eliminare tutti gli spazi virgole accenti dalla lista di goggle e gli spazi dalla tua lista
ecco che con un cerca verticale o un indice confronta hai la possibilità di sistemarli
se mi metti un mini file con la struttura esatta che hai vediamo di provare
Ciao,
Grazie mille. Porta pazienza per il ritardo ma ho parecchie incombenze associative. In giornata preparo due elenchi esemplificativi e te li invio. non è niente di urgente anzi, se ci riesci altrimenti vado avanti cosi. diciamo che anche ieri ho dovuto acquisire dei dati: invece di acquisire tutto l'elenco completo con l'incombenza di variare tutti i caratteri sono riuscito ad estrapolare solo gli ultimi quindi non ho dovuto modificare nulla. Grazie.
Eccolo.
come vedi il foglio "gestionale" che riporta i dati estratti del gestionale mancano di tutti i caratteri accentati e quindi non riesco a confrontarli e ad acquisire i dati già presenti sul gestionale. Ma
... se riesci altrimenti vado avanti cosi. Era per comodità e velocità.
Grazie
Alessandro
ciao
usa questo per le ricerche
=SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(A3:A18;"ì";"i");"à";"a");"ù";"u");"ò";"o");"è";"e");"-";"");"'";"")
Ciao
Non so se può esserti utile ma questa macro fa quello che chiedi (da utilizzare per il Foglio"Google)
Option Explicit
Sub Dividi()
Dim ur As Long, i As Long, j As Long, a As Long
Dim nome As String, nLet As Integer, nLen As Integer
ur = Cells(Rows.Count, 1).End(xlUp).Row
Range("L:N").ClearContents
For i = 3 To ur
a = 11
nome = Cells(i, 1)
nLen = Len(nome)
For j = 1 To nLen
nLet = Asc(Mid(nome, j, 1))
If nLet >= 65 And nLet <= 90 Then
a = a + 1
Cells(i, a) = Cells(i, a) & Mid(nome, j, 1)
Else
Cells(i, a) = Cells(i, a) & Mid(nome, j, 1)
End If
Next j
Next i
End Sub
Fai sapere. Ciao,
Mario
Grazie mille.
ora la adatto al file e poi provo.
Grazie
