Discussion :

[juju05]

Bonjour,

Je souhaite transférer certaines lignes discontigües d'une feuille vers une autre feuille du même classeur.

Le critère est la valeur contenue dans la cellule V de chaque ligne. Si la valeur est égale à 0 je souhaite la transférer sinon la garder. La valeur contenue dans la cellule V n'est pas formattée. J'ai essayer de la formatter sur 5 caractères et de tester la valeur en value directement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if macellule.value = "0,00000" then

mais cela ne fonctionne pas.

Je ne peux pas intervenir sur le programme qui a généré cette valeur.

Je ne sais pas comment faire ?

Merci d'avance.

Julien.

[illight]

Qu'entend tu par "non formatée" ? c'est du texte actuellement ? tu as essayé avec la fonction CInt, qui permet de convertir en entier ?

Tu veux faire quoi au final ?

[Thautheme]

Bonjour Juju, bonjour le forum.

Pourquoi ne nous dis-tu pas directement ce qu'il y a dans dans la cellule (touche [F2], dans la zone de formule , copier/coller), il y a parfois des espaces ou, plus vicieux encore, des caractères qui sont comme des espaces mais qui ne correspondent pas à la touche [Espace]. Quel est le format ?
Le plus simple encore serait un fichier exemple ! Sinon on risque de tourner en rond...

[juju05]

Le problème se trouve dans la feuille 'STOCKS'. La cellule V est issue d'une formule. La macro. que je lance se trouve derrière le bouton "transférer".
Je n'ai conservé qu'une ligne pour l'exemple. Je souhaite transférer les lignes de la feuille "STOCK" dont la valeur de la cellule V est 0 (pas 0,0001) vers la feuille TRANSFERT.

[Thautheme]

Bonjour Juju, bonjour le forum,

Désolé, c'est trop complexe pour mon petit niveau, je passe la main...

[Marc-L]

Bonjour, bonjour !

Le formatage d'une cellule ou pas ne change rien à son contenu !

Quant à la problématique nouvellement exposée, tout est dans le tutoriel Les filtres avancés ou élaborés dans Excel …

__________________________________________________________________________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …

[Docmarti]

Le problème se trouve dans la feuille 'STOCKS'. La cellule V est issue d'une formule. La macro. que je lance se trouve derrière le bouton "transférer".
Je n'ai conservé qu'une ligne pour l'exemple. Je souhaite transférer les lignes de la feuille "STOCK" dont la valeur de la cellule V est 0 (pas 0,0001) vers la feuille TRANSFERT.

Nonobstant les excellents conseils déjà donnés ci-dessus, il faut savoir que les valeurs de ta colonne V sont des nombres et non des String.
Et donc que la propriété VALUE des cellules ne sera jamais égale à "0,00000" mais pourra être égale à 0.
C'est la propriété TEXT des cellules qui pourra être égale à "0,00000" ou à autre chose selon le format de la cellule.
La propriété VALUE des cellules contenant des nombres n'est pas modifiée par le format.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 Worksheets("STOCKS").Range("V" & i).Value
 3430,68 
?Worksheets("STOCKS").Range("V" & i).text
3430,68000
?Worksheets("STOCKS").Range("V" & i).formula
=IF(L3=0,U3,L3)
?Worksheets("STOCKS").Range("V" & i).numberformat
0.00000

Donc remplace ton code de comparaison qui compare VALUE avec "0,00000"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Trim(Worksheets("STOCKS").Range("V" & i).Value) = "0,00000" Then

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  If Worksheets("STOCKS").Range("V" & i).Value = 0 And Worksheets("STOCKS").Range("V" & i).Value <> "" Then

qui compare VALUE avec 0 et s'assure que la cellule n'est pas vide.