VB sous EXCEL: quadrillage Excel dans Listbox

Version imprimable

16/01/2006, 10h37
edwg

VB sous EXCEL: quadrillage Excel dans Listbox

Bonjour tout le monde !
Dans mon module VB sous EXCEL, je copie une feuille (via un bouton), contenant une Listbox. "Tout" semble marcher: l'alimentation de la Listbox, ses sélections, ... par contre, chaque fois que ma nouvelle feuille s'affiche, la Listbox contient du "quadrillage" de cellules Excel !?... Si je déroule ma feuille jusqu'à ne plus voir la Listbox, et que je remonte, elle affiche correctement les propositions, et si je sélectionne une ligne alors qu'elle affiche ce quadrillage, les cellules devant contenir la sélection sont correctement alimentées, alors que je ne vois pas la sélection ...
Bref, tout marche, mais le 1° affichage de ma Listbox n'est pas "joli"...
(Je fais bien un Clear de ma listbox, j'ai essayé un Refresh... )
On dirait qu c'est "mon Excel" qui ne foncitonne pas bien, mais je n'arrive pas à détourner le pb...

Merci pour votre aide
16/01/2006, 10h42
ouskel'n'or

Citation:

Bref, tout marche, mais le 1° affichage de ma Listbox n'est pas "joli"...

:lol:
Faut avouer que je ne connaissais pas...
As-tu essayé, avant de rafraichir ta listbox de faire .visible = false et .visible = true après rafraichissement ?
Juste une idée bête... mais si elle avait la bonne idée de marcher... :wink:

A+
16/01/2006, 10h45
edwg

Oui, Oui, je le mets systématiquement, et j'avais même essayé d'en insérer juste avant et après le "CLEAR"...
16/01/2006, 11h05
ouskel'n'or

Donc, une autre idée bête... As-tu essayé de sélectionner par soft un indice de ton listbox

Code:

listbox.List(0) = true

Syntaxe non garantie, inspirée d'une réponse de bbil la semaine dernière.
(si ça ne marche pas, j'assure qu'il n'y est pour rien...)

A+
16/01/2006, 11h35
edwg

indice soft, euh...

Non, je n'ai pas essayé, d'ailleurs, je ne sais pas du tout de quoi il s'agit, ni comment faire ?...
16/01/2006, 11h49
ouskel'n'or

Il s'agit de sélectionner par défaut un élément de ta liste.

Comment faire ? Comme indiqué...

Mais sans garantie pisk je n'avais jamais vu ça.

A+
16/01/2006, 11h55
jmfmarques
pour sélectionner dans un listbox c'est :
Code:

1 2 3 Private Sub Command1_Click() List1.Selected(0) = True End Sub
:D
16/01/2006, 12h07
ouskel'n'or

Merci jmfmarques, maintenant je m'en souviendrai... :wink:

Ça règle ton pb, edwg ?

A+
16/01/2006, 14h20
edwg

Aïe ! Aïe ! Aïe !!!...

Vous allez me taper sur les doigts...
En fait, en tournant mon code un peu dans tous les sens, j'avais fermé mon fichier CLIENT avant l'instruction

Code:

Application.ScreenUpdating = True

J'ai reécrit ma fermeture APRES le ScreenUpdating, et tout va bien...
Je suis désolée, ce n'était pas un problème justifiable, mais vous m'avez bien aidé quand-même, MERCI
16/01/2006, 14h37
jmfmarques

:cfou: Mais faute avouée...

:lahola:
16/01/2006, 15h03
ouskel'n'or

Il te reste plus qu'à faire le ménage de ton code... :lol:
16/01/2006, 15h04
edwg

MERCI BEAUCOUP à tous, votre site est vraiment SUPER, et tous ses collaborateurs aussi !
BRAVO ! :D