Partager via

Méthode Application.Evaluate (Excel)

  • Article

Convertit un nom Microsoft Excel en objet ou valeur.

Syntaxe

expression. Evaluate (Name)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Name Obligatoire Variant Formule ou nom de l'objet, conformément aux conventions de dénomination de Microsoft Excel. La longueur du nom doit compter 255 caractères au maximum.

Valeur renvoyée

Variant

Remarques

Les types de noms suivants peuvent être utilisés dans Microsoft Excel avec cette méthode :

  • Formules.

  • Références de style A1. Utilisez n’importe quelle référence à une seule cellule dans la notation de style A1. Toutes les références sont considérées comme absolues.

  • Plages. Utilisez les opérateurs de plage, d’intersection et d’union (deux-points, espace et virgule, respectivement) avec des références.

  • Noms définis. Vous pouvez spécifier un nom quelconque dans le langage de la macro.

  • Références externes. Utilisez l’opérateur ! pour faire référence à une cellule ou à un nom défini dans un autre classeur ; par exemple, Evaluate("[BOOK1.XLS]Sheet1!A1").

  • Objets de graphique. Vous pouvez spécifier n’importe quel nom d’objet de graphique, tel que Légende, Zone de traçage ou Série 1, pour accéder aux propriétés et méthodes de cet objet. Par exemple, Charts("Chart1").Evaluate("Legend").Font.Name retourne le nom de la police utilisée dans la légende.

  • Numéro de contrôle du formulaire. Vous pouvez spécifier un nombre, ainsi qu’un nom, pour faire référence à Contrôle de formulaire dans une feuille de calcul. Par exemple, pour Étiquette située dans une feuille de calcul (onglet Développeur - Insertion - Contrôles de formulaire - Étiquette), et font de Evaluate("Label 1").Caption = "Hello"Evaluate("1").Caption = "Hello" même.

L’utilisation des crochets droits (par exemple, "[A1:C5]") revient à appeler la méthode Evaluate avec un argument sous la forme d’une chaîne de caractères. Les exemples suivants sont équivalents dans chaque couple d'expression.

[a1].Value = 25 
Evaluate("A1").Value = 25 
 
trigVariable = [SIN(45)] 
trigVariable = Evaluate("SIN(45)") 
 
Set firstCellInSheet = Workbooks("BOOK1.XLS").Sheets(4).[A1] 
Set firstCellInSheet = _ 
    Workbooks("BOOK1.XLS").Sheets(4).Evaluate("A1")

L'avantage des crochets droits réside dans la plus grande concision du code. Celui résultant de l'utilisation de la méthode Evaluate est que l'argument est une chaîne de caractères, ce qui vous permet d'élaborer la chaîne de caractères dans votre code ou d'utiliser une variable Visual Basic.

Exemple

Cet exemple montre comment activer la mise en gras dans la cellule A1 de la feuille Sheet1.

Worksheets("Sheet1").Activate 
boldCell = "A1" 
Application.Evaluate(boldCell).Font.Bold = True

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.