XL 2013 fiche technique + mercuriale cuisine

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #46

En fait il me faudrait peut-être une vidéo pour voir ce que tu essaies de m'expliquer

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 20 Juin 2019

• #47

Re
il faut positiver Lol
une vidéo je sais pas faire (et Pourquoi faire ?) Lol
je continue les explications
as tu testé le fichier que j'ai joint #42
si tu rajoutes a ce fichier une feuille "Fiche technique 12" par exemple et que tu double Click dans une des cellules a approvisionner et bien tu verras que cela va fonctionner .
Car la Procédure qui fait le Boulot se trouve dans le ThisWorkbook et prend en Compte toutes les Feuilles ajoutées à ce Classeur dont le Nom ressemblera à "Fiche technique*"( le "*" remplace n'importe quels suite de Caractères), on pourrait affiner si besoin .
Thisworkbook ensemble des éléments qui composent le Classeur
ses procédures s'appliquent à l'ensemble des éléments du Classeur et a leurs procédure
Ex : Ensemble des Double Click (n'importe où) effectués dans l'une des feuilles du Classeur.
Feuille "Fiche technique x" ne concernée que cette Feuille x
Faire Alt+F11 pour visualiser le Code dans ThisWorkbook
Edit : j'ai rajouté un test pour ne pas prendre en Compte les Lignes
Ex: Boucherie , Poissonnerie etc etc , tant quelles sont en Gras !
jean marie

 

Pièces jointes

• Fiche technique interactive - Mercuriale-Chti160-3.xlsm

  73 KB · Affichages: 13

Dernière édition: 20 Juin 2019

Vote positif 0 Vote négatif

jcf6464

XLDnaute Impliqué

• 20 Juin 2019

• #48

Bonjour Positive, chti, et le forum,

C'est très bien ce que tu à fait mais si elle veut changer le nom de l'onglet plus rien ne marche "Mercuriale" et double-clic,

a+jc

 

Vote positif 0 Vote négatif

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #49

Rhoooo, ça marche!!!
En fait, j'avais testé, mais sans renommer ma nouvelle feuille, donc ça ne fonctionnait pas!
C'est absolument génial, merci infiniment Jean-Marie pour ton travail, ton aide, ta gentillesse et ta patience
Je vais pouvoir me mettre au travail et remplir tout ça tranquillement grâce à toi!
Heu, j'abuse, si je te demande encore un truc, quitte à avoir sous la main un génie (à mes yeux ) ?
Est-ce qu'il serait possible de nommer les feuilles FT (pour fiches techniques), et ensuite je rajoute le nom de la recette?
Par exemple : toutes les feuilles sont FT,
FT - Ratatouille
FT - Curry de légumes
...
Parce que ça sera plus facile de retrouver les recettes qu'avec Fiche technique 1, Fiche technique 2, etc...
Ou alors je me crée un sommaire si c'est trop compliqué... Dis moi

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 20 Juin 2019

• #50

Re
Effectivement！
et aussi , si elle change le nom de base des Fiches （Fiche technique）Lol
mais on pourrait creer un Variable du genre
Public StrShtNameAs String
puis initialiset la variable
StrShtName=“Mercuriale”
Et remplacer dans la Procedure le nom par la variable.
jean marie

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 20 Juin 2019

• #51

Re tu as la reponse
en dessus lol
grâce à jc
je te mets un fichier exemple
jean marie

 

Vote positif 0 Vote négatif

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #52

Heu???

 

Vote positif 0 Vote négatif

jcf6464

XLDnaute Impliqué

• 20 Juin 2019

• #53

Re à vous tous

Pas de fichier attaché post51

Bon une ébauche de se qui devrais être, avec mes modeste savoir,

J'ai rajouter dans "Mercuriale " une colonne avec les en-tettes des chapitres qui fonctionne comme les ingrédients

a+jc

 

Pièces jointes

• Fiche technique interactive - Mercuriale-Chti160-V-2.xlsm

  82.1 KB · Affichages: 13

Dernière édition: 20 Juin 2019

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 20 Juin 2019

• #54

Re
voir Le Fichier !
Dans le Module "Module1" tu as acces aux variables qui permettent de Chnager les références a prendre en Compte
ex : "FT-" pour les Feuille Cible et "Mercuriale" pour la Feuille Source
Soit pour ce Fichier :

VB:

Public Const ShtCibleName As String = "FT-"
Public Const ShtSourceName As String = "Mercuriale"

jean marie

 

Pièces jointes

• Fiche technique interactive - Mercuriale-Chti160-4.xlsm

  73.2 KB · Affichages: 11

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 20 Juin 2019

• #55

Re
jc
pourquoi avoir mis dans ton fichier la procédure

VB:

Workbook_SheetBeforeDoubleClick

Dans chaque procédure des feuilles "Fiche technique x" ?
pas lieu d'être !
Uniquement dans le ThisWorkbook du classeur
c'était un avertissement

Pas de fichier attaché post51

Cliquez pour agrandir...

pour quelle revienne Lol
jean marie

 

Vote positif 0 Vote négatif

jcf6464

XLDnaute Impliqué

• 20 Juin 2019

• #56

Re

Avec mes excuses des fois je fait des trucs et essai et cela reste,
non une erreur à supprimer

a+ jc

 

Vote positif 0 Vote négatif

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #57

J'ai testé la dernière version, avec les FT- curry... mais ça ne semble plus relié à la mercuriale?

 

Vote positif 0 Vote négatif

jcf6464

XLDnaute Impliqué

• 20 Juin 2019

• #58

Re

Chez moi cela fonctionne

Bon app jc

 

Vote positif 0 Vote négatif

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #59

jcf6464 à dit:

Re à vous tous

Pas de fichier attaché post51

Bon une ébauche de se qui devrais être, avec mes modeste savoir,

J'ai rajouter dans "Mercuriale " une colonne avec les en-tettes des chapitres qui fonctionne comme les ingrédients

a+jc

Cliquez pour agrandir...

Très intéressant pour créer simplement une autre fiche technique, mais j'ai besoin de FT à la place de Fiche technique pour gagner des caractères sur les titres

 

Vote positif 0 Vote négatif

P

Positive37

XLDnaute Nouveau

• 20 Juin 2019

• #60

jcf6464 à dit:

Re

Chez moi cela fonctionne

Bon app jc

Cliquez pour agrandir...

Alors, les fiches que tu as crées fonctionnent mais si j'en crée une nouvelle, cela ne fonctionne plus. Il faut que je remette le code à chaque fois?
Bon appétit

 

Vote positif 0 Vote négatif