1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    février 2017
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 22
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Enseignement

    Informations forums :
    Inscription : février 2017
    Messages : 2
    Points : 1
    Points
    1

    Par défaut Astérique devant des majuscules

    Bonsoir à tous!

    Pour mes recherches en linguistique, je dois préparer des fichiers word ou .txt qui ne contiennent aucune majuscule. Avec la partie de code (qui serait la seconde partie de la macro) ci-dessous j'arrive déjà à passer le texte en minuscule. J'aimerais trouver une solution qui permette d'ajouter un astérisque (*) devant la première lettre de chaque mot en majuscule (qu'il commence soit avec la première lettre soit entièrement en majuscule).

    Par exemple:
    "Le Chien GRIS" donnera "*le *chien *gris".

    La première partie:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    [Contient le code pour les astérisques]
    La seconde partie:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    Sub Macro2()
    '
    ' Macro2 Macro
    '
    '
        Selection.Find.ClearFormatting
        With Selection.Find
            .Text = "<[A-Z]*>"
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindAsk
            .Format = True
            .MatchCase = False
            .MatchWholeWord = False
            .MatchAllWordForms = False
            .MatchSoundsLike = False
            .MatchWildcards = True
        End With
        Selection.Range.Case = wdLowerCaseAll
    End Sub
    Pouvez-vous m'aider pour le début du code, s'il vous plaît?
    Et pouvez-vous m'indiquer également si .Text = "<[A-Z]*>" inclut la recherche des majuscules "Â, Ê, Î, Ô, Û, Ä, Ë, Ï, Ö, Ü, À, Æ Ç, É, È, Œ, Ù, Ñ", c'est-à-dire les majuscules accentuées.

    Merci d'avance pour votre aide, bonne soirée !

  2. #2
    Expert confirmé

    Inscrit en
    août 2006
    Messages
    3 720
    Détails du profil
    Informations forums :
    Inscription : août 2006
    Messages : 3 720
    Points : 5 083
    Points
    5 083

    Par défaut

    Bonjour,
    Citation Envoyé par Sintm Voir le message
    [B]
    Pouvez-vous m'aider pour le début du code, s'il vous plaît?
    Et pouvez-vous m'indiquer également si .Text = "<[A-Z]*>" inclut la recherche des majuscules "Â, Ê, Î, Ô, Û, Ä, Ë, Ï, Ö, Ü, À, Æ Ç, É, È, Œ, Ù, Ñ", c'est-à-dire les majuscules accentuées.
    En faisant le test toi-même, tu aurais déjà la réponse
    Il court en ce moment une espèce de grippe, mais elle ne court pas très vite, car on peut l'attraper sans courir.

  3. #3
    Nouveau Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    février 2017
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 22
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Enseignement

    Informations forums :
    Inscription : février 2017
    Messages : 2
    Points : 1
    Points
    1

    Par défaut

    Rebonjour,

    En effet, ca marche bien.
    J'avais peur que certaines majuscules ne soient pas prises en compte vu le nombre de possibilités (comme č dz ǟ ш). Mais tout fonctionne parfaitement.

    Merci.

Discussions similaires

  1. le mot de passe ne tient pas compte des majuscules
    Par jeanfi77 dans le forum PHP & MySQL
    Réponses: 5
    Dernier message: 28/03/2007, 16h17
  2. Mettre des majuscules au début de chaque mot
    Par Guilhem_mdg dans le forum Regex
    Réponses: 9
    Dernier message: 01/02/2007, 10h33
  3. [Fait] Forcer des majuscules
    Par Strix dans le forum Fichiers
    Réponses: 4
    Dernier message: 26/12/2006, 20h04
  4. J'ai trouvé l'origine du problème des majuscules accentuées sous FF!
    Par Médinoc dans le forum Evolutions du club
    Réponses: 14
    Dernier message: 28/07/2006, 16h13
  5. Gestion des majuscules des miniscules des accent
    Par issam16 dans le forum Access
    Réponses: 2
    Dernier message: 13/07/2006, 14h21

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo