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 supprimer des cellules ou des lignes si ce n'est pas en gras dans Excel?

Supposons que vous ayez une plage de données avec des cellules en gras et non des cellules en gras comme illustré ci-dessous. Désormais, vous devez supprimer les cellules ou les lignes si elles ne sont pas en gras. Au lieu de supprimer les cellules non en gras une par une manuellement, ce tutoriel présente les astuces pour vous permettre de les résoudre rapidement dans Excel.

doc supprimer sinon gras 1

Supprimer les lignes si non en gras avec VBA

Supprimer les cellules si elles ne sont pas en caractères gras avec Rechercher et remplacer et Sélectionner l'assistant de plage

Supprimez les lignes / cellules si elles ne sont pas en gras avec Kutools for Excel bonne idée3


v Supprimer les lignes si non en gras avec VBA

Pour supprimer des lignes si ce n'est pas en gras, vous pouvez utiliser un code VBA à gérer.

1. presse F11 + Alt touches pour activer le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module, puis collé ci-dessous le code VBA à la nouvelle Module fenêtre.

VBA: Supprimer les lignes si non en gras.

Sub DeleteNonBolded()
'UpdatebyKutoolsforExcel20151116
    Dim xRg As Range
    Dim xDelRg As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    Dim I As Long
    Dim xBold As Variant
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a range", "Kutools for Excel", xAddress, , , , , 8)
    Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "This VBA cannot support multiple range", , "Kutools for Excel"
        Exit Sub
    End If
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For I = 1 To xRg.Rows.Count
        xBold = xRg.Rows(I).Cells.Font.Bold
        If TypeName(xBold) = "Boolean" Then
            If xBold = False Then
                If xDelRg Is Nothing Then
                    Set xDelRg = xRg.Rows(I).EntireRow
                Else
                    Set xDelRg = Union(xRg.Rows(I).EntireRow, xDelRg)
                End If
            End If
        End If
    Next
    xDelRg.Delete
    Application.ScreenUpdating = xUpdate
End Sub

3. presse F5 clé pour exécuter le code VBA. Dans le popping up Kutools for Excel boîte de dialogue, veuillez spécifier la plage dans laquelle vous allez supprimer les lignes sans cellules en gras, puis cliquez sur le OK .

doc supprimer sinon gras 2

Et puis vous pouvez voir les lignes qui ne contiennent pas de cellules en gras ont été supprimés

doc supprimer sinon gras 1doc arrow droitedoc supprimer sinon gras 3

Remarque: les lignes peuvent être supprimées uniquement lorsque toutes les cellules de la même ligne ne sont pas en gras.

formule Ne plus jamais avoir à vous soucier des longues formules longues dans Excel! Kutools for Excel's Texte automatique peut ajouter toutes les formules à un groupe
en tant que texte automatique, et libérez votre cerveau! Cliquez ici pour connaître le texte automatique Cliquez ici pour obtenir un essai gratuit

Supprimer les cellules si elles ne sont pas en caractères gras avec Rechercher et remplacer et Sélectionner l'assistant de plage

Si vous souhaitez simplement supprimer le contenu de la cellule des cellules non en gras, vous pouvez d'abord utiliser la fonction Rechercher et remplacer pour sélectionner les cellules en gras, puis utiliser Kutools for Excel's Sélectionnez Range Helper pour inverser la sélection des cellules non en gras, puis supprimez le contenu.

Kutools for Excel, avec plus de 120 fonctions Excel pratiques, améliorez votre efficacité de travail et économisez votre temps de travail.

1. Sélectionnez la plage de données dans laquelle vous souhaitez supprimer les cellules non en gras et appuyez sur Ctrl + F autoriser Rechercher et remplacer dialogue, et cliquez sur Options bouton. Voir la capture d'écran:

doc supprimer sinon gras 4

2. Cliquez Format pour aller à la Trouver le format dialogue, et sous Fonte onglet, sélectionnez goupille du Le style de police liste. Voir la capture d'écran:

doc supprimer sinon gras 5

3. Cliquez OK > Trouver tout, et toutes les cellules en gras figurent dans la liste Rechercher et remplacer dialogue, et appuyez sur Ctrl + A pour les sélectionner, puis fermez Rechercher et remplacer dialogue. Voir la capture d'écran:

doc supprimer sinon gras 6

4. Ensuite, gardez ces cellules sélectionnées et cliquez Kutools > Ou sélectionner > Sélectionnez Range Helper. Voir la capture d'écran:

doc supprimer sinon gras 7

5. Dans la boîte de dialogue pop-up, vérifiez Sélection inverse option d'abord, puis sélectionnez la plage de données d'origine. Maintenant vous pouvez voir que la sélection est inversée. Voir la capture d'écran:

doc supprimer sinon gras 8

6. Cliquez Fermer. Maintenant appuyez sur Effacer clé pour supprimer le contenu de la cellule à partir des cellules non en gras.

doc supprimer sinon gras 9


Supprimez les lignes / cellules si elles ne sont pas en gras avec Kutools for Excel

Les méthodes ci-dessus ne sont pas assez faciles, dans ce cas, vous pouvez utiliser Kutools for Excel's Sélectionnez les cellules avec le format utilitaire pour identifier rapidement les cellules non en gras, puis les supprimer.

Kutools for Excel, avec plus de 120 fonctions Excel pratiques, améliorez votre efficacité de travail et économisez votre temps de travail.

après installation gratuite Kutools pour Excel, s'il vous plaît faire comme ci-dessous:

1. Sélectionnez la plage de données dont vous avez besoin, puis cliquez sur Kutools > Ou sélectionner > Sélectionnez les cellules avec le format. Voir la capture d'écran:

doc supprimer sinon gras 15

2. Dans la boîte de dialogue contextuelle, cliquez sur Choisissez le format de la cellule bouton pour sélectionner une cellule non en gras de la plage de données, puis vérifiez goupille seulement à partir de la liste ci-dessous dans la section Police. Voir la capture d'écran:

doc supprimer sinon gras 11

3. Cliquez Ok, et une boîte de dialogue apparaît pour vous rappeler le nombre de cellules sélectionnées, il suffit de cliquer Oui pour la fermer.

doc supprimer sinon gras 12

Maintenant, toutes les cellules non en gras sont sélectionnées, et appuyez sur Effacer clé pour supprimer le contenu de la cellule. Ou si vous souhaitez supprimer les lignes non en gras, faites un clic droit sur l'une des cellules sélectionnées et sélectionnez Effacer > Ligne entière. Voir les captures d'écran:

doc supprimer sinon gras 13doc arrow droitedoc supprimer sinon gras 14

Articles relatifs:



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.

Be the first to comment.