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

or

Comment supprimer la ligne de séparation de note de bas de page / note de fin dans un document Word?

Lors de l'insertion de notes de bas de page ou de notes de fin dans un document Word, vous constaterez qu'il y a toujours une ligne de séparation horizontale au-dessus des textes de note de bas de page ou de fin. Si vous souhaitez vous débarrasser de ces lignes de séparation, essayez les méthodes de cet article.

Supprimer la ligne de séparation de note de bas de page / note de fin dans Word

Supprimer la ligne de séparation de note de bas de page / note de fin avec le code VBA


Supprimer la ligne de séparation de note de bas de page / note de fin dans Word

Vous pouvez supprimer la note de bas de page ou la ligne de séparation de note de fin dans Word comme suit.

1. Dans le document, vous supprimerez sa note de bas de page ou la ligne de séparation des notes de fin, cliquez sur View > Draft.

2. Puis clique Références > Afficher les notes comme ci-dessous la capture d'écran montrée.

3. S'il y a à la fois des notes de bas de page et des notes de fin dans votre document, un Afficher les notes boîte de dialogue apparaîtra, veuillez sélectionner une option selon vos besoins, puis cliquez sur le OK bouton. Ici je sélectionne Afficher la note de bas de page région.

Notes: Si seule une note de bas de page ou une note de fin existe dans votre document, ignorez cette étape et passez à l'étape 4.

4. Maintenant, le Notes section s'affiche à la fin du document, veuillez sélectionner Séparateur de notes de bas de page et Notes liste déroulante, sélectionnez la ligne de séparation puis appuyez sur le bouton Supprimer touche pour le supprimer. Voir la capture d'écran:

5. Passez à la Mise en page vue du document.

Ensuite, vous pouvez voir que la ligne de séparation de la note de bas de page est immédiatement supprimée du document.

Notes: Pour supprimer la ligne de séparation de la note de fin, il vous suffit de vérifier Afficher la note de fin zone ci-dessus Afficher les notes boîte de dialogue, puis sélectionnez Séparateur de notes de fin et Notes la liste déroulante.


Supprimer les lignes de séparation de note de bas de page / note de fin avec le code VBA

Si la méthode ci-dessus ne vous convient pas, vous pouvez essayer les codes VBA suivants pour supprimer rapidement toutes les lignes de séparation de la note de bas de page ou les notes de bas de page et de fin du document.

1. Dans le document, vous supprimerez la ligne de séparation de la note de bas de page, appuyez sur la touche autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Copiez ensuite le code VBA ci-dessous dans la fenêtre Module.

Code VBA: supprimer la ligne de séparation des notes de bas de page dans le document

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub

3. appuie sur le F5 clé pour exécuter le code. Ensuite, toutes les lignes de séparation des notes de bas de page sont immédiatement supprimées du document.

Notes: Si vous souhaitez supprimer toutes les lignes de séparation de la note de bas de page et de la note de fin, le code VBA ci-dessous peut vous aider.

Code VBA: supprimer les lignes de séparation des notes de bas de page et de fin dans le document

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
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.
    Sork · 1 years ago
    Brilliant! Thank you!
  • To post as a guest, your comment is unpublished.
    Abhi · 1 years ago
    Thank you very much you have saved me from my boss he was like please do anything I want a good presentation and this footnotes are like a shit.thanks to you.
  • To post as a guest, your comment is unpublished.
    Codelurker · 1 years ago
    If you have more than one page of footnotes, you'll also want to remove the "Footnote Continuation Separater". They sure make it hard to find; when a double-click might just take you to it. This did help me too, BTW.
  • To post as a guest, your comment is unpublished.
    bjorbre · 2 years ago
    Thanks!
    Worked for me :-)