Bonjour,
Je viens d'essayer de voir ou se trouvait le problème, l'erreur apparaît lorsque la valeur de x passe de 2 à 1
, je pense qu'il bloque car il ne trouve aucune feuille à afficher.
Pour vérifier j'ai laissé une feuille visible et ça fonctionne, il doit donc y avoir un cas ou il ne trouve rien à afficher et la je bloque.
Peux tu me dire ce que signifie le > 0 dans ( iNb = IIf(InStr(UCase(Sheets(x).Name), UCase(Me.txt.Text)) > 0, iNb + 1, iNb)).
Sheets("Pilougne").Visible = True
Sheets(x).Visible = IIf(iIdx = 1 Or (iIdx = 2 And Sheets(x).Name = "Index") Or _
(iIdx = 3 And iFlag > 0), True, IIf(x = 1 And iIdx = 3 And iNb = 0, True, False))
Je te remercie et te souhaite un bon Weekend.
Pilougne