Ouverture d'un fichier sur la bonne feuille

Question

Bonjour et merci pour l'aide à venir.

J'ai fichier test contenant 4 feuilles (onglet1, onglet2, onglet3, onglet4).

Je voudrais qu'à l'ouverture du fichier test , selon la valeur de la cellule C6 de chaque onglet, que l'ouverture du fichier se fasse sur l'onglet correspondant.

If Worksheets("onglet1").Range("C6").Value = Null Then
    Worksheets("onglet1").Select
    ElseIf Worksheets("onglet2").Range("C6").Value <> Null Then
    Worksheets("onglet2").Select
    ElseIf Worksheets("onglet3").Range("C6").Value <> Null Or "tester" Then
    Worksheets("onglet3").Select
    ElseIf Worksheets("onglet4").Range("C6").Value <> Null Or "tester" Then
    Worksheets("onglet4").Select
End If

Les 2 premières conditions ne semblent pas poser de problemes, en revanche j'ai un soucis pour les 2 dernières.

Merci à ceux qui pourront me venir en aide.

M12 · Accepted Answer

If Worksheets("onglet1").Range("C6").Value = Null Then Worksheets("onglet1").Select ElseIf Worksheets("onglet2").Range("C6").Value &lt;&gt; Null Then Worksheets("onglet2").Select ElseIf Worksheets("onglet3").Range("C6").Value &lt;&gt; Null Or Worksheets("onglet3").Range("C6").Value="tester" Then Worksheets("onglet3").Select ElseIf Worksheets("onglet4").Range("C6").Value &lt;&gt; Null Or Worksheets("onglet4").Range("C6").Value ="tester" Then Worksheets("onglet4").Select End If...

3GB · Answer

Le problème, c'est que vos conditions ne se contredisent pas... Je pense qu'il faudrait trouver autre chose. Et le problème, c'est que l'opérateur Or ne permet pas la factorisation des conditions, il faut répéter ...range("C6") = "tester". En tout cas, voici un essai : private sub workbook_open() for each ws in worksheets &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ws.index &lt;= 2 then &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ws.range("C6") &lt;&gt; "" then ws.activate: exit for &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if ws.range("C6") = "tester" then ws.activate: exit for &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;end if &nbsp;&nbsp;&nbsp;&nbsp;next ws end sub A la première condition vraie, la feuille en question est activée et on quitte le code. Cdlt...