Contenu récent par Bill73

bonjour vgendron, le problème, c'est que le Exit du combo passe avant le Keypress du bouton

Bonjour le forum, j'aimerais pouvoir contrôler un EXIT dans un ComboBox en vérifiant si la sortie est due à un bouton <Annuler> nommé BtCan ou à un changement de focus. la sub Exit : Private Sub Data4_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'la saisie de la Région est obligatoire pour...

...et voilà un bout de code qui correspond à ce que je veux. En me relisant, je m'aperçois que je me suis mal expliqué : - le deuxième combo comporte une liste de choix aussi et c'est cette liste que j'aimerais avoir en Wingdings dans certains cas.

@Phil, pour les explications, c'est simple : - certaines réponses dans le combobox1 sont des choix (combobox2) en mode texte - deux réponses du combobox1 sont des choix (combobox2) en mode "graphiques" il faut que je parte, mais je fait un bout de code en rentrant et je l'envoie

Bonjour Phil & Patrick, avant tout, le fait que je ne suis pas dans un UserForm, mais sur une feuille pourrait poser problème pour l'affichage ? je regarde pour faire un bout de code qui correspond.

Bonjour le forum, j'ai une petite question concernant les Combobox. j'aimerais, en fonction de la réponse d'un premier combobox, adapter la police d'un deuxième combobox, c'est à dire, passer la police type ARIAL en Wingdings, et le cas échéant, revenir à Arial par exemple. J'ai essayé...

ok, je n'utilise vraiment pas assez la fenêtre espions ! Encore merci pour l'aide.

c'est super, ça marche comme je le voulais. En fait je butais sur le Transpose. Pourquoi le doubler ?

Bonjour, je bute depuis un moment sur un problème de requête ADODB Je voudrais extraire une colonne précise depuis une feuille excel fermée contenant une bdd, et récupérer cette colonne directement dans une variable tableau. ex : il faut récupérer la colonne Nom (l'ensemble des noms) et les...

bonsoir, la macro : Private Sub Ajouter_Click() Dim modif As Boolean Dim reponse As Integer Dim chFichEtiq As Variant, fileToOpen As Variant, NomFichier As String, chOd As String 'une étiquette existe déjà If Not FM_FVin.Etiquette.Picture Is Nothing Then modif = False...

Bonjour le Forum, Je bloque depuis un moment sur le problème suivant en VBA : je voudrais pouvoir ouvrir l'explorateur de fichiers windows (pour pouvoir sélectionner un fichier) depuis l'endroit où le fichier excel est stocké. - cas 1 : sur disque local (type C: ) : pas de problème - cas 2 ...

Bravo, ça y est, j'ai enfin compris le problème. Je voyais pas comment le lien pouvait se faire ! Merci bien.

Si j'utilise dans une procédure type Sub BtMenu_MouseMove() Dim EmplacUFm As Range Set EmplacUFm = Me.[EmplacUFm] j'obtiens une erreur d'exécution 424 - Objet requis c'est pour ça que j'aimerais arriver à comprendre ce truc, parce que j'ai rajouté la même procédure (Mouse_Move) dans le...

Bonsoir Dranreb et le forum juste pour ma culture perso, que fait : Set EmplacUFm = Me.[EmplacUFm] Les [ ] me questionne.

Bonsoir le forum, ça y est, cette fois-ci, ça marche. Merci encore (j'ai appris plein de trucs sur ce coup là)