Bonjour Eric, le Forum,

Désolé pour cette réponse un peu tardive Eric, mais retour de congés 

Sans boucle... La seule piste que je peux imaginer pour ma part, c'est ça :

Sub AdresseCellulesTexte()
'myDearFriend! - www.xlpages.com
Dim PlageTxt As Range
    Set PlageTxt = ActiveSheet.Columns(1).SpecialCells(xlCellTypeConstants, 2)
    MsgBox PlageTxt.Address
End Sub

En espérant que ça puisse t'inspirer...

Bien cordialement,

Bonjour Eric, le Forum,

Peut-être ai-je raté quelque chose mais, à ma connaissance, il n'est pas possible de masquer un Module dans un projet VBA.

En tout cas, ce n'est pas le rôle de l'instruction "Option Private Module" selon moi (si j'ai bien interprété ta demande).

Bien cordialement,

Bonjour nath, bienvenue sur XLpages.com 

Je reprends le problème à l'envers et je te propose la formule suivante :

=SI(N(E2)<1;"";SI(E2>15; "16 et +"; SI( E2>12; "13-15"; SI(E2> 7; "8-12";"7 et -"))))

En espérant que ça puisse te dépanner...

Bien cordialement,

Bonjour Robbynaschjo, bienvenue sur XLpages.com 

Pas sûr d'avoir véritablement compris totalement cette situation de Classeur Mère et Classeur Fils...

Le passage de variables d'un classeur à l'autre n'est effectivement pas si simple. Il existe quelques méthodes et/ou astuces plus ou moins compliquées à mettre en oeuvre. Mais si j'ai bien compris la situation décrite, tu devrais pouvoir t'en sortir très simplement :

Ce que j'ai interprété, c'est :

• tu te retrouves avec 2 classeurs ouverts simultanément (après avoir cliqué dans ton menu du classeur Mère)
• tu souhaites récupérer dans une macro du classeur Fils, une valeur connue du seul Classeur Mère (en l’occurrence, une chaine de caractères représentant un chemin sur disque).

Est-ce bien ça ?

Par ailleurs, tu précises "je note sur mon doc mère dans une cellule le chemin d'enregistrement..."

C'est toujours ça ?

Dans l'affirmative, alors la solution la plus simple, c'est tout simplement de récupérer directement (depuis ton classeur Fils) la valeur stockée dans la cellule du classeur Mère.

Pour ça, dans la macro de ton classeur Fils, tu peux faire juste quelque chose comme ça :

Dim dossier_remboursement As String

dossier_remboursement = Workbooks("MonClasseurMenu.xlsm").Sheets("Feuil1").Range("A1").Value

Le nom du classeur source, le nom de feuille et la référence de cellule sont bien évidemment à adapter à ta situation...

En espérant avoir pu te dépanner...

Bien cordialement,

Bonjour Alain06, bienvenue sur XLpages.com 

_{Voici une suggestion de macro VBA :}

_{DANS UN MODULE DE CODE STANDARD (exemple : Module1)}

En espérant que ça te dépanne...

Bien cordialement,

Bonsoir MDLF, bienvenu sur mDF-XLpages.com

La combinaison Français/Anglais dans une même cellule ne facilite pas le problème, en effet.

Du coup, se baser sur la couleur ne me semble pas vraiment viable.

En observant ton fichier, on peut s'apercevoir qu'il y a des expressions qui ne changeront sans doute pas, notamment les titres de colonnes, telles que "Véhicle", "Color", "Unit amount", "Total per center for all items", etc. Peut-être est-ce aussi le cas pour les types de véhicule : "Car", "Motorcycle", "Boat", et sans doute d'autres....) et avec un peu de chance, c'est peut être encore le cas pour l'ensemble des expressions habituellement présentes dans tes documents...

La question est de savoir si la constitution d'une liste exhaustive des expressions (anglaises) à supprimer est imaginable ou non.

Si c'est le cas, alors une fois cette liste constituée, une simple petite macro VBA de remplacement devrait faire l'affaire.

Dans le cas contraire, je ne vois pas comment t'aider pour ma part.

Bien cordialement,

Je crois que la réponse t'a déjà été donnée ICI fouggy, par l'ami Dranreb.

Je clos donc ce fil de discussions.

Bien cordialement,

Bonjour KeepCool, le Forum,

Ta colonne de valeurs (colonne B) ne contient pas de valeurs numériques ! Elles sont donc considérées comme du texte par Excel et ne sont donc pas prises en compte pour l'élaboration de ton graphique.

C'est facilement repérable au premier coup d'oeil, car :

• sans aucun format de cellule particulier, tes valeurs sont alignées sur la gauche comme un texte classique (alors que des valeurs numériques sont alignées par défaut sur la droite dans Excel).
• le séparateur décimale en france, c'est habituellement la virgule (et non un point, comme dans ton fichier).

Il te faut donc convertir ces valeurs pour obtenir de "vrais" chiffres. Tu as plein de façon de faire à ta disposition : d'abords remplacer les points par des virgules, ensuite, option Données/Convertir ou une formule simple (voir l'article ICI sur CNUM() par exemple) ou modifier manuellement les données, à toi de voir... Je te laisse chercher un peu.

Bien cordialement,

Bonjour Cookies12, le Forum,

(Petite pub pour la « Revue Stileex »* au passage, Cookies12 ? )

Personnellement je n'ai pas d'avis sur les alternatives à Excel. Seulement, à ce jour : Excel (et les autres applications Microsoft Office), c'est pour moi la seule façon d'exploiter les très nombreuses possibilités qu'offre VBA pour MS Office en particulier. Chose qu'on ne retrouve malheureusement pas ailleurs...

Bien cordialement,

* Joli site que celui de l'association STILEEX, avec divers articles assez intéressants.

Bonjour keepCool, le Forum,

Navré keepCool, sur réclamations de plusieurs sites de Turf (voir ICI par exemple), nous ne pratiquons plus ce type de développement sur le présent site XLpages.

Merci de ta compréhension.

Par ailleurs, je crois que la question à l'origine de ce fil de discussion est maintenant résolue. Si tel est le cas, je te remercie de bien vouloir solder ce fil comme indiqué dans ma signature.

Bien évidemment, si tu as d'autres questions, tu es invité à créer une autre discussion.

Bien cordialement,