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 mise en forme sous condition

mise en forme sous condition

7 réponses
Avatar
lorant
bonjour =E0 tous

j'ai un petit probl=E8me sur une boucle de condition que=20
voici :

Sub test()


For G =3D 15 To 154
If Worksheets(1).range("u" & G) =3D "A" Then
Worksheets(G - 13).range("d33") =3D "oui"
Else
Worksheets(G - 13).range("d33") =3D "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne en=20
compte deux caract=E8re plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) =3D "A" ou "B" then....

j'ai fait plusieurs tentative mais la syntaxe n 'est pas=20
bonne ( je suis pas tres bon en VBA)=20
est ce que quelqu'un peu me renseigner?
merci d'avance
Signaler un problème avec ce contenu

7 réponses

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
Jacky
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets(1).range("u" & G) "B" then

Salutations
JJ

"lorant" a écrit dans le message de
news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition que
voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne en
compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B" then....

j'ai fait plusieurs tentative mais la syntaxe n 'est pas
bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance
Avatar
merci jacky

suis désolé de t'embeter avec ce genre de petit
programme!!
mais dis moi tu es tout le temps sur ce forum ou quoi???
rire

merci encore
-----Message d'origine-----
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets
(1).range("u" & G) =

"B" then

Salutations
JJ

"lorant" a écrit
dans le message de

news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition que
voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne en
compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B" then....

j'ai fait plusieurs tentative mais la syntaxe n 'est
pas

bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance


.



Avatar
j avais essayer avec OR mais pas sur la bonne forme je
n'avais pas répeter l'origine de la condition
c 'est ça les débutants!!!


-----Message d'origine-----
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets
(1).range("u" & G) =

"B" then

Salutations
JJ

"lorant" a écrit
dans le message de

news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition que
voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne en
compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B" then....

j'ai fait plusieurs tentative mais la syntaxe n 'est
pas

bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance


.



Avatar
Jacky
re..
mais dis moi tu es tout le temps sur ce forum ou quoi???



Je suis rénuméré par le KGB pour espionner.;o))

JJ

a écrit dans le message de
news:0b7401c52ade$a056b330$
merci jacky

suis désolé de t'embeter avec ce genre de petit
programme!!
mais dis moi tu es tout le temps sur ce forum ou quoi???
rire

merci encore
-----Message d'origine-----
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets
(1).range("u" & G) >"B" then


Salutations
JJ

"lorant" a écrit
dans le message de

news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition que
voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne en
compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B" then....

j'ai fait plusieurs tentative mais la syntaxe n 'est
pas

bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance


.




Avatar
Jacky
re..
Il n'y a que celui qui ne tente rien qui ne fait pas d'erreurs.
Moi aussi je suis un eternel débutant, ne t'en fait pas, tu vas vite
progresser.
JJ


a écrit dans le message de
news:0b7601c52ade$f3e40340$
j avais essayer avec OR mais pas sur la bonne forme je
n'avais pas répeter l'origine de la condition
c 'est ça les débutants!!!





Avatar
lorant
mort de rire!!!

ben tiens vu que tu espionnes j ai encore une derniere
question pour toi !!

voici ma formule :
sub()
for c = 15 to 154
Worksheets(c - 13).Select
range("d36").Select
ActiveCell = Sheets("Feuil1").range("BA" & c) & " m/s"
next c
end sub

donc comme tu peux vor je fais un copier coller en boucle
sur une cellule d'origine jusque là tout va bien
mais la ou je me complique la vie c que la cellule
d'origine est le resultat d'un calcul et je voudrais soit
faire un collage spécial, soit arrondir la cellule de
destination a deux chiffres apres la virgule...

tu as une idée? car une fois de plus je sèche!!!
-----Message d'origine-----
re..
mais dis moi tu es tout le temps sur ce forum ou
quoi???




Je suis rénuméré par le KGB pour espionner.;o))

JJ

a écrit dans le
message de

news:0b7401c52ade$a056b330$
merci jacky

suis désolé de t'embeter avec ce genre de petit
programme!!
mais dis moi tu es tout le temps sur ce forum ou
quoi???

rire

merci encore
-----Message d'origine-----
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets
(1).range("u" & G) =

"B" then

Salutations
JJ

"lorant" a
écrit


dans le message de
news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition
que


voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne
en


compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B"
then....



j'ai fait plusieurs tentative mais la syntaxe n 'est
pas

bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance


.




.





Avatar
Jacky
Re....
Comme je suis dans un bon jour.....
'-----
For c = 15 To 154
Worksheets(c - 13).Range("d36") = Format(Sheets("Feuil1").Range("BA" & c),
"0.00") & " m/s"
Next c
'---------
Salutations
JJ

"lorant" a écrit dans le message de
news:006501c52ae2$74b48410$
mort de rire!!!

ben tiens vu que tu espionnes j ai encore une derniere
question pour toi !!

voici ma formule :
sub()
for c = 15 to 154
Worksheets(c - 13).Select
range("d36").Select
ActiveCell = Sheets("Feuil1").range("BA" & c) & " m/s"
next c
end sub

donc comme tu peux vor je fais un copier coller en boucle
sur une cellule d'origine jusque là tout va bien
mais la ou je me complique la vie c que la cellule
d'origine est le resultat d'un calcul et je voudrais soit
faire un collage spécial, soit arrondir la cellule de
destination a deux chiffres apres la virgule...

tu as une idée? car une fois de plus je sèche!!!
-----Message d'origine-----
re..
mais dis moi tu es tout le temps sur ce forum ou
quoi???




Je suis rénuméré par le KGB pour espionner.;o))

JJ

a écrit dans le
message de

news:0b7401c52ade$a056b330$
merci jacky

suis désolé de t'embeter avec ce genre de petit
programme!!
mais dis moi tu es tout le temps sur ce forum ou
quoi???

rire

merci encore
-----Message d'origine-----
Une de plus.........

If Worksheets(1).range("u" & G) = "A" or Worksheets
(1).range("u" & G) > >"B" then


Salutations
JJ

"lorant" a
écrit


dans le message de
news:0b5d01c52ada$85f35100$
bonjour à tous

j'ai un petit problème sur une boucle de condition
que


voici :

Sub test()


For G = 15 To 154
If Worksheets(1).range("u" & G) = "A" Then
Worksheets(G - 13).range("d33") = "oui"
Else
Worksheets(G - 13).range("d33") = "non"
End If
Next G
End Sub

elle fonctionne bien mais j'aimerais qu'elle prenne
en


compte deux caractère plutot qu'un seul a savoir :

If Worksheets(1).range("u" & G) = "A" ou "B"
then....



j'ai fait plusieurs tentative mais la syntaxe n 'est
pas

bonne ( je suis pas tres bon en VBA)
est ce que quelqu'un peu me renseigner?
merci d'avance


.




.