Fonction IF dans une suite de texte

Bonjour à tous,

J'aimerais créer une macro pour pouvoir ouvrir automatiquement une feuille à partir d'une autre. Le lien permettant d'ouvrir la feuille serait généré à partir d'informations présentes dans la feuille. Exemple ci-dessous :

Workbooks.Open Filename:=("" _
                        & Left(ActiveWorkbook.Name, InStr(1, ActiveWorkbook.Name, " - ") - 1) _
                        & Sheets("E").Range("B4") _
                        & "\DA " _
                        & Year(Sheets("E").Range("B7")) - 1 _
                        & " - " _
                        & Year(Sheets("E").Range("B7")) - 1 _
                        & " - " _
                        & Sheets("E").Range("D3") _
                        & ".xlsx")

J'aimerais cependant pouvoir avoir du conditionnel dans la génération du lien, cependant rien à faire ça ne fonctionne pas. Exemple du code testé (ajout de la partie avec le If) :

Workbooks.Open Filename:=("" _
                        & Left(ActiveWorkbook.Name, InStr(1, ActiveWorkbook.Name, " - ") - 1) _
                        & Sheets("E").Range("B4") _
                        & "\DA " _
                        & Year(Sheets("E").Range("B7")) - 1 _
                        & " - " _
                        & If (Sheets("E").Range("D3") ="Personnel" then "G"
                          If (Sheets("E").Range("D3") = "Ventes" then "B" _
                        & Year(Sheets("E").Range("B7")) - 1 _
                        & " - " _
                        & Sheets("E").Range("D3") _
                        & ".xlsx")

Y a t'il un moyen d'ajouter une partie de conditionnel dans la génération du lien ? Si oui comment ?

Je ne souhaite pas mettre le conditionnel en début de code (avant la génération du lien) car j'ai pas mal de conditionnel à mettre et ça me ferait faire un code très long.

Merci par avance pour vos conseils et bonne journée :)

Camille

Bonjour Camille1234

On nous les aura toutes faites... mais alors celle là

Passez donc par des variables et construisez ainsi votre nom de fichier
https://www.excel-pratique.com/fr/vba/variables

A+

Effectivement je n'y ai pas pensé, je suis assez bip

Merci beaucoup ! :)