Discussion :

[madgraphic]

Bonjour,

Suite à une formation d'initiation à l'utilisation des macros sur Excel, j'ai découvert une fonction fort utile qui permet de passer le contenu d'une cellule en majuscules sans perdre les accents : UCase.

Avec l'aide du formateur, j'ai créé cette macro Excel qui me permet de l'activer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub MiseEnMajuscules()
Dim VSelection As Range
    For Each VSelection In Selection
    VSelection.FormulaR1C1 = UCase(VSelection.FormulaR1C1)
    Next
End Sub

J'avais ensuite créé la même macro dans Word pour pouvoir l'utiliser aussi sur cette application.

Suite à une mise à jour de mon poste, et un changement de version de Word et d'Excel (désormais 365), j'ai dû recréer manuellement cette macro.
Elle fonctionne bien dans Excel... mais plante dans Word : message d'erreur : "Erreur de compilation : Membre de méthode ou de données introuvable".

Ceci me laisse vraiment perplexe !

Est-ce que vous pourriez m'aider à la faire fonctionner également dans Word ?

Merci pour votre aide,

Bien cordialement,

Madgraphic

[E KERGRESSE]

Bonjour,

Si vous mettez un point derrière VSelection, vous vous apercevrez que FormulaR1C1 n'existe pas puisque c'est une propriété Excel.



La question est de savoir ce que vous cherchez à mettre en majuscule, tout le document ou seulement une partie ? Dans le second cas, il faudrait préciser en mettant éventuellement un exemple en ligne.

[madgraphic]

Bonjour,

Ce script vise à passer en majuscules uniquement le contenu des cellules sélectionnées (pas tout de document).

Par exemple, si le cellule sélectionnée contient "André", le script a pour but de le transformer en "ANDRÉ".

La fonction de mise en majuscule qui est présente dans le ruban de Word fait sauter les accents : si on l'utilise dans l'exemple que je vous propose, on obtient en résultat "ANDRE".

Curieusement, la fonction que j'avais trouvée dans Excel passait en majuscules tout en conservant les accents et autres cédilles.
C'est pour cela que j'avais créé un script dans Word pour bénéficier de cette fonction améliorée.

Malheureusement, cela ne semble plus fonctionner dans Word 365...
Peut-être existe-t-il un autre moyen de l'appeler ?

Bien cordialement,

Madgraphic

[E KERGRESSE]

Vous auriez un exemple de fichier avec les champs à transformer ?

[Slasifi]

La fonction de mise en majuscule qui est présente dans le ruban de Word fait sauter les accents

...sauf si on active l'option "Majuscules accentuées en français" dans Fichier, Options, Vérification

Rappel : Maj+F3 change la casse