Bonsoir Sébastien et le forum
Cacher une colonne si une des cellules a un le mot "Préposé" dedans, par DeLand
Option Explicit
Option Compare Text
Sub hideprops()
dim c As range
for each c in usedrange
if c.String Like "*Préposé*" then
c.EntireColumn.Hidden = true
end if
next c
end Sub
'PS : Il y a une autre manière d'effectuer ceci, avec la méthode de recherche find, ce qui est d'ailleurs plus efficace.
Tiens je t'ai trouvé cela sur http://xlbysteph.free.fr/
J'espère que tu y trouveras ton bonheur @+