positionner un user form appellé par un Private Sub CommandButton95_Click()

[zaberlibobed]

salut à tous,
J'ai une macro simple du type:
Private Sub CommandButton95_Click()
Sheets("REPARTITION").Select
Cells(3, 11).Select
ActiveCell.Value = Cells(3, 2)
Cells(4, 11).Select etc...
Qui termine par :
Load UserForm1
UserForm1.Show
End Sub

Ce serait bien si ce usf se place à un endroit precis ( le coin haut gauche en "O20") par exemple
De plus si ma feuille est zommé à 40% ou 80% cet usf (et ce qu'il comporte)devrait etre affiché proportionnellement.

J'ai écrit qqchose comme ca: (tiré du post : Positionnement USF par rapport à une cellule posté le 15/01/2006, 13h30 #1 (permalink)
Mi_ ) :

Private Sub UserForm_Activate()
Dim Plage As Range
Set Plage = Range('B2')

With UserForm1
.Left = Plage.Left
.Top = Plage.Top
End With
End Sub

Ca marche pô!!
Ces "commandes"? ont l'air de pas causer pareille.
j'me trompe ou j'me trompe
J'm'ai gourré qque part?
Un coup de pouce Please....

 

[Mytå]

Re : positionner un user form appellé par un Private Sub CommandButton95_Click()

Salut Zaberlibobed et le Forum

Pour le positionnement ben justement, c'est pas si simple parce que les proprietes de position pour un userform font référence au coin de l'écran et les proprietes de position pour les cellules font référence a la cellule A1.

A suivre Mytå