Comment sélectionner toutes les cellules de formule dans une feuille de calcul ?

S'il existe plusieurs types de cellules, y compris des formules, du texte, des nombres, etc., dans votre feuille de calcul, et que vous souhaitez sélectionner uniquement les cellules contenant des formules dans votre feuille de calcul ou dans une plage spécifique, comment pouvez-vous résoudre cela dans Excel ? Voici quelques méthodes rapides qui peuvent vous aider.

Sélectionnez toutes les cellules de formule avec la fonction Aller à

Mettez en évidence toutes les cellules de formule avec VBA

Sélectionnez toutes les cellules de formule avec la fonction Aller à

Dans Excel, vous pouvez utiliser la fonction Aller à pour sélectionner rapidement uniquement les cellules de formule d'une feuille de calcul ou d'une plage.

1. Appuyez simultanément sur Ctrl + G pour ouvrir la boîte de dialogue Aller à, puis cliquez sur le bouton Spécial. Voir capture d'écran :

2. Cochez l'option Formules, puis cliquez sur OK pour fermer la boîte de dialogue. Voir capture d'écran :

Toutes les cellules de formule sont maintenant sélectionnées dans la feuille de calcul.

Astuce :

1. Si vous souhaitez sélectionner uniquement les cellules de formule dans une plage spécifique, sélectionnez cette plage avant d'utiliser la fonction Aller à.

2. Vous pouvez spécifier les options à l'étape 2 pour sélectionner un type de formule particulier, comme les formules générant des erreurs uniquement.

Mettez en évidence toutes les cellules de formule avec VBA

Il existe également un code VBA qui peut mettre en évidence toutes les cellules de formule dans une plage donnée ou dans toute la feuille de calcul.

1. Appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic For Applications.

2. Cliquez sur Module > Insérer pour insérer une fenêtreModule, puis copiez le code VBA ci-dessous dans cette fenêtre.

VBA : Mettre en évidence toutes les cellules de formule.

Sub SelectFormulaCells()
'Updateby20140827
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeFormulas, 23)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub

3. Cliquez sur le bouton Exécuter, une boîte de dialogue KutoolsforExcel apparaît pour vous permettre de sélectionner une plage. Voir capture d'écran :

4. Cliquez sur OK. Toutes les cellules de formule sont mises en évidence.

Astuce : Dans le code VBA ci-dessus, vous pouvez modifier le numéro pour ajuster la couleur de mise en évidence souhaitée dans Rng.Interior.ColorIndex = 36.