J'ai perdu un ComboBox

Bonsoir au forum,

En remaniant mon fichier, (déplacement colonnes), je ne retrouve plus une liste déroulante

"ComboBox1",

Comment la retrouver, ou vaut-il mieux la refaire, et que devient le private Sub lié ?

amicalement

Claude.

Re-,

essaie avec ce code :

    With ActiveSheet.Shapes("ComboBox1")
        Application.Goto Cells(.TopLeftCell.Row, .TopLeftCell.Column)
    End With

tu auras ton combobox en haut à gauche de la feuille

re,

Le curseur se déplace bien dans le coin haut gauche, mais pas de liste combobox !

et pourtant , dans propriété, j'ai bien l'emplacement de la liste et la cellule liée.

comme j'ai déplacé des colonnes, dont certaines étaient cachées,

Comment et ou voir dans propriété la hauteur et la largeur du combobox ? , c'est peut-être à zéro !

Claude.

Re-,

même si tu masques tes lignes ou colonnes, le combobox reste visible

rajoute cette ligne :

With ActiveSheet.Shapes("ComboBox1")
        Application.Goto Cells(.TopLeftCell.Row, .TopLeftCell.Column)
        .Visible = True
    End With

voire :

With ActiveSheet.Shapes("ComboBox1")
        Application.Goto Cells(.TopLeftCell.Row, .TopLeftCell.Column)
        .Visible = True
        .Width = 110
        .Height = 18
    End With

re,

C'est pas çà non plus, mais je l'ai retrouvé en comparant avec un autre combo !

Cela venait de la dernière ligne dans propriété (Widh) qui était à zéro. OUF !!!

c'est bon à savoir.

merci felix et bonne soirée

Claude.