|
|
|
|
HABONIMANA Célestin, le lundi 24 octobre 2005 à 11:06:17Salut!
J'ai une solution, mais assez indirecte... mieux que rien en gros! 1)Selectionner la colonne contenant nom et prénom et la copier 2) Créer un nouveau fichier .txt avec le bloc note et copier la colonne dedans 3) Dans excel, Fichier=> Ouvrir=>Types de fichier "Tout les fichiers"=> tu ouvre le fichier texte .txt 4) L'assitant d'importation s'ouvre automatiquement, à la première étape tu choisis "délimité" et à la seconde étape d'importation tu coches "espace" 5) Tu as donc un nouveau fichier excel et tu n'as plus qu'à copier coller les colonnes dans ton premier fichier excel Le "hic" de cette méthode, c'est que avec les nom composés du genre" Jean de la bonne tambouille" Tu auras 5 colonnes... Tout dépend de la longueru de ta liste en espérant que il n'y ait pas trop de nom ou prénom composés!! Voilà c'est la seule méthode que j'ai à ta proposer en attendant que tu trouves mieux! |
Tu peux séparer nom et prénom mis dans une même cellule , à condition d'avoir un espace entre nom et prénom à l'aide de : DansChaîne
Je te joins un exemple que j'utilise dans un programme en excel 5, donc visual basic français ' recherche la position du premier espace MaPos = DansChaîne(1; Cellules(b; "b"); " ") ' cas du nom sans terminaison par la barre espace Si MaPos = 0 Alors ' affiche le nom complet Cellules(b + 1; "b") = Cellules(b; "b") Sinon ' affiche le début du nom Cellules(b + 1; "b") = Gauche(Cellules(b; "b"); MaPos) Fin Si Le même en VBA2000 donc en anglais ' recherche la position du premier espace MaPos = InStr(1, Cells(d, "b"), " ") ' cas du nom sans terminaison par la barre espace If MaPos = 0 Then ' affiche le nom complet Cells(d + 1, "b") = Cells(d, "b") Else ' affiche le début du nom Cells(d + 1, "b") = Left(Cells(d, "b"), MaPos) End If Ces exemples font partis d'une boucle. Tu peux adapter. |
Si le nom composé est dans la cellule D2 (par exemple), la formule suivant te permettra de rechercher le blanc qui sépare le nom et le prenom (ici on recherche le blanc et on inverse prenom nom)
tu peux ne prendre que droite.... ou gauche .... dans des cellules différentes =NOMPROPRE(SI(ESTERREUR(CHERCHE(" ";D2));D2;DROITE(D2;NBCAR(D2)-CHERCHE(" ";D2))&" " &GAUCHE(D2;CHERCHE(" ";D2)-1))) |
| 25/02 15h16 | Sed - Introduction à SED | Sed |
| 05/05 16h31 | Utiliser des accents et autres caractères spéciaux | Programmation |
| 18/03 12h29 | Exercice assembleur x86 inversion de chaine | x86 |
| 10/04 18h26 | Exercice assembleur x86 occurence d'un caractère | x86 |
| 03/05 17h50 | Connecter le PC à la chaîne hifi sans fil | Audio |
| 09/05 08h53 | Diviser chaine caractere excel | 4 |
| 26/05 11h56 | Excel effacer fin de chaine caractères | 3 |
| 21/09 17h12 | Vba Excel Chaine caractère recherche multiple | 7 |
| 12/06 10h44 | [VBA Excel] pbm chaine caracteres | 7 |
| 26/07 10h23 | Opérations sur chaîne caractère PHP | 6 |
![]() | Excel Viewer - Avec Microsoft Office Excel Viewer 2003, vous pouvez ouvrir, afficher et imprimer des classeurs Excel (fichiers XLS ), même... | Catégorie: Tableur Licence: Freeware/gratuit |
![]() | MOREFUNC (Macro complémentaire EXCEL) - Morefunc est une macro complémentaire proposant 67 nouvelles fonctions de feuille de calcul pour Excel. Ces fonctions sont... | Catégorie: Tableur Licence: Freeware/gratuit |
![]() | Ant Renamer - ANT Renamer permet de renommer un grand nombre de fichiers et dossiers en quelques clics. Il ne fait que modifier les noms... | Catégorie: Gestion de fichiers Licence: Freeware/gratuit |
![]() | Ms Word Excel Cracker - Ms Word Excel Craker est une application permettant de retrouver les mots de passe perdus ou oubliés pour les fichiers.xls... | Catégorie: Suite bureautique Licence: Freeware/gratuit |
![]() | God of War: Chains | Catégorie: Jeu vidéo PSP | 39.89 € PriceMinister |
![]() | Kingdom Hearts : Chain | Catégorie: Jeu vidéo Gameboy Advance | 34.45 € Amazon.fr |
![]() | Chaintech MK8T890 | Catégorie: Carte mère | 65.00 € PriceMinister |
![]() | Sony Micro Vault Excellence | Catégorie: Carte Mémoire / Clé USB | 72.51 € Amazon.fr |