Note: The other languages of the website are Google-translated. Back to English

Comment remplacer les noms de plage par des références de cellule dans Excel?

Certaines personnes préfèrent utiliser de nombreux noms de plages dans leurs formules, car elles estiment qu'elles sont plus claires et plus faciles à lire et à comprendre. Mais si vous voulez voir les références de cellules réelles, comment faire? Ici, ce tutoriel présentera deux astuces rapides pour résoudre ce problème.

Remplacez les noms de plage par le code VBA;

Remplacez rapidement et facilement les noms de plage avec Kutools for Excel.

Onglet Office Activez la modification et la navigation par onglets dans Office et simplifiez considérablement votre travail ...
Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité en
80 %
  • Réutiliser n'importe quoi: Ajoutez les formules, les graphiques et tout autre élément les plus utilisés ou les plus complexes à vos favoris et réutilisez-les rapidement à l'avenir.
  • Plus de 20 fonctionnalités de texte: Extraire le numéro de la chaîne de texte; Extraire ou supprimer une partie des textes; Convertissez les nombres et les devises en mots anglais.
  • Outils de fusion: Plusieurs classeurs et feuilles en un seul; Fusionner plusieurs cellules / lignes / colonnes sans perdre de données; Fusionner les lignes en double et la somme.
  • Outils de fractionnement: Diviser les données en plusieurs feuilles en fonction de la valeur; Un classeur vers plusieurs fichiers Excel, PDF ou CSV; Une colonne à plusieurs colonnes.
  • Coller sauter Lignes cachées / filtrées; Compte et somme par couleur d'arrière-plan; Envoyez des e-mails personnalisés à plusieurs destinataires en masse.
  • Super filtre: Créez des schémas de filtres avancés et appliquez-les à toutes les feuilles; Sort par semaine, jour, fréquence et plus encore; Filtre par gras, formules, commentaire ...
  • Plus de 300 fonctionnalités puissantes; Fonctionne avec Office 2007-2021 et 365 ; Prend en charge toutes les langues; Déploiement facile dans votre entreprise ou organisation.

Par exemple, dans cette feuille de calcul, je nommerai la plage A2: A6 comme prix de vente, et nommez B2 comme de réduction, puis en utilisant le nom de la plage dans une formule pour calculer le nouveau prix. Voir la capture d'écran:

           

Après avoir suivi les astuces rapides, le nom de la plage sera remplacé par la référence de cellule comme indiqué ci-dessous:


flèche bleue bulle droite Remplacez les noms de plage par le code VBA

En utilisant VBA pour remplacer les noms de plage de formule par des références de cellule, vous pouvez le faire étape par étape comme suit:

1. Sélectionnez la plage contenant les formules dont vous souhaitez remplacer leurs noms par des références de cellule.

2. Cliquez Développeur > Visual Basic or Alt + F11 ouvrir un nouveau Microsoft Visual Basic pour les applications la fenêtre s'affiche, cliquez sur insérer>Module, puis saisissez les codes suivants dans le module:

Code VBA: remplacez les noms de plage par une référence absolue

Sub AbsoleteNamesWithRelativeRefs()
'Updateby20140603
Dim Rng As Range
Dim WorkRng As Range
Dim xName As Name
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)
For Each Rng In WorkRng
    For Each xName In ThisWorkbook.Names
        If InStr(Rng.Formula, xName.Name) > 0 Then
            Rng.Formula = VBA.Replace(Rng.Formula, xName.Name, VBA.Replace(VBA.Replace(xName.RefersTo, "=", ""), "$", ""))
        End If
    Next
Next
End Sub

Code VBA: remplacez les noms de plage par une référence relative

Sub ReplaceNamesWithRelativeRefs()
'Updateby20140603
Dim Rng As Range
Dim WorkRng As Range
Dim xName As Name
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)
For Each Rng In WorkRng
    For Each xName In ThisWorkbook.Names
        If InStr(Rng.Formula, xName.Name) > 0 Then
            Rng.Formula = VBA.Replace(Rng.Formula, xName.Name, VBA.Replace(xName.RefersTo, "=", ""))
        End If
    Next
Next
End Sub

3. Puis clique  pour exécuter le code, une boîte de dialogue s'affiche pour sélectionner une plage à remplacer. Voir la capture d'écran:

4. Puis clique OK. et tous les noms de plage de formules sélectionnés ont été remplacés. Voir la capture d'écran:

 

Remplacer les noms de plage par des références de cellule relatives

 

Remplacer les noms de plage par des références de cellule absolues



flèche bleue bulle droite Remplacez rapidement et facilement les noms de plage avec Kutools for Excel

Si vous avez Kutools pour Excel, il est Remplacer les noms de plage L'utilitaire vous aidera à remplacer rapidement et facilement les noms de plage par des références de cellule.

Kutools pour Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Obtenez-le maintenant

Étape 1. Veuillez appliquer cet utilitaire en cliquant sur Kutools > Plus d'outils > Remplacer les noms de plage. Voir la capture d'écran:

Étape 2. Une boîte de dialogue contextuelle nommée Remplacer les noms de plage s'affiche et cliquez sur Autonomie , puis sélectionnez la plage que vous souhaitez remplacer par des références de cellule dans le Gamme de base. Voir la capture d'écran:

Étape 3. Cliquez sur remplacer, Une autre Remplacer les noms de plage Une boîte de dialogue contextuelle s'affiche pour vous indiquer le nombre de formules modifiées et de formules inchangées, cliquez sur Ok, puis les noms de plage dans la plage sélectionnée ont été remplacés par des références de cellule. Voir la capture d'écran:

Pour plus d'informations sur Remplacer les noms de plage, S'il vous plaît visitez Description de la fonction Remplacer les noms de plage.


Article relatif:

Modifier la référence de cellule dans les formules en noms de plage dans Excel


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité en
80 %

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus que
    300
    Caractéristiques puissantes
    . Prend en charge Office/Excel
    2007-2019 et 365
    . Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Fonctionnalités complètes
    30
    -jour d'essai gratuit. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité en
    50 %
    , et réduit chaque jour des centaines de clics de souris !
bas de cabine
Commentaires (1)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Muchas gracias por el post ! Me ha funcionado la macro perfectamente, una ayuda buenísima
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés

Nous suivre

Copyright © 2009 - www.extendoffice.com. | Tous les droits sont réservés. Alimenté par ExtendOffice. | | Plan du site
Microsoft et le logo Office sont des marques commerciales ou des marques déposées de Microsoft Corporation aux États-Unis et / ou dans d'autres pays.
Protégé par Sectigo SSL