> Tous les forums > Forum Bureautique
 Supprimer x caractères dans plusieurs cellulesSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Morgane
  Posté le 16/04/2011 @ 12:56 
Aller en bas de la page 
Maîtresse astucienne

Bonjour à tous,

(Excel v.2007)

Est-ce qu'il a un truc pour supprimer ce que j'ai surligné en jaune et conserver le reste ? (Pour ensuite trier par ordre alphabétique)

En colonne B sur 381 lignes {#} en sachant qu'à la ½ du fichier les chiffres sont remplacés par des lettres, ex: Code:;SVMB;Description:;

Merci d'avance

Morgane

Publicité
ferrand
 Posté le 16/04/2011 à 13:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Une petite macro à copier et coller dans un module standard devrait faire l'affaire :

Sub EpurerChaine()
Dim c As Range, ch$, h%
For Each c In Selection
ch = c.Value
h = InStr(ch, ";")
Do While h > 0
ch = Right(ch, Len(ch) - h)
h = InStr(ch, ";")
Loop
c.Value = Trim(ch)
Next c
End Sub

Sélectionner la plage de cellules à traiter et la lancer.

NB: Elle est utilisable pour traiter toute chaîne dont la partie à conserver est celle qui suit le dernier caractère ";". On peut l'adapter facilement pour conserver la partie finale qui suit un caractère autre apparaissant pour la dernière fois dans la chaîne en remplaçant ";" par un autre caractère dans la macro.



Modifié par ferrand le 16/04/2011 13:37
Morgane
 Posté le 16/04/2011 à 13:27 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Maîtresse astucienne

Ferrand,

Je vais le tester un peu plus tard, je dois revoir comment on lance une macro

Je dois avoir çà dans mes suivis, galopin m'a déjà donné la procédure. Faut que je retrouve

@+ et merci.

ferrand
 Posté le 16/04/2011 à 13:35 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Morgane a écrit :

Ferrand,

Je vais le tester un peu plus tard, je dois revoir comment on lance une macro

Je dois avoir çà dans mes suivis, galopin m'a déjà donné la procédure. Faut que je retrouve

@+ et merci.

Dans Excel 2007, onglet Développeur, clic sur Visual Basic pour ouvrir l'éditeur VBA. Dans l'éditeur menu Insertion > Module pour créer un module standard dans lequel coller la macro.

Dans l'onglet Développeur à nouveau, clic sur Macros : sélection de la macro dans la boîte de dialogue, puis Exécuter. [Ceci après sélection de cellules à traiter.]

Bonne journée.

Morgane
 Posté le 16/04/2011 à 14:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Maîtresse astucienne

ferrand a écrit :

Dans Excel 2007, onglet Développeur, clic sur Visual Basic pour ouvrir l'éditeur VBA. Dans l'éditeur menu Insertion > Module pour créer un module standard dans lequel coller la macro.

Dans l'onglet Développeur à nouveau, clic sur Macros : sélection de la macro dans la boîte de dialogue, puis Exécuter. [Ceci après sélection de cellules à traiter.]

C'est tigidou

J'ai un peu galéré mais j'ai trouvé, il me manquait ceci entre les deux:

"Dans Visual Basic Editor, dans le menu Fichier, cliquez sur Fermer et retourner à Microsoft Excel lorsque vous avez fini d’écrire la macro"

Un grooooooooooooos merci

Bonne journée.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
chercher chaîne de caractères VBA dans plusieurs fichiers XL
dans excel, comment supprimer plusieurs dessins ?
Total de plusieurs cellules dans une autre
Récupération de caractères dans cellules
Supprimer l'apostrophe dans les céllules excel ?
[Extraction dans cellules]
Insérer un texte dans plusieurs champs avec Word
Relier des choix à des cellules dans excel
trier numéros dans plusieurs colonnes
Ecrir par macro dans des cellules différents
Plus de sujets relatifs à Supprimer x caractères dans plusieurs cellules
 > Tous les forums > Forum Bureautique