Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Cerca.vert - annullare spazi.

Ultimo Aggiornamento: 02/04/2019 22:38
Post: 187
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
29/03/2019 19:56

Ciao, ho due elenchi da "incrociare". ho usato la funzione cerca.vert per verificare se i nominativi del primo elenco sono presenti nel secondo, ho creato una colonna che concatena cognome e nome. e tutto funziona tranne quando il nome è doppio: ROSSI ANNA MARIA PAOLA. in questo caso la funzione cerca.vert non funziona. il valore da cercare è ROSSIANNA MARIA PAOLA e non viene trovata. Ho provato con annulla spazi prima del cercavert ma niente da fare. Grazie
Post: 674
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
30/03/2019 06:53

Ciao
credo che dovresti usare la funzione CONFRONTA e non il CERCA.VERT
Comunque sarebbe meglio avere un file (senza dati sensibili) sottomano.

Ciao,
Mario
Post: 187
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
30/03/2019 09:18

Ciao,
ora nel file allegato....funziona. non so che dire. Ho scritto dei nomi fittizi e funziona. Ma nel mio che ovviamente è più complesso....ci sono circa 500 nomi non funziona. Grazie
Post: 1.756
Registrato il: 10/10/2013
Città: VICENZA
Età: 69
Utente Veteran
365
OFFLINE
30/03/2019 09:54

ciao
non vedendo i veri nomi
è difficile rispondere


prova nella tabella soci

a creare una colonna nascosta e usa il sostituisci

=SOSTITUISCI([@Cognome]&[@Nome];" ";"")

e nel cerca verticale
=SE.ERRORE(CERCA.VERT(SOSTITUISCI([@[Cognome&Nome]];" ";"");soci!C:I;7;0);"NON ISCRITTO")

Post: 188
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
30/03/2019 10:30

grazie. non ho usato una colonna nascosta ma nella colonna Cognome&Nome ho inserito il "sostituisci", c'è un motivo per cui dovrei creare la colonna nascosta? non vorrei sbagliare..... grazie. Ora funziona...meglio, mancano alcune corrispondenze di nome, ad esempio VERDI ANTONIO F.M. ma ne ho due/tre che posso gestire a "mano". Grazie.
Post: 271
Registrato il: 11/07/2015
Età: 33
Utente Junior
office 2013-2016
OFFLINE
30/03/2019 12:56


Buon giorno

soci-Verifiche

H3=SE(E([@Cognome]<>"";[@Nome]<>"");SE(VAL.NUMERO(CONFRONTA([@Cognome]&[@Nome];soci!$D$3:$D$100&soci!$E$3:$E$100;0));"iscritto";"non iscritto");"")

copia in basso

Allego file

Saluti
[Modificato da Ulisse1990 30/03/2019 12:56]
Post: 189
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
30/03/2019 13:11

direi perfetta. grazie
Post: 117
Registrato il: 03/10/2015
Città: ALBAREDO PER SAN MARCO
Età: 43
Utente Junior
2003
OFFLINE
02/04/2019 21:27

Dim x As Long
x = Range("B63556").End(xlUp).Row
For i = 1 To x
Cells(i, 3) = Application.Clean(Application.Trim(Cells(i, 3)))
Cells(i, 4) = Application.Clean(Application.Trim(Cells(i, 4)))
Cells(i, 5) = Application.Clean(Application.Trim(Cells(i, 5)))
Cells(i, 6) = Application.Clean(Application.Trim(Cells(i, 6)))
Cells(i, 7) = Application.Clean(Application.Trim(Cells(i, 7)))
Cells(i, 8) = Application.Clean(Application.Trim(Cells(i, 8)))
Cells(i, 9) = Application.Clean(Application.Trim(Cells(i, 9)))
Next

On Error Resume Next
Columns(3).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(4).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(5).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(6).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(7).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(8).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
End Sub
Sub Macro1()
Dim x As Long
x = Range("B63556").End(xlUp).Row
For i = 1 To x
Cells(i, 3) = Application.Clean(Application.Trim(Cells(i, 3)))
Cells(i, 4) = Application.Clean(Application.Trim(Cells(i, 4)))
Cells(i, 5) = Application.Clean(Application.Trim(Cells(i, 5)))
Cells(i, 6) = Application.Clean(Application.Trim(Cells(i, 6)))
Cells(i, 7) = Application.Clean(Application.Trim(Cells(i, 7)))
Cells(i, 8) = Application.Clean(Application.Trim(Cells(i, 8)))
Cells(i, 9) = Application.Clean(Application.Trim(Cells(i, 9)))
Next

On Error Resume Next
Columns(3).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(4).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(5).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(6).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(7).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
Columns(8).Replace What:=Chr(160), Replacement:="", LookAt:=xlPart
End Sub
Ciao Alex prova con questa macro e quando il nome è doppio
ROSSIANNA MARIA PAOLA
ROSSI ANNA MARIA PAOLA la funzione concatena non funziona perché trova sempre il primo dato nell'archivio.Ciao Matteo
Post: 190
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
02/04/2019 22:19

Grazie Matteo,
dopo provo ma non riesco a far funzionare le macro....ho excel per mac e non riesco a farle funzionare. Mi spiace.
Grazie comunque, nel caso riuscissi a farle funzionare (ne ho una di molto importante....che sarei contentissimo funzionasse...) la tua sarà installata di sicuro. Se conoscessi excel per mac.........
Grazie.
Post: 191
Registrato il: 24/12/2016
Utente Junior
Excel per Mac vers. 16.17
OFFLINE
02/04/2019 22:38

infatti...non va. grazie mille lo stesso. vedrai che prima o poi.....ci riesco. la tengo salvata. grazie
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 11:29. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com