Position Userform déjà chargé

Bonjour à tous,

Une petite question qui je suis sûr sera pour vous sera toute bête mais je n'arrive pas à y répondre !

Est il possible de modifier l'emplacement d'un Usf sur l'écran une fois qu'il est déjà chargé lors d'un changement de multipage ?

J'ai tenté avec repaint et stratupposition = 2 dans l'évènement change du multipage mais cela ne change rien.

D'avance merci et bon dimanche :)

Bonjour,

Si j'ai bien compris ...

Un essai ...

Private Sub MultiPage1_Change()
    If MultiPage1.SelectedItem.Index = 3 Then
        MsgBox " page 3 selected"
        Me.Left = 300
        Me.Top = 300
    End If
    If MultiPage1.SelectedItem.Index = 2 Then
        MsgBox " page 2 selected"
        Me.Left = 200
        Me.Top = 200
    End If
    If MultiPage1.SelectedItem.Index = 1 Then
        MsgBox " page 1 selected"
        Me.Left = 100
        Me.Top = 100
    End If
End Sub

ric

Bonjour Ric et merci de ton retour :)

Effectivement cela fonctionne bien si je définit les paramètres à taton jusqu'à trouver le centre de mon écran, néanmoins n'existe t'il pas un moyen de définir le centre de l'écran ?

Comme la propriété StartUpPosition = 2 - CenterScreen

Bonjour,

    If MultiPage1.SelectedItem.Index = 3 Then
        MsgBox " page 3 selected"
        Me.Top = (Application.Height / 2) - (Me.Height / 2)
        Me.Left = (Application.Width / 2) - (Me.Width / 2)
    End If

ric

Re bonjour Ric,

C'est exactement ce que je cherchais milles merci cela me sera bien utile !!

Belle journée et bon dimanche à toi :)

ric