condition

Le
Pascal
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then..
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then..
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer..
Pascal
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Pascal
Le #16493791
il faut lire
len(.range("W3") donne 9 pour "24/06/1992" et len de X donne 0 au lieu de
> si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
> le test se fait différemment sur une date?
sorry


"Pascal" ,com> a écrit dans le message de groupe de
discussion : u0zyIiG#
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal





Jacquouille
Le #16493921
Bonjour Pascal

Plaise à Pascal que je lui livre mes Pensées.

if (.Range("W3")>0 .Que donnera cela si W3 est "occupée" par un caractère
vide (car32, sauf erreur)?
Et si W3=0,2 ?

Perso, j'ai adopté l'othographe de AV, soit If [W3]>0 --> moins de
risque d'oubli de points, parenthèses ou autre truc.

Pourquoi ne pas faire --> si nbcar(W3)<>0 ---> indiquera si W3 est vide ou
non. Idem pour X
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



AMHA, que la cel contienne une date ou non ne changera rien, puisque Excel
considère une date comme un nombre (nb de jours écoulés depuis le 1/1/1900).
Bien faire attention que valeur = 0 ne veut pas dire cel vide.

Bonne chance

--
Bien amicalmement,
"Le vin est au repas ce que le parfum est à la femme."

Jacquouille.

"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal





Jacky
Le #16494001
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] & Chr(10)
& "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] & Chr(10)
& "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal





Pascal
Le #16494201
hello jacquouille,
merci pour ton intervention
nbcar traduit en vba est bien LEN
j'utilise len aussi et cela ne fonctionne pas du tout
voici une partie du code
********************************************************
If Len((.Range("W" & PositionLigne)) > 0 And Len(.Range("X" &
PositionLigne))) = 0 Then
MontantEntr = .Range("v" & PositionLigne)
Me.ChkEntrainement.Caption = "Entrainement(s) " &
Format(MontantEntr, "##,##0.00¤")
End If
*********************************************************
si je test avec un msgbox (len sur w ou sur X )dans le cas présent j'ai bien
W = 9 et X=0
mais dans la condition elle ne passe pas, je ne me trompe pourtant pas
cordialement
pascal

"Jacquouille" groupe de discussion : uuppACH#
Bonjour Pascal

Plaise à Pascal que je lui livre mes Pensées.

if (.Range("W3")>0 .Que donnera cela si W3 est "occupée" par un
caractère vide (car32, sauf erreur)?
Et si W3=0,2 ?

Perso, j'ai adopté l'othographe de AV, soit If [W3]>0 --> moins de
risque d'oubli de points, parenthèses ou autre truc.

Pourquoi ne pas faire --> si nbcar(W3)<>0 ---> indiquera si W3 est vide
ou non. Idem pour X
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



AMHA, que la cel contienne une date ou non ne changera rien, puisque Excel
considère une date comme un nombre (nb de jours écoulés depuis le
1/1/1900).
Bien faire attention que valeur = 0 ne veut pas dire cel vide.

Bonne chance

--
Bien amicalmement,
"Le vin est au repas ce que le parfum est à la femme."

Jacquouille.



Pascal
Le #16494181
hello jacky,
cette condition comme disait aussi jacquouille fonctionne
If [w3] <> "" And [X3] = "" Then

je ne connaissais pas du tout et ne comprend pas pourquoi cela fonctionne
ainsi!
de cela découle une autre question
comment mettre [W & mavariable]
merci à vous deux pour cette technique
cordialement
Pascal

"Jacky" #qrXlEH#
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal









Jacky
Le #16494411
Re...
merci à vous deux pour cette technique


Helas! , ne fonctionne pas avec une variable..;...o(
'-----------
MaVariable = 3
If Range("W" & MaVariable) <> "" And Range("X" & MaVariable) = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] & Chr(10)
& "X3=" & [X3]
End If

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
e79DITH%
hello jacky,
cette condition comme disait aussi jacquouille fonctionne
If [w3] <> "" And [X3] = "" Then

je ne connaissais pas du tout et ne comprend pas pourquoi cela fonctionne
ainsi!
de cela découle une autre question
comment mettre [W & mavariable]
merci à vous deux pour cette technique
cordialement
Pascal

"Jacky" : #qrXlEH#
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal












Pascal
Le #16494581
hello jacky,
ce que tu me proposes c'est la première chose que j'ai faite!

par contre en lisant ton poste, je remarque une erreur de parenthèse
If Len((.Range("W" & PositionLigne)) > 0 And Len(.Range("X" &
PositionLigne))) = 0 Then

il faut lire
If Len((.Range("W" & PositionLigne)) > 0 And Len(.Range("X" &
PositionLigne)) = 0) Then

sorry à vous tous, mais au moins j'ai résolu mon problème et de 2 j'ai
appris [W3] MERCI

cordialement
Pascal



"Jacky" e#VmBYH#
Re...
merci à vous deux pour cette technique


Helas! , ne fonctionne pas avec une variable..;...o(
'-----------
MaVariable = 3
If Range("W" & MaVariable) <> "" And Range("X" & MaVariable) = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
e79DITH%
hello jacky,
cette condition comme disait aussi jacquouille fonctionne
If [w3] <> "" And [X3] = "" Then

je ne connaissais pas du tout et ne comprend pas pourquoi cela fonctionne
ainsi!
de cela découle une autre question
comment mettre [W & mavariable]
merci à vous deux pour cette technique
cordialement
Pascal

"Jacky" discussion : #qrXlEH#
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10) & "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal
















michdenis
Le #16494901
Il y a ceci :


Tu peux utiliser une fonction personnalilsée comme ceci :

'--------------------------------------
Sub tets()

MsgBox EstVide(Range("A1"))

End Sub
'--------------------------------------
Function EstVide(Rg As Range) As Boolean
Dim Erreur As String
EstVide = True
On Error GoTo Erreur
If IsError(Rg * 1) Then
EstVide = False
End If
Exit Function
Erreur:
Err.Clear
EstVide = False
End Function
'--------------------------------------





"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal
michdenis
Le #16494891
As-tu testé ce que retourne [X3] = "" lorsque X3 contient
seulement par exemple le caractère "guilemet simple"
qui indique en outre que le contenu de la cellule est au
format texte.

Est-ce que tu considères la cellule vide ? ton test répond
que la cellule est vide... mais pas "vierge"
C'est aussi vrai pour l'usage de Len([X3]) qui retourne 0
alors qu'il y a toujours un petit caractère.





"Jacky" %23qrXlEH%
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] & Chr(10)
& "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] & Chr(10)
& "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal





Pascal
Le #16495141
Bonjour, MichDenis,
Je viens de faire le test avec le caractère guillemet simple ....
merci de cette énorme précision
et pour la fonction également
cordialement

pascal


"michdenis" discussion : O4o1suH#


As-tu testé ce que retourne [X3] = "" lorsque X3 contient
seulement par exemple le caractère "guilemet simple"
qui indique en outre que le contenu de la cellule est au
format texte.

Est-ce que tu considères la cellule vide ? ton test répond
que la cellule est vide... mais pas "vierge"
C'est aussi vrai pour l'usage de Len([X3]) qui retourne 0
alors qu'il y a toujours un petit caractère.





"Jacky" %23qrXlEH%
Bonjour,
je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide



Testes ceci:
'-------------
If [w3] <> "" And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10)
& "X3=" & [X3]
End If
'----------ou cela-----
If IsDate([w3]) And [X3] = "" Then
MsgBox "les 2 conditions sont ok"
Else
MsgBox "les 2 conditions ne sont pas ok" & Chr(10) & "w3=" & [w3] &
Chr(10)
& "X3=" & [X3]
End If
End Sub
'----------

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:
u0zyIiG%
bonjour,
je remarque que mon calcul ne se fait pas comme il devrait
if (.Range("W3")>0 And .Range("X3") = 0 Then.................
ou bien ceci
if (.Range("W3") <>"" And .Range("X3") = "" Then.................
la condition n'est JAMAIS remplie???

je veux tout simplement tester si W est une cellule non vide et X une
cellule Vide
Si W contient une date et que X n'en contient pas
elles sont au format date toutes les deux cela aurait-il une influence?

si je fais len(.range("W3")) j'ai bien 0 et len de X aussi
le test se fait différemment sur une date?

si vous pouvez m'éclairer........
Pascal









Publicité
Poster une réponse
Anonyme