A
Anynoor
Guest
Bonjour le forum,
Voilà, je débute en VBA donc pas très sûre de moi, j'ai besoin de vos conseils s'il vous plaît.
J'ai 2 macros pour cacher et afficher les formules, ils fonctionnent correctement. J'ai rajouté dans le menu d'excel 2 icônes (2 bonhommes) un pour "afficher" et l'autre pour "cacher".
Jusqu'ici tout va bien, mais je viens de m'apercevoir que ces macros ne peuvent s'appliquer à toutes les fichiers car les noms des feuilles ne se ressemblent pas !
Avez-vous une solution pour mon problème please ?
Voici le code :
Sub cacherformule()
ActiveSheet.Unprotect
Worksheets("Feuil1").Range("A1M5000").FormulaHidden = True
ActiveSheet.Protect
End Sub
Sub afficherformule()
ActiveSheet.Unprotect
Worksheets("Feuil1").Range("A1M50000").FormulaHidden = False
ActiveSheet.Protect
End Sub
Merci beaucoup
A+
Anynoor
Voilà, je débute en VBA donc pas très sûre de moi, j'ai besoin de vos conseils s'il vous plaît.
J'ai 2 macros pour cacher et afficher les formules, ils fonctionnent correctement. J'ai rajouté dans le menu d'excel 2 icônes (2 bonhommes) un pour "afficher" et l'autre pour "cacher".
Jusqu'ici tout va bien, mais je viens de m'apercevoir que ces macros ne peuvent s'appliquer à toutes les fichiers car les noms des feuilles ne se ressemblent pas !
Avez-vous une solution pour mon problème please ?
Voici le code :
Sub cacherformule()
ActiveSheet.Unprotect
Worksheets("Feuil1").Range("A1M5000").FormulaHidden = True
ActiveSheet.Protect
End Sub
Sub afficherformule()
ActiveSheet.Unprotect
Worksheets("Feuil1").Range("A1M50000").FormulaHidden = False
ActiveSheet.Protect
End Sub
Merci beaucoup
A+
Anynoor