Useform bouton Résolu

Question

Bonjour cher réseau,
voila ma petite interrogation du début de semaine...
J'ai un bouton Valider les Freelances dans un userform.
je cherche a le déplacer selon plusieurs paramètres en amont.
Je sais que le .top est le positionnement du userform/ textbox  /bouton mais cela ne fonctionne pas 
le code ci-dessous 
merci pour votre aide
belle journée a vous
titi
If Selection.Offset(1, 0).Select <> "" Then
                With Liste_Freelance_periode
                Select Case TypeName(Liste_Freelance_periode)
                    Case "Liste_Freelance_periode"
                    .Height = 350
                    Select Case TypeName(Valider_les_freelances)
                  
                    Case "Valider_les_freelances"
                    .Top = 270
                    End Select
                    
                    End Select
                End With
            
            End If

ThauTheme · Answer

Bonjour Titi, bonjour le forum,

Ton code ne permet pas de savoir qui est qui !... Essaie comme ça :
If Selection.Offset(1, 0) <> "" Then    With Liste_Freelance_periode 'j'imagine que c'est le nom de l'UserForm        .Liste_Freelance_periode.Height = 350 'j'imagine que c'est le nom du contrôle        .Valider_les_freelances.Top = 270 'j'imagine que c'est le nom du contrôle    End WithEnd If

f894009 · Answer

Bonjour,

Mettez un point d'arret a cote de la ligne du IF
appuyez sur la touche F8 pour faire avancer le code ligne par ligne pour voir son deroulement
passez le curseur souris sur les objets pour voir leur contenu

Useform bouton

2 réponses

Discussions similaires

Newsletters