Useform bouton
Résolu
titi17-08
Messages postés
117
Date d'inscription
Statut
Membre
Dernière intervention
-
titi17-08 Messages postés 117 Date d'inscription Statut Membre Dernière intervention -
titi17-08 Messages postés 117 Date d'inscription Statut Membre Dernière intervention -
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
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
A voir également:
- Useform bouton
- Bouton reinitialisation pc - Guide
- Diagnostic bouton photo - Accueil - Outils
- Bouton on/off comment savoir ✓ - Forum Matériel & Système
- Symbole arrêt marche - Forum Word
- Réinitialiser chromecast sans bouton - Guide
2 réponses
Bonjour Titi, bonjour le forum,
Ton code ne permet pas de savoir qui est qui !... Essaie comme ça :
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 With
End If
désolé pour le manque d'informations...:(
j'ai essayé votre solution
avec une modif , voici le code qui fonctionne
merci pour votre aide
A+
titi
<code>Selection.Offset(1, 0).Select
With Liste_Freelance_periode 'j'imagine que c'est le nom de l'UserForm
.Height = 350 'hauteur de l'userform
.Valider_les_freelances.Top = 270 'position du bouton dans l'userform