2 macros sur un bouton

Bonjour,

J'ai un macro sur la feuil 1

Sub MasquerLigneselonValeur()
Debut = 3
Fin = 4000
ColNb = 10
For i = Debut To Fin
If Cells(i, ColNb).Value = "2" Then
Cells(i, ColNb).EntireRow.Hidden = True
Else
Cells(i, ColNb).EntireRow.Hidden = False
End If
Next i
End Sub

et une autre sur la feuil2

Sub MaJ_Tables()
ThisWorkbook.Connections("Nomenclature").Refresh
End Sub

j'essaie de faire en sorte de les lancer en utilisant 1 seul bouton

J'ai crée ceci en insérant un module

Sub Bouton1_Cliquer()
Call MasquerLigneselonValeur 'Macro1
Call MaJ_Tables 'Macro2
End Sub

Mais seulement quand je clique sur le bouton

j'ai beau cherché mais je ne trouve pas la solution, une petite aide sera apprécier

D'avance merci

bonjour krakite

il faut savoir le "codename" de votre feuille "Feuil2",mais normallement c'est aussi "Feuil2". Puis "Call" c'est quelque chose du "Moyen Âge"

C'est mieux de déplacer ces 2 macros vers un module normal au lieu d'un module d'une feuille pour éviter ce genre de problèmes.

Sub Bouton1_Cliquer()
    feuil1!MasquerLigneselonValeur 'Macro1 dans le module de "feuil1" (codename)
    feuil2!MaJ_Tables 'Macro2 dans le module de "feuil2"
End Sub

Merci BsAlv,
Je dois faire très mal un truc, je n'y arrive pas

En pj, mon fichier du coup

Bonjour,

Essayez

Sub Bouton1_Cliquer()
    Feuil1.MasquerLigneselonValeur      'Macro1 dans le module de "Feuil1" (codename)
    Feuil2.MaJ_Tables                   'Macro2 dans le module de "Feuil2"
End Sub

Quand BsAlv parle de "Code name", il se réfère au nom à gauche (le nom de code) de la feuille, et non celui entre parenthèses qui est le nom "d'affichage.

Comprends pas ce qu'il c'est passé, j'ai copier le code de BsAlv, et toutes les lignes apparaissait en rouge, c'est pour celà que j'ai modifié en mettant le nom de la feuille et là ça fonctionne

En tout cas, merci pour votre aide à tout les 2

Tout est OK, merci pour votre aide précieuse