MASQUER ET AFFICHER LIGNE SUR VBA EXCELRésolu

Question

BONJOUR 
je recherche en vba excel la fonction qui permet de masquer et "démasquer une ligne sur un tableau excel
de plus sur la ligne par exemple que je veux masquer, il y a un petit picture qui lui n'est pas intégré a cette ligne.
donc quand je masque manuellement la ligne concerné , mon picture n'est pas masqué.
est il possible de masquer ce picture en vba.

merci d'avance 

jerome

lolokun · Accepted Answer

Si ton problème est résolu penses au bouton "Réponse acceptée" pour cloturer ce sujet et que d'autres membres puissent éventuellement s'en servir si ils ont le même souci..


L'expérience, c'est une connerie par jour, mais jamais la même..

lolokun · Answer

Bonjour,

L'enregistreur de macros m'a donné la réponse :
Selection.EntireRow.Hidden = True


L'expérience, c'est une connerie par jour, mais jamais la même..

TOULLL · Answer

merci pour le masquage des lignes.
mais sais tu commen desmasqué une cellule? et masquer ou démasquer un picture?

a+

lolokun · Answer

Ben tout simplement mettre à false..
Après une rapide recherche :

Nb = ActiveSheet.Pictures.Count
ActiveSheet.Pictures(Nb).Visible = True


L'expérience, c'est une connerie par jour, mais jamais la même..

TOULLL · Answer

merci 
vu que j'ai plusieurs pictures mais que je ne veux en masquer qu'un seul qui porte le nom Picture220.
je ne vois pas au niveau de la syntaxe
merci

lolokun · Answer

Il faut rajouter une condition :
If ActiveSheet.Pictures(Nb).Name "Picture220" Then ActiveSheet.Pictures(Nb).Visible True


L'expérience, c'est une connerie par jour, mais jamais la même..

TOULLL · Answer

merci de ton aide et bon weekend

TOULLL · Answer

encore moi excusez

j'ai crée aussi des cases à cocher; dans l'onglet nom j'ai écris par exemple case a cocher 220 mais avec tes explications il n'y a pas d'erreur de code mais il n'efface pas ma case à cocher dans ma feuille
Sub essai()
Nb = ActiveSheet.Pictures.Count
If ActiveSheet.Pictures(Nb).Name "case a cocher 220" Then ActiveSheet.Pictures(Nb).Hidden True
End Sub

merci

lolokun · Answer

Une case à cocher n'est pas une picture, c'est un autre contrôle.
remplace donc pictures par checkboxes et cela devrait fonctionner


L'expérience, c'est une connerie par jour, mais jamais la même..

cs_lermite222 · Answer

Bonjour,
Serais peut-être plus simple avec..
ActiveSheet.Shapes("Image1").Visible = False
ActiveSheet.Shapes("CheckBox1").Visible = True
A+

TOULLL · Answer

bonjour et bon début de semaine, 
je n'arrive toujours pas à masquer mes cases à cocher. j'ai changé le nom en "case" mais rien à faire. cette case ne se masque pas.problème de syntaxe de nom.
quand je dis le nom, c'est ce que j'écris sous excel dans la colonne qui affiche généralement les cordonnées des celules.

si quelqu'un peut m'aider, merci 


Sub essai()
Nb = Feuil1.CheckBoxes.Count
If Feuil1.CheckBoxes(Nb).Name "case" Then Feuil1.CheckBoxes(Nb).Hidden True
End Sub

a+

jerome

lolokun · Answer

Bonjour,

Come l'a dit Lermite22, son code est plus simple, j'y avais pensé à un moment mais pas trop cherché :p

Et relis ce que l'on t'a écrit ce n'est pas hidden...


L'expérience, c'est une connerie par jour, mais jamais la même..

TOULLL · Answer

merci à vous deux , j'étais effectivement resté sur ta premiere idée  . la réponse de lermite22 fonctionne.
merci encore

jerome

MASQUER ET AFFICHER LIGNE SUR VBA EXCEL

13 réponses

Votre réponse

Discussions similaires