TOUSSAINT_ER
XLDnaute Nouveau
Bonjour tout d'abord et merci de m'avoir accepté. Je suis retraité et tente de mettre au point une appli pour le cours de bridge.
Le problème sur lequel je galère est le suivant :
Sub Essai_test_interupt(Rng)
' Interrompt la macro pour choisir l'enchère
Set Rng = Application.InputBox("Merci de sélectionner votre enchère", "", Gauche = 100, haut = 4000, Type:=8)
Debug.Print Rng.Parent.Name
End Sub
La routine remplit bien sa fonction, mais la boîte inputbox ne se positionne pas où je veux. Gauche = 100 ne donne rien, 100 ou 200 ou 0 !!!
Les recherches me disent que je devrais créer un userform et là, je ne comprends rien.
Merci pour les éclaircissements, voire les lignes de codes à intégrer.
Le problème sur lequel je galère est le suivant :
Sub Essai_test_interupt(Rng)
' Interrompt la macro pour choisir l'enchère
Set Rng = Application.InputBox("Merci de sélectionner votre enchère", "", Gauche = 100, haut = 4000, Type:=8)
Debug.Print Rng.Parent.Name
End Sub
La routine remplit bien sa fonction, mais la boîte inputbox ne se positionne pas où je veux. Gauche = 100 ne donne rien, 100 ou 200 ou 0 !!!
Les recherches me disent que je devrais créer un userform et là, je ne comprends rien.
Merci pour les éclaircissements, voire les lignes de codes à intégrer.