Formule incorrecte

Chris24

XLDnaute Impliqué

• 27 Février 2018

• #2

Bonjour

Peut-être comme çà

If [D7]="Jean" And [G7]="Feuil6" Then​

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 27 Février 2018

• #3

papy 73 ans à dit:

Bonjour les amis,
Je ne m'en sors pas avec cette formule.

VB:

    Sheets("Param").Select
    If cells[D7] = "Jean" then And [G7])= "Feuil6" Then

Comment dois-je l'écrire svp.
En vous remerciant.

Cliquez pour agrandir...

Bonjour,

VB:

Sub test()
'Ce qu'il faut savoir pour une cellule
MsgBox [D7].Value
MsgBox Range("D7").Value
MsgBox Cells(7, 4).Value
'Ces 3 lignes de code font exactement la même chose
'Dans ton code, s'il faut comparer 2 cellules "D7" et "G7", le code sera
If [D7] = "Jean" And [G7] = "Feuil6" Then
MsgBox "[D7] = Jean et [G7] = Feuil6"
Else
MsgBox "[D7] <> Jean ou [G7] <> Feuil6"
End If
End Sub

 

Pièces jointes

• test cellule.xlsm

  17.9 KB · Affichages: 19

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 27 Février 2018

• #4

bonjour à tous,

petite astuce quand il s'agit de tester du texte
il bon de comparer en LCase() ou UCase()
à moins qu'il n'y ai un impératif !

exemple pour ici: si c'est "jean" ça ne passe pas !
If [D7] = "Jean" And [G7] = "Feuil6" Then

avec LCase()
If LCase([D7]) = "jean" And LCase([G7]) = "feuil6" Then
avec UCase()
If UCase([D7]) = "JEAN" And UCase([G7]) = "FEUIL6" Then

 

Dernière édition: 28 Février 2018

Vote positif 0 Vote négatif

papy 73 ans

XLDnaute Occasionnel

• 28 Février 2018

• #5

Bonsoir ou bonjour à vous,
Chris24, jacky67
Je vous remercie de vos réponse qui résolve mon problème.
Roland_M chapeau bas.

 

Dernière édition: 28 Février 2018

Vote positif 0 Vote négatif