variable dans les paramètrea d'un rectangle

[olhey]

bonjour amis xldien.

J'ai une pettie question:
Comment intégrer un nom de variable la dedans:

With Origine.Parent.Shapes.AddShape(msoShapeRectangle, Origine.Left + (posDeb * Echelle), Origine.[COLOR="Red"]Top[/COLOR], Longueur * Echelle, 3)

j'ai une variable string qui s'appelle cote

If .Range("O" & Cpt).Value = "g" Then
                Cote = "top"
                Else: Cote = "bottom"
                End If

j'aimerais que la position du rectangle change en fonction de cote mais je sais pas comment intégrer cote dans With Origine.Parent.Shapes.AddShape(msoShapeRectangle, Origine.Left + (posDeb * Echelle), Origine.Top, Longueur * Echelle, 3)

MERCI bcp et dsl de mon état de débutant

 

[Minick]

Re : variable dans les paramètrea d'un rectangle

Soit pas si impatient...

Va voir ton post d'origine

ICI

 

[pierrejean]

Re : variable dans les paramètrea d'un rectangle

bonjour olhey

A tester:

If .Range("O" & Cpt).Value = "g" Then
  With Origine.Parent.Shapes.AddShape(msoShapeRectangle, Origine.Left + (posDeb * Echelle), Origine.[COLOR=red]Top[/COLOR], Longueur * Echelle, 3)
else
  With Origine.Parent.Shapes.AddShape(msoShapeRectangle, Origine.Left + (posDeb * Echelle), Origine.[COLOR=red]Bottom[/COLOR], Longueur * Echelle, 3)
end if

Edit:
Salut Minick 🙂

 

[olhey]

Re : variable dans les paramètrea d'un rectangle

Minick, en aucun cas je te suis infidèle 😀 tu t'occupe très bien de moi!
C'était juste une question qui m'est venue comme ça...

Merci encore de votre aide