Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Voila je souhaiterai savoir comment uniformiser la largeur des colonnes d’une listbox car après avoir fait une recherche multicritère , le résultat s’affiche dans une listbox mais la largeur des colonnes est différentes et sa fait désordre.
Merci
le problème c'est qu'il affiche tous dans la première colonnes et non les suivantes.
moi je voudrai qu'il sépare bien tout
ex:
a1 colonne 1 b1 colonne 2 c1 colonne 3
a2 colonne 1 b2 colonne 2 c2 colonne 3
a3 colonne 1 b3 colonne 2 c3 colonne 3
et ainsi de suite
le but de mon fichier recherche client est:
quand je rentre des information dans nom ou prénom , il m'affiche les nom potentiel a ma recherche un peut comme quand on fait une recherche sur google qui précise la recherche
gibert: dans l'annuaire comment la feuille nouveau client fait elle pour que dans les textbox me nom ai sa peremière lettre en majuscule , je n'ai trouvé que nOm mais je ne sais pas a quoi cela correspond
je serai intérressé par ce code qui fonctionnerai meme quand le textbos se rempli seul a l'ouverture de sa feuille
bonjour gilbert_rgi
merci pour cela que j'aurai du trouvé tout seul
mais dans mon usf client qui n'a que des textbox ca bloque a "faux" en disant que la variable est non défini
salut ,alors pour la procédure ou les textbox est les nom en majuscule c'est
Me.ActiveControl = Application.WorksheetFunction.Proper(Me.ActiveControl)
normalement ça devrait être textbox1 = Application.WorksheetFunction.Proper(textbox1)
mais remplaçait le textbox par Me.ActiveControl dans une procédure car je l'emploi dans plusieurs textbox sa m'évite d'allourdir mon code
ensuite cette ligne de code" If Me.ActiveControl Is Nothing Then Exit Sub "
consiste au moment ou j'ai choisi un contact il s'ouvre dans un autre userform mais il doit garder les propriété d'avant si je modifie mon contact alors comme il reprend toute les info du contact à l'initialisation de l'userform il fait abstraction de ce code et recopie bêtement et cette ligne de code "If Me.ActiveControl = faux Then Exit Sub "c'est si tu vient a supprimer tout les entrer de ton textbox ça évite le débogage tout simplement d'ou le code
Private Sub nOm()
If Me.ActiveControl Is Nothing Then Exit Sub
If Me.ActiveControl = faux Then Exit Sub
Me.ActiveControl = Application.WorksheetFunction.Proper(Me.ActiveControl)
End Sub
dans les textbox ou tu voudras mettre toutes les premières lettres des mots en majuscules tu auras juste a mettre ex:
Private Sub TextBox1_Change()
nOm
End Sub
bonjour Gilbert_rgi
Merci pour toutes tes réponsescar tu a raison c'est false qu'il faut utilisé bien vu
merci beaucoup pour ton savoir et ton aide
c'est incartade est close pour moi
Salut gilbert_RGI
Je suis enfin parvenu a rangé correctement ma listbox en faisant de belle colonne, tout en faisant ma recherche grasse a mes textbox qui agisse comme un filtre automatique
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.