XL 2016 Problème lien hypertexte

[acasses]

Bonjour, j'ai créé un fichier Excel source qui pointe vers d'autres classeurs via des liens hypertextes.

J'utilise cette fonction pour créer des devis, j'ai mis le fichier source en tant que modèle pour que mes collaborateurs ne puissent pas le modifier (pour éviter de supprimer les formules par exemple)

Mais malgré cette opération le fichier "devis" est modifiable ...

Quelqu'un aurait une solution à mon problème ?

Je vous remercie par avance,

 

[job75]

Bonsoir acasses, bienvenue sur XLD,

Votre exposé n'est pas clair.

De toute façon tout fichier Excel peut être modifié, volontairement ou par erreur.

A+

 

[acasses]

Bonsoir, merci pour votre réponse.
Quand un fichier simple est mis en modèle Excel il n'est pas modifiable normalement ...

 

[job75]

Quand un fichier simple est mis en modèle Excel il n'est pas modifiable normalement ...

Bien sûr que si, il suffit d'enregistrer le fichier ouvert au format Modèle xltx ou xltm.

 

[acasses]

oui mais ça ne modifie pas le fichier source alors ?

 

[Molpé41]

Bonjour, J'ai le même pb.
Je reformule la question autrement : un double clic sur un modèle xltx dans Windows Explorer ouvre une copie du fichier modèle. A l'enregistrement, il sera naturellement au format fichier xlsx (et non xltx) Ca ça fonctionne bien.
Maintenant, comment obtenir le même fonctionnement en lançant le processus à partir d'un lien dans un fichier ? C'est la question. En mettant un simple lien, Excel se contente d'ouvrir le modèle et non un copie.
De mémoire, "dans le temps", il suffisait de mettre un connecteur (/xxx) après le nom du modèle pour paramétrer la façon dont il s'ouvrait mais je ne retrouve pas ces infos dans l'aide Microsoft.
Si une bonne âme sait comment faire... Merci.

 

[job75]

Bonjour Molpé41,

Avec un lien hypertexte ça ne va pas mais avec une macro si.

Téléchargez les 2 fichiers zippés joints dans le même dossier.

Ouvrez le fichier Devis.xlsm et faites un double-clic en B3 ce qui lance la macro :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, [B3]) Is Nothing Then _
    Workbooks.Open ThisWorkbook.Path & "\Modèle.xltx" 'chemin à adapter
End Sub

A+

 

[Molpé41]

Merci. ça fait bien le job...75
Une macro qui répond parfaitement à la question. Dommage que Monsieur Microsoft n'ai pas pensé qu'un modèle n'avait pas vocation à s'ouvrir naturellement au format... modèle !
Merci encore pour ce retour rapide. Excellement vôtre.