Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel If And en VBA

If And en VBA

1 réponse
Avatar
Denys
Bonjour =E0 tous,

Je cherche =E0 =E9crire une formule en VBA avec If et And...=20
Voici ou j'en suis:

ActiveCell.Offset(, 20).Formula =3D "=3Dif(and
((activecell.offset(, 6).value)=3D"DPSP",((activecell.offset
(, 128).value)=3D"No",450,if(and(((activecell.offset(,=20
6).value)=3D"DPSP",((activecell.offset(, 128).value)=3D"Yes",0,
(activecell.offset(, 19)/12)"

En clair, ce que je souhaite c'est que si la cellule offset
(, 20)=3D DPSP et que la cellule offet(,128) =3D 0 alors la=20
cellule offset (, 20) =3D $450 Si la cellule offset(, 6)
=3DDPSP et que la cellule offset (, 128)=3D"Yes", alors on met=20
0, sinon on prend 450 * la valeur de activecell.offset(,=20
19)et divis=E9 par 12...

Ma formule en haut ne fonctionne pas. Quelqu'un parmi vous=20
saurait ou se trouve l'erreur?

Merci pour votre aide, d'autant plus que j'ai 6 autres=20
formules du m=EAme genre =E0 cr=E9er....

Bonne journ=E9e

Denys
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Denys
Désolé...

J'aurais dû y penser plus tôt.... je vais me servir des
valeurs textbox et combobox vu que ces données proviennent
d'un Userform..

If textbox8.value="DPSP" and combobox22="Yes" then....etc..

C'est plus facile ainsi.....Plus long mais plus facile..

Bonne journée

Denys



-----Original Message-----
Bonjour à tous,

Je cherche à écrire une formule en VBA avec If et And...
Voici ou j'en suis:

ActiveCell.Offset(, 20).Formula = "=if(and
((activecell.offset(, 6).value)="DPSP",((activecell.offset
(, 128).value)="No",450,if(and(((activecell.offset(,
6).value)="DPSP",((activecell.offset(, 128).value)
="Yes",0,

(activecell.offset(, 19)/12)"

En clair, ce que je souhaite c'est que si la cellule
offset

(, 20)= DPSP et que la cellule offet(,128) = 0 alors la
cellule offset (, 20) = $450 Si la cellule offset(, 6)
=DPSP et que la cellule offset (, 128)="Yes", alors on
met

0, sinon on prend 450 * la valeur de activecell.offset(,
19)et divisé par 12...

Ma formule en haut ne fonctionne pas. Quelqu'un parmi
vous

saurait ou se trouve l'erreur?

Merci pour votre aide, d'autant plus que j'ai 6 autres
formules du même genre à créer....

Bonne journée

Denys
.