Note: The other languages of the website are Google-translated. Back to English
Se connecter  \/ 
x
or
x
S'inscrire  \/ 
x

or

Comment changer les guillemets droits en guillemets bouclés dans Word?

Normalement, Microsoft Word changera automatiquement les guillemets droitsaux citations bouclées (d'ortypographe intelligent)pendant que vous tapez. Mais si la fonction est désactivée, les guillemets simples et doubles peuvent apparaître directement dans votre document. Voici des conseils pour changer les guillemets droits en guillemets bouclés et vice versa dans Word.

Changer les guillemets droits en guillemets bouclés avec Rechercher et remplacer

Changer les guillemets droits en guillemets bouclés avec VBA


flèche bleue bulle droite Changer les guillemets droits en guillemets bouclés avec Rechercher et remplacer

Populaire
Incroyable! Utilisez des onglets efficaces dans Word (Office) comme Chrome, Firefox et le nouvel Internet Explorer!

En savoir plus Télécharger gratuitement

Avant d'appliquer Rechercher et remplacer, vous devriez aller à Options de correction automatique pour décocher le "Guillemets droits" avec "guillemets intelligents" Case à cocher.

Dans Word 2003, Options de correction automatique est sous la Outil bar. Et dans Word 2007, appliquer Options de correction automatique en cliquant > Options : > proofing > Options de correction automatique. Ici, nous prenons Word 2010/2013 par exemple:

Étape 1. Cliquez sur > Option > proofing > Options de correction automatique > Mise en forme automatique à mesure que vous tapezEt sélectionnez "Guillemets droits" avec "guillemets intelligents" case à cocher. Voir la capture d'écran :

Étape 2. Cliquez sur Accueil > remplacer et POSTPRODUCTION groupe ou presse Ctrl + H afficher Rechercher et remplacer boîte de dialogue et entrez »or « in Trouvez ce que boîte, et entrez » or ''in Remplacez-le par boîte. Voir la capture d'écran:

Étape 3. Cliquez sur Remplacer tout.

A Noter: si vous souhaitez remplacer tous les guillemets bouclés par des guillemets droits, veuillez effacer "Guillemets droits" avec "guillemets intelligents" case à cocher).


flèche bleue bulle droite Changer les guillemets droits en guillemets bouclés avec VBA

Pour remplacer tous les guillemets droits par des guillemets bouclés dans Word 2010 en utilisant VBA, veuillez cliquer sur Déposez le> Option > proofing et cliquez sur Correction automatique Options : et sélectionnez le "Guillemets droits" avec "guillemets intelligents" case à cocher comme suit en premier. (Notes: si vous souhaitez remplacer tous les guillemets par des guillemets droits, veuillez décocher la case "Guillemets droits" par "guillemets intelligents").

Étape 1: Appuyez sur "Alt-F11»Pour ouvrir la fenêtre Microsoft Visual Basic pour Application;

Étape 2: cliquez sur Module sur le insérer , copiez et collez le code VBA suivant dans le Module fenêtre;

Étape 3: Cliquez ensuite sur course bouton pour appliquer le VBA.

Le VBA suivant consiste à changer les guillemets droits en guillemets bouclés:

Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

 

Le VBA suivant consiste à changer les guillemets bouclés en guillemets droits:

Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub


Outils de productivité Word recommandés

 

Kutools For Word - Plus de 100 fonctionnalités avancées pour Word, économisez 50% de votre temps

  • Les opérations compliquées et répétées peuvent être effectuées une seule fois en quelques secondes.
  • Insérez simultanément plusieurs images dans des dossiers dans un document Word.
  • Fusionner et combiner plusieurs fichiers Word dans des dossiers en un seul avec l'ordre souhaité.
  • Divisez le document actuel en documents séparés selon l'en-tête, le saut de section ou d'autres critères.
  • Convertissez des fichiers entre Doc et Docx, Docx et PDF, collection d'outils pour les conversions et la sélection courantes, etc.
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Sri · 3 years ago
    The VBA code method for changing "straight" to "smart" quotes worked perfectly! Thank you!
  • To post as a guest, your comment is unpublished.
    no name · 3 years ago
    My problem is that I have work normally in German but have an English document, which I marked as "English". Then I did find&replace and it converted them to lower " and upper " as it would happen in German. I looked at all the settings but I couldn't find it. I changed the dictionary language and everything else I could find to English... any idea?
    • To post as a guest, your comment is unpublished.
      Cathy · 2 years ago
      This is my problem too. Did you ever find an answer?
  • To post as a guest, your comment is unpublished.
    Bill Smith · 7 years ago
    Your explanation for replacing in Find/Replace from instruction #2 on is completely incomprehensible.
    • To post as a guest, your comment is unpublished.
      Dustin · 6 years ago
      I think I found the explanation on another page. If you simply do a replace all and ask it to replace either single quotes or double quotes with the exact same symbol, it will go through and apply your autocorrect rules, including to replace straight quotes with smart quotes. So it should update those all to smart quotes as it goes.