macro de suppression de texte

gimli

XLDnaute Occasionnel

• 26 Mai 2010

• #2

Re : macro de suppression de texte

Bonjour,

j'espère avoir bien compris ta requète, si c'est le cas essaye ceci :

Function RetirerParenthèsesEtContenu()
RowCount = Cells(Cells.Rows.Count, "NomColonne").End(xlUp).Row
For r = RowCount To 2 Step -1
Range("NomColonne" & r).Select
verif = ActiveCell.Value
verif1 = Left(verif, 1)
If verif1 = "(" Then
Rows(r).Delete 'EDIT: cette ligne de code fera supprimer la ligne, ce n'est pas ce que tu veux, il faudra la modifier.
End If
Next r

End Function

je ne suis pas sûr, mais tu peux essayer 😱

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 26 Mai 2010

• #3

Re : macro de suppression de texte

Salut _papa, le Forum

Par Formule

Code:

=GAUCHE(A1;TROUVE("*";A1;1)-1)

A incrémenter vers le Bas

EDITION: Re Gimli

Bonne Journée

 

Pièces jointes

• _papa1.xls

  17 KB · Affichages: 85

Dernière édition: 26 Mai 2010

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #4

Re : macro de suppression de texte

Merci de votre réponse mais lorsque je vais dans "fonction", il n'y en a aucune qui s'appelle "retirer".

 

Vote positif 0 Vote négatif

H

Habitude

XLDnaute Accro

• 26 Mai 2010

• #5

Re : macro de suppression de texte

Tu sélectionne ta colonne

Données
Convertir
Délimité
Dans séparateur tu tappe Autres et tu met *

 

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #6

Re : macro de suppression de texte

Dull à dit:

Salut _papa, le Forum

Par Formule

Code:

=GAUCHE(A1;TROUVE("*";A1;1)-1)

A incrémenter vers le Bas

EDITION: Re Gimli

Bonne Journée

Cliquez pour agrandir...

Merci, mais dans quelle cellule dois-je saisir cette formule ?

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 26 Mai 2010

• #7

Re : macro de suppression de texte

Re, (décidément Dull on se croise souvent ^^)

c'est normal que tu ne la vois pas puisque ce n'est pas une fonction "intégrée" à Excel, c'est une fonction que tu crées toi-même 😉
mais comme je l'ai précisé je ne pense pas qu'elle réponde à tes attentes, du moins pas complêtement .

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 26 Mai 2010

• #8

Re : macro de suppression de texte

Re le Fil, Salut Habitude

J'ai remis le Fichier pour plus de compréhension ICI

Bonne Journée

 

Dernière édition: 26 Mai 2010

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #9

Re : macro de suppression de texte

Habitude à dit:

Tu sélectionne ta colonne

Données
Convertir
Délimité
Dans séparateur tu tappe Autres et tu met *

Cliquez pour agrandir...

J'ai essayé cette technique, mais je n'ai pas de fenêtre "séparateur" dans données/convertir/délimité.
(je suis sur Excel 2007)

 

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #10

Re : macro de suppression de texte

gimli à dit:

Re, (décidément Dull on se croise souvent ^^)

c'est normal que tu ne la vois pas puisque ce n'est pas une fonction "intégrée" à Excel, c'est une fonction que tu crées toi-même 😉
mais comme je l'ai précisé je ne pense pas qu'elle réponde à tes attentes, du moins pas complêtement .

Cliquez pour agrandir...

D'accord, mais dans ce cas, si je la crée moi-même, où dois-je la saisir ?
Comment fait-on pour créer une fonction ?

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 26 Mai 2010

• #11

Re : macro de suppression de texte

Tout d'abord tu fais ALT+F11, tu arriveras dans la page de code. Ensuite, si tu veux que ce que tu souhaite supprimer soit supprimé dès l'ouverture du fichier, tu place le code de ta fonction dans ThisWorkbook (sur la gauche dans le menu code 😉 ). ensuite sauvegarde , quitte et relance ton fichier, ou alors fais un déboguage 🙂

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 26 Mai 2010

• #12

Re : macro de suppression de texte

Re le Fil

Regardes le Fichier Ici

Bonne Journée

 

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #13

Re : macro de suppression de texte

Dull à dit:

Re le Fil

Regardes le Fichier Ici

Bonne Journée

Cliquez pour agrandir...

Merci de votre aide et du fichier, mais ça ne fonctionne toujours pas.
Comme vous le voyez sur le fichier en pj, j'ai bien reporter votre formule sur les cellules inférieures mais j'ai un message d'erreur.

 

Pièces jointes

• _papa1(1).xls

  20 KB · Affichages: 54

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 26 Mai 2010

• #14

Re : macro de suppression de texte

Re le Fil

Remplace la Formule en B1 par Celle-ci et incrémente vers le Bas

Code:

=GAUCHE(A1;TROUVE("(";A1;1)-2)

Bonne Journée

 

Pièces jointes

• _papa2.xls

  25 KB · Affichages: 67

Vote positif 0 Vote négatif

P

_papa

XLDnaute Nouveau

• 26 Mai 2010

• #15

Re : macro de suppression de texte

Dull à dit:

Re le Fil

Remplace la Formule en B1 par Celle-ci et incrémente vers le Bas

Code:

=GAUCHE(A1;TROUVE("(";A1;1)-2)

Bonne Journée

Cliquez pour agrandir...

Cette fois, oui, ça fonctionne. Merci Dull.
Bonne soirée

 

Vote positif 0 Vote négatif