[excel] ActiveWorkbook.Names

Résolu

cs_Liro

Messages postés: 159
Date d'inscription: jeudi 7 septembre 2006
Statut: Membre
Dernière intervention: 30 septembre 2011

- 28 mars 2008 à 09:55
cs_Liro

Messages postés: 159
Date d'inscription: jeudi 7 septembre 2006
Statut: Membre
Dernière intervention: 30 septembre 2011

- 31 mars 2008 à 06:27

Bonjour,

Voici mon code:

ActiveWorkbook.Names.Add Name:="plage", RefersToR1C1:="=feuil1!R" & first_row & "C2:R" & last_row & "C21"

On Error Resume Next
    For Each cell In Selection
    cell.Value = Application.WorksheetFunction.VLookup(ActiveCell.Offset(0, -2), "plage", 3, False)
    MsgBox cell.Value
    Next cell
    On Error GoTo 0

Il semblerait que "plage" pose problème pour cette fonction.
Es-ce que quelqu'un peut m'aider?

Merci
Ludo

A voir également:

Vba activeworkbook.names
Activeworkbook.names.add - Meilleures réponses
Activeworkbook.names.add name - Meilleures réponses
Activeworkbook.name - Forum - Visual Basic
Trying to register two bundles with the same name - Forum - PHP
Extraction de données dans une base de données ODBC avec un Data Source Name (DSN) en C# - Conseils pratiques - C# / .NET
C# / .NET : Extraction de donnees dans une base de donnees odbc avec un data source name (dsn) en c - Guide
Visual Basic / VB.NET : Lecture de wmi class name et lister les item ainsi leurs valeur d'un poste x - Guide

2 réponses

Réponse 1 / 2

bigfish_le vrai

Messages postés: 1835
Date d'inscription: vendredi 13 mai 2005
Statut: Membre
Dernière intervention: 20 novembre 2013

12
28 mars 2008 à 16:14

Salut,

remplace RefersToR1C1 par RefersTo

ActiveWorkbook.Names.Add Name:="plage", RefersTo:= "=feuil1!R" & first_row & "C2:R" & last_row & "C21"

A+

Réponse 2 / 2

cs_Liro

Messages postés: 159
Date d'inscription: jeudi 7 septembre 2006
Statut: Membre
Dernière intervention: 30 septembre 2011

31 mars 2008 à 06:27

Ok, merci.

Votre réponse