Aide combobox

[thomashty]

Bonjour le forum,

J'ai besoin de votre aide pour la programmation de 2 Combobox et l'affectation d'une image à une macro.

Je vous explique brièvement l'outil:

-1ère feuille (Liste de documents) : sert à recenser une liste de documents selon différents critères.
-2ème feuille (Zone de recherche) : sert à effectuer une recherche de documents présents dans la feuille 1.

Mon problème: J'ai un formulaire qui me permet de remplir ma feuille 1 sauf que pour la date j'ai 2 Comboxbox, une pour le mois et une pour l'année, et j'en ai une qui empiète sur l'autre (L'année en l’occurrence)...

2ème problème: Je souhaiterais qu'en cliquant sur la petite image en haut, ma macro se lance.

Merci d'avance et j'espère avoir été clair, je vous met le doc en PJ ce sera bien plus simple pour comprendre.

Bien à vous
Thomas

 

[CPk]

Re : Aide combobox

Bonjour, pour ma part, la/les macros font planter mon excel. J'ai vu une grande zone de texte au milieu du fichier, ne gêne t'elle pas la lecture des utilisateurs ?

 

[thomashty]

Re : Aide combobox

Bonjour CPK,

Je t'avoue que cette nouvelle ne me rassure pas trop.. Peux tu m'envoyer une capture d"écran pour voir ce que tu as ?

Pour ma part lorsque j'enregistre j'ai ce message (cf. capture ci dessous), je pensais qu'il n'avait pas d'importance mais peut être est-ce dû à ça.

 

[thomashty]

Re : Aide combobox

C'est bon j'ai réussi pour mon problème numéro 2

Toujours pas de solution pour la première par contre.

 

[CPk]

Re : Aide combobox

Cela ne se passe que quand je suis dans cette zone de texte et que j'essai de monter ou descendre les ascenceurs :/

 

[thomashty]

Re : Aide combobox

Ah oui car j'ai figé les volets à partir de la ligne 21 !

L'utilisateur est censé taper sa recherche et regarder ce qui lui convient le mieux, j'ai préféré bloquer pour qu'il se concentre sur ce qu'il tape plutôt qu'il voit tout en fouillis. Si vous regardez bien, les lignes sur votre gauche défilent mais pas le système de recherche qui reste toujours en haut de page.

Et pour le bug je ne sais pas malheureusement

 

[CPk]

Re : Aide combobox

D'accord...Désolé mais la feuille 2 ne me...Convenait pas donc j'ai changé un peu la procédure de recherche. Dite moi si cela peut vous convenir. (Il suffit d'entrer une ou deux lettre en B1 et de valider par la touche entrée).

 

[thomashty]

Re : Aide combobox

Bonjour CPK,
Merci pour ta suggestion, cependant dans ton cas, il faut que l'utilisateur tape la recherche exactement comme moi j'ai entré la description du document. Or l'utilisateur ne va pas forcement faire une recherche aussi précise.

Exemple : j'écris dans la description "Guide sur les appareils d'appui.....", l'utilisateur ne va pas avoir le reflex de taper ça, il va plutôt taper "guide appareil appui". Et je veux qu'il puisse avoir accès au document malgré tout

PS: Je suis toujours dans l'impasse avec ma double combobox relié à une cellule...

 

[CPk]

Re : Aide combobox

Bonjour, non l'utilisateur peux ne rentrer qu'un seul mot mais je n'insiste pas, salutations.

 

[Paf]

Re : Aide combobox

Bonjour à tous,

pour le premier soucis, une solution:

Range("C" & L).Value = DateSerial(ComboBox3, ComboBox2, 1)

A+

 

[thomashty]

Re : Aide combobox

Bonjour Paf,

Merci pour cette réponse, peut-être me suis-je trompé dans l'ajout du code mais j'ai un message d'erreur après l'exécution de la macro..

Thomas

 

[Paf]

Re : Aide combobox

re,

modifier le code proposé en

Range("C" & L).Value = CDate(1 & " " & ComboBox2 & " " & ComboBox3)

(le code initial était basé sur un mois en chiffre)

Bonne suite

 

[thomashty]

Re : Aide combobox

re,

modifier le code proposé en

Range("C" & L).Value = CDate(1 & " " & ComboBox2 & " " & ComboBox3)

(le code initial était basé sur un mois en chiffre)

Bonne suite

Ça fonctionne parfaitement merci beaucoup !

Juste une dernière chose, pourquoi la saisie ne se met pas à la première ligne vide, elle tient compte de ce qui a déjà été entré et supprimé et se met donc une 10aine de lignes en dessous de la dernière ligne saisie...

Avec ce code L = Sheets("Liste de documents").Range("A" & Rows.Count).End(xlUp).Row + 1 ça devrait pourtant devoir se mettre à la fin

Cdlt
TH

 

[Paf]

Re : Aide combobox

re,

vous utilisez un tableau ( plage entourée d'un cadre bleu) qui a une gestion un peu particulière, que je ne maitrise pas vraiment;

de plus sous ma version (XL2003) c'est un peu différent des versions ultérieurs .

Désolé

 

[thomashty]

Re : Aide combobox

re,

vous utilisez un tableau ( plage entourée d'un cadre bleu) qui a une gestion un peu particulière, que je ne maitrise pas vraiment;

de plus sous ma version (XL2003) c'est un peu différent des versions ultérieurs .

Désolé

Mince.. Merci encore pour votre aide !