Macro Valeurs € ??????????

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2011

• #2

Re : Macro Valeurs € ??????????

Bonjour,

sans doute que "100 €" est sans doute le résultat d'un format... essaye en testant la propriété "Text" de la cellule ....

bon après midi
@+

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 28 Juin 2011

• #3

Re : Macro Valeurs € ??????????

Bonjour, megansport

megansport à dit:

Bonjour à tous et à toutes

Je n'arrive pas à supprimer les lignes dns une colonne, je voudrais supprimer les valeurs comme par exemple "100 €" dans mon tableau, les macros que j'ai essayer ne reconnaissent pas la valeur je pense.

Cliquez pour agrandir...

Les colonnes contiennent des cellules.
Que signifie supprimer les valeurs ? Les effacer, supprimer la cellule, supprimer la ligne ?
Je ne connais pas ton tableau.
Quelles sont ces macros que tu as essayées ?

Si vous avez une solution ce serait sympa

Cliquez pour agrandir...

Sans fichier joint avec un minimum d'explication, ce serait plus que sympa, ce serait ...miraculeux!

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #4

Re : Macro Valeurs € ??????????

Merci pour vos réponse
Voici un fichier
Merci

 

Pièces jointes

• ess.xlsx

  8.2 KB · Affichages: 60

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2011

• #5

Re : Macro Valeurs € ??????????

Re,

as tu essayé ma proposition ???

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #6

Re : Macro Valeurs € ??????????

j'ai essayer mais rien ne marche ça le "fait dans le vide"

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2011

• #7

Re : Macro Valeurs € ??????????

Re,

vois pas de code dans ton fichier, et sous 207 pour qu'excel gère des macros il faut du xlsm et non du xlsx....

ceci fonctionne chez moi :

Code:

If ActiveCell.Text Like "*€" Then ActiveCell.ClearContents

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 28 Juin 2011

• #8

Re : Macro Valeurs € ??????????

Re, bonjour, Pierrot93

Bon, on avance : on a déjà le fichier...🙂

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #9

Re : Macro Valeurs € ??????????

Re salut
J'ai essayer d'integrer le code mais il me supprime seulement la 1er ligne,je bloque complet ou c'est la fin de la journée
Merci pour votre aide

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 28 Juin 2011

• #10

Re : Macro Valeurs € ??????????

Re,

megansport à dit:

...mais il me supprime seulement la 1er ligne

Cliquez pour agrandir...

Normal, si ta cellule active (ActiveCell) est sur la 1° ligne...

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #11

Re : Macro Valeurs € ??????????

ok mais si je veut que cela se fasse sur la feuille, je doit mettre " activecell column<>1" non?
Mon niveau n'est pas si haut en macro soyez compatissant
Merci de votre aide

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #12

Re : Macro Valeurs € ?????????? besoin d'aide

Please s'il vous plait besoin d'aide

 

Vote positif 0 Vote négatif

patsyl60

XLDnaute Occasionnel

• 28 Juin 2011

• #13

Re : Macro Valeurs € ?????????? besoin d'aide

Bonsoir à tous,

Une solution en passant :

Code:

Sub test()
For i = 20 To 1 Step -1
If Range("A" & i).Text Like "*€" Then Range("A" & i).ClearContents
Next i
End Sub

A adapter selon tes besoins ...

Bonne fin de journée.

Patsyl60

 

Vote positif 0 Vote négatif

M

megansport

Guest

• 28 Juin 2011

• #14

Re : Macro Valeurs € ??????????

merci c'est ok, une derniere chose est possible de supprimer la ligne?
Merci

 

Vote positif 0 Vote négatif

patsyl60

XLDnaute Occasionnel

• 28 Juin 2011

• #15

Re : Macro Valeurs € ??????????

Re,

A tester :

Code:

Sub test()
 For i = 20 To 1 Step -1
 If Range("A" & i).Text Like "*€" Then Rows(i).Delete
 Next i
 End Sub

Bonne soirée.

Patsyl60

 

Vote positif 0 Vote négatif