Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment copier uniquement les bordures de la plage sélectionnée dans Excel?

Lorsque vous utilisez Microsoft Excel, il est facile de copier uniquement les valeurs de cellule, le formatage de cellule, les formules de cellule et ainsi de suite à partir d'une plage avec la fonction Collage spécial. Mais avez-vous déjà essayé de copier uniquement le style de bordure d'une plage dans Excel? Cet article vous montrera la méthode de copier seulement les frontières de la gamme sélectionnée à une nouvelle gamme dans Excel.

Copier uniquement les bordures de la plage sélectionnée avec le code VBA


flèche bleue droite bulleCopier uniquement les bordures de la plage sélectionnée avec le code VBA


Le code VBA suivant peut vous aider à copier uniquement le style de bordure des cellules sélectionnées, puis à appliquer ce style de bordure à une nouvelle plage dans Excel. S'il vous plaît faire comme suit.

1. appuie sur le 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, puis copiez et collez le code VBA ci-dessous dans la fenêtre Code.

Code VBA: copier uniquement les bordures de la plage sélectionnée dans Excel

Sub CopyBorders()
    Dim xRg As Range
    ActiveWorkbook.Styles("Normal").IncludeBorder = False
    On Error Resume Next
    Set xRg = Application.InputBox("Select Range with Borders to Copy...", "Kutools For Excel", , , , , , 8)
     
    With Application.InputBox("Select Cell to Apply Borders to range..", "Kutools For Excel", , , , , , 8)
        xRg.Copy
        .PasteSpecial -4122
        .Resize(xRg.Rows.Count, xRg.Columns.Count).Style = "Normal"
    End With
    ActiveWorkbook.Styles("Normal").IncludeBorder = True
End Sub

3. appuie sur le F5 clé pour exécuter le code. Dans le premier popping Kutools for Excel boîte de dialogue, sélectionnez la plage avec les bordures à copier, puis cliquez sur OK .

4. Dans la seconde Kutools for Excel boîte de dialogue, sélectionnez une cellule pour appliquer la bordure copiée, puis cliquez sur OK bouton. Voir la capture d'écran:

Ensuite, vous pouvez voir seulement le style de bordure de la gamme sélectionnée est copié et appliqué à une nouvelle gamme comme ci-dessous capture d'écran montré.


flèche bleue droite bulleArticles connexes:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
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.
    David Kassover · 15 days ago
    The code also copied my numeric formats and overwrote those in the target cells. Perhaps I did something wrong?
    • To post as a guest, your comment is unpublished.
      crystal · 1 days ago
      Hi David,
      In my case, the code only copy the borders into the target cells. Can you tell me your Excel version? Thank you for your comment.