XL 2013 Archiver le suivi des clients pour avoir un visuel dans une fenêtre

T

Tophe2

XLDnaute Impliqué

• 2 Novembre 2020

• #46

Bonjour Jean Marie,
Bonjour Le Forum,

Merci super ça fonctionne .

j'essai d'avoir les entêtes dans la listbox mais avec la propriété columnheads rien ne s'affiche comment puis je faire pour les afficher dois je changer de procéder ?

Dans la listbox j'ai une colonne (8) où il y a du texte à écrire parfois plus long que la largeur de la colonne existe t il un moyen de voir le contenu dans la listbox !!

Bonne Journée
Christophe

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 2 Novembre 2020

• #47

Bonsoir
Je t'ai dit que pour les entêtes il faut passer par la méthode RowSource. Pas cool !
Pour la largeur pas facile d'adapter sans influer sur les autres colonnes ou alors créer une listBox de grande largeur(plein écran) peut être ????
Jean marie

 

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 2 Novembre 2020

• #48

Re,

oui je sais pour le RowSource j'ai créé une plage pour mon tableau mais il ne m'affiche pas l'entête je vais à nouveau essayer ....

Comment puis définir la plage de donnée de mon tableau en sachant qu'elle va évoluer, j'ai rentré le rowsource en dur ça marche lorsque j'affiche l'userform mais quand je clic sur le bouton "suivi" il y a une erreur sur le .clear j'ai l'impression qu'il prend uniquement la propriété de la listbox et non le code mais bon c'est mon avis ..... je cherche encore .

Pour l'autre point je vais voir mais ça semble complexe

Encore Merci
Bonne Soirée
Christophe

 

Dernière édition: 2 Novembre 2020

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 2 Novembre 2020

• #49

Re
Le RowSource ne permet pas de modification des données de la plage RowSource (je crois) très contraignant.
Ton fichier c'est celui du post 44
Jean marie

 

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 2 Novembre 2020

• #50

Re,

Oui c'est ça
j'ai ajouté ça à ton code et ça fonctionne mais ma plage est en dur car je ne connais pas la formule pour que le tableau ce dimensionne automatiquement (variable)

.ColumnHeads = True
.RowSource = "Entete"

Merci
Christophe

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 2 Novembre 2020

• #51

Re
Je vais regarder ton fichier.
Pour le redimensionnement
Il faut que tu redéfinises ta plage.
With Worksheets(x)
Set plge=.Range(.Cells(1,2),.Cells(Derlgn,DerCol))
Tu renommes ta plage " plge " ---- "Entete"
Non testé je poste avec mon téléphone.
Ps : après vérification tu peux modifier le Nom du Tableau Structuré depuis "le Gestionnaire des Noms"
Jean marie

 

Dernière édition: 2 Novembre 2020

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 2 Novembre 2020

• #52

Re
pour ce qui est de redimensionner ta plage de données tu as dans tes procédures fichier : #44
' Définition d'un nom pour la liste excel

VB:

ActiveWorkbook.Names.Add Name:="nom1", RefersTo:="=Feuil1!$B$2:$B$" & [B2].End(xlDown).Row
ActiveWorkbook.Names.Add Name:="prenom1", RefersTo:="=Feuil1!$C$2:$C$" & [D2].End(xlDown).Row

Tu pourrais peut être t'en inspirer pour régler ton problème !
je suis plus pour le (xlUp)
dans [B2].End(xlDown).Row : je préfère [B2].End(xlUp).Row
dans [D2].End(xlDown).Row : je préfère [D2].End(xlUp).Row
sinon tu mets des labels pour les entetes!
jean marie

 

Dernière édition: 2 Novembre 2020

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 2 Novembre 2020

• #53

Re
un exemple de procédure qui redéfinie la Plage du "RowSource"

VB:

With Sheets("Feuil1")
DerLgn = .Cells(.Rows.Count, 1).End(xlUp).Row
dercol = .Cells(1, .Columns.Count).End(xlToLeft).Column
Me.ListBox2.RowSource = "Feuil1!" & .Range(.Cells(1, 1), .Cells(DerLgn, dercol)).Address
End With

jean marie

 

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 7 Novembre 2020

• #54

Bonjour Le Forum,
Bonjour Jean Marie,

Désolé de ma réponse tardive mais quelques difficultés cette semaine.

Merci pour ton code ça fonctionne.

J'ai trouvé sur le net un fichier recherche et j'essai maintenant d'afficher dans ma listbox le mot ou code client... tapé puis d'afficher la ligne sélectionnée dans un nouvel userform mais c'est là que je bloque et je n'y arrive pas .

je joins un fichier exemple et j'intégrerai la partie "recherche" dans mon fichier client.
Merci pour votre aide.

Cordialement
Christophe

 

Pièces jointes

• Essai Recherche 2.xls

  70.5 KB · Affichages: 4

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 7 Novembre 2020

• #55

Bonsoir Christophe
Bonsoir le Fil ,le Forum4
un exemple avec récupération du Code à toi d'affiner Lol
Pourquoi deux Userform et pas par exemple un Multipage ?
jean marie

 

Pièces jointes

• Essai Recherche Chti160.xls

  72.5 KB · Affichages: 6

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 7 Novembre 2020

• #56

Bonjour Jean Marie,

Merci pour ta proposition la gestion du multi page est plus simple, j'ai fait en fonction de mes connaissances (faible) ?

je vais avoir plusieurs textboxs pour renvoyer les informations comment dois je procéder pour afficher les informations présentent sur la ligne ?

dans ce modèle il efface la ligne d'entête après la recherche peut on la laisser pour l'avoir toujours en visuel.

merci encore d'être disponible et réactif pour m'aider
Bonne Soirée
Christophe

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 7 Novembre 2020

• #57

Pour ce qui est des entêtes.
Je pense t'avoir dis que d'utiliser RowSource n'est pas pratique. Tu te limites dans l'exploitation de tes données.
Si non tu mets des label en guise d'entêtes et tu utilises une autre méthode pour remplir ta listBox.
Bien sûr si tu n'as pas une foule d'entêtes lol
Question : tu ne récupères qu'une ligne via ta recherche ?
Jean marie

 

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 7 Novembre 2020

• #58

Re,

oui rowsource je sais mais tu n'étais pas très friand , de mettre des listboxs ok

oui je récupère qu'une ligne à la fois dans mon userform si tu me poses cette question c'est que tu dois avoir une idée à exploiter ?

mon principe c'est surtout d'avoir un visuel de toutes les cellules en fonction du client et du suivi

merci à toi
bonne soirée
Christophe

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 7 Novembre 2020

• #59

Re
Combien de colonnes as tu?
Jean marie

 

Vote positif 0 Vote négatif

T

Tophe2

XLDnaute Impliqué

• 7 Novembre 2020

• #60

Pour l'instant 9 colonnes dans le fichiers d'origine
Christophe

 

Vote positif 0 Vote négatif