XL 2016 PB format dans listbox après recherche intuitive

[RobyL]

bonjour à tous,
lorsque que je demare mon userform tous est bon dans ma listbox (les format date ou format heure son bien définit) mais lorsque je fait une recherche avec ma textbox tous les format partent... avez vous une solution ?

il est aussi impossible d'afficher jusqu'a la colonne X de l'onglet "Données" dans cette listbox ... je ne sait pas pourquoi.

il faud cliquer sur l'onglet "choix" puis sur le bonton bleu "saisie modif taches" pour ouvrir le userform.
le userform s'appel "rechintuit2"

 

[RobyL]

j'ai pu réglé le pb en passant par rowsource mais ma textbox recherche ne fonctionne plus.
si quelqu'un a une idée ....

 

[ChTi160]

Bonsoir Robyl
a devoir utiliser "RowSource " pour avoir les Entêtes , cela te Bride dans pas mal de Domaines
as tu vraiment besoin de Visualiser toutes les Colonnes ? et pourquoi ?
jean marie

 

[RobyL]

salut ChTi160,
oui si toutes les colonnes incrémente bien toutes les textbox je nai pas besoin qu'elles soient visible.
mais si je ne les rends pas visible les textbox ne s'incrémentes pas. même les entêtes de la list box je m'en fou. l objectif est d'incrémenter les textbox quand je click sur une ligne de ma listbox.

 

[fanch55]

Salut le fil,
Si on met rowsource dans une listbox et si on essaie de la charger par .list ou .column, on va se heurter à "permission refusée". Le seul moyen, c'est de vider .rowsource avant de charger, mais on perd les entêtes ....

 

[RobyL]

bonjour fanch55,
si on perd les entêtes c'est pas grave. mais comment fait ont pour faire tous ça. je suis novice j'essaie de récupéré des truc par ci par là.

 

[ChTi160]

Re
Bonjour fanch55
RobyL, il faudrait par exemple que tu définisses les colonnes qu'il t'es indispensable de voir(10 max)
Et ensuite tu peux définir les recherches qui sont les plus utiles ( colonnes cibles de ta BD) car pourquoi rechercher dans toutes les colonnes?
Puis on verra ce que l'on peut organiser pour arriver a ce que tu veux .
Jean marie

 

[fanch55]

Bonsoir,
regardez le fil suivant qui est assez similaire au votre :

XL 2019 - Format de date dans ListBox US (MM/JJ/AAAA) à changer en FR (JJ/MM/AAAA).

Bonjour à tous, J'ai deux problèmes avec mon fichier Excel, pour le premier, la date passe en format mois, jour, année lorsque je modifie une donnée sur une des lignes dans la Listbox avec le bouton modifier, je souhaiterais que la date reste au format jour, mois, année. Pour le second...

www.excel-downloads.com

 

[ChTi160]

Bonjour RobyL
Bonjour fanch55
Je ne sais pas si on peut jongler entre ces deux modes "RowSource" et "List ou Column"
Jean marie

 

[fanch55]

Classeur modifié, les format [HH] m'ont bien fait rââââââââllller ...
Seul l'userform RechIntuit2 a été modifié .
J'ai essayé de garder les entêtes de colonnes en passant par un Frame.
Le module HookMouseLbx a été inséré pour pouvoir faire défiler la listbox avec la roulette.
Analysez la démarche pour la mise à jour des données .
La feuille Format définit les formats de la base et la largeur des colonnes de la listbox .

 

[RobyL]

wwwwwwouuuaaaaa !!! super fort bravo !!

j t'embête pour une dernière chose.... peut t'on afficher le numéro de la ligne dans la textbox Enreg quand on clik sur une ligne ?

mais franchement super fort encore.. merci beaucoup franch55.
et merci aussi a ChTi160

 

[ChTi160]

Bonjour
Voilà ce que j'ai modifié (dans la procédure ListBox1_Click )et qui semble répondre à la demande.

    TextBox24 = .List(.ListIndex, 23)    
    Me.Enreg = Me.ListBox1.Column(24) '<------- Ici
TextBox1.Value = Format(TextBox1.Value, "dd/mm/yyyy")

jean marie

 

[RobyL]

re,
j'ai une erreur 424.
j'ai copier et coller dans mon fichier référent le userform et le module mais cela ne fonctionne pas. quand je fait du pas à pas ça coince dans "Bd_Reformat" sur Lbx1Form.

 

[RobyL]

je n'avais pas bien lu.
j'ai ajouter la feuille "format" mais toujours une erreur 13 imcompabilité de type.

 

[fanch55]

Bonsoir,

Version corrigée avec le numéro d'enregistrement affiché .

Nouveau Module HookMouseLbx, l'ancien me faisait planter Excel .
Le nouveau fonctionne à peu près, mais si vous devez intervenir dans le code, je vous conseille de le neutraliser ( commenter tout le haut du module RechIntuit2, le bloc est indiqué ) .

La feuille Format est importante, elle a été recodée avec un bouton de ré-initialisation qui vous permet de la rebâtir ( il y a peut-être un nom d'entête différent entre votre référent et le classeur que j'ai )

Si vous avez encore une erreur 13, activez le débogage et faites du pas à pas jusqu'à la ligne posant problème .

 

[ChTi160]

Bonjour Robyl
Bonjour fanch55
fanch55 , n'as tu pas oublié la demande de Robyl d'afficher le Numéro de Ligne Cible dans TextBox "Enreg" ?
Merci pour ce très beau travail!
Bonne journée
jean marie