OVH Cloud OVH Cloud

Range avec variables

5 réponses
Avatar
Chris & Henk
Bonjour,

Je voudrais écrire dans une cellule ceci :

Range("N4" + 1, "P4" + 1).Value = Range("N4").Value * Range("P4").Value

ça ne marche pas, comment écrire Range(??) avec les variables N4 et P4
cad col=N4+1 et row=P4+1

5 réponses

Avatar
Norvi
Bonjour,
Peux tu être un peu plus explicite sur ce que tu veux faire.
Merci
Avatar
Clément Marcotte
Bonjour,

Pas sur de bien comprendre, mais, si N4 et P4 sont des nombres, tu peux le
faire avec
Cells(ligne, colonne), plutôt qu'avec Range()

Range("N4" + 1, "P4" + 1).Value = Range("N4").Value * Range("P4").Value


cells(N4+1,P4+1).value =
cells(le_bon_numéro_de_ligne,le_bon_numéro_de_colonne).value *
cells(le_bon_numéro_de_ligne,le_bon_numéro_de_colonne).value



"Chris & Henk" a écrit dans le message de news:
4434d564$0$20176$
Bonjour,

Je voudrais écrire dans une cellule ceci :


ça ne marche pas, comment écrire Range(??) avec les variables N4 et P4
cad col=N4+1 et row=P4+1



Avatar
Chris & Henk
Excuser moi de ne pas être clair voici en peu plus de programme :


Range("O6").Value = ""
Range("N4").Value = Target.Row - 1
Range("P4").Value = Target.Column - 1


Case 1
If Target.Value = Range("N4").Value * Range("P4").Value Then
Range("O6").Value = Range("N4").Value * Range("P4").Value
Cells("N4" + 1, "P4" + 1).Value = Range("N4").Value *
Range("P4").Value
MsgBox "Bravo, Vous avez trouvé du " & Compteur & "er coup",
vbExclamation
Else
Compteur = Compteur + 1
MsgBox " Seconde chance,vous devez choisir une case bleue ",
vbInformation
End If

mais "Cells("N4" + 1, "P4" + 1).Value" etc. ne marche pas


"Clément Marcotte" a écrit dans le message
de news:
Bonjour,

Pas sur de bien comprendre, mais, si N4 et P4 sont des nombres, tu peux
le faire avec
Cells(ligne, colonne), plutôt qu'avec Range()

Range("N4" + 1, "P4" + 1).Value = Range("N4").Value * Range("P4").Value


cells(N4+1,P4+1).value =
cells(le_bon_numéro_de_ligne,le_bon_numéro_de_colonne).value *
cells(le_bon_numéro_de_ligne,le_bon_numéro_de_colonne).value



"Chris & Henk" a écrit dans le message de news:
4434d564$0$20176$
Bonjour,

Je voudrais écrire dans une cellule ceci :


ça ne marche pas, comment écrire Range(??) avec les variables N4 et P4
cad col=N4+1 et row=P4+1







Avatar
Norvi
Bonjour,

Je ne vois pas pourquoi, puisque tu indiques clairement N4 et P4, tu
n'indiques pas tout simplement Q5 (qui correspond a la ligne de N4 + 1
et à la colonne de P4 +1)

Bonne journée
Avatar
Chris & Henk
Peut être pas jolie mais enfin j'ai trouvé et ça marche :)

Cells(Range("N4").Value + 1, Range("P4").Value + 1).Value =
Range("N4").Value * Range("P4").Value

Merci pour vos réponses

"Norvi" a écrit dans le message de news:

Bonjour,

Je ne vois pas pourquoi, puisque tu indiques clairement N4 et P4, tu
n'indiques pas tout simplement Q5 (qui correspond a la ligne de N4 + 1
et à la colonne de P4 +1)

Bonne journée