Discussion :

[Fralev]

Bonjour,

Je travaille sur excel (2003) en VBA
L'objectif est de créer en VBA une même action sur l'une au choix des 3 plages de cellules définies auparavant dans le menu excel.
Les 3 plages de cellules définies dans "Insertion/Nom/Définir" ont été appelées "Entete1", "Entete2" et "Entete3".
Au niveau VBA (module), pour éviter de reproduire 3 fois les mêmes lignes de code, je crée un nom ("Tableau") de type range qui doit pouvoir récupérer la plage de l'une des 3 "Entete" en fonction d'une condition prédéfinie, et qui sera utilisé ensuite dans les lignes de code suivantes
Je met les codes suivants :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim Tableau As Range
Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean)
 
If ActiveCell.Row = Range("Entete1").Row Then
Range("Tableau").Value = Range("Entete1").Value
.....

Mais cela bloque sur cette dernière égalité !
Pourriez vous me préciser quel est le bon format à appliquer pour que cette égalité fonctionne

Merci d'avance pour votre aide
Fralev

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set Tableau =Range("Entete1")

[Fralev]

Merci à toi, Super !
Cela fonctionne maintenant parfaitement

Fralev