Nommer plage de cellule active sous VB

Résolu/Fermé
Ludo - 28 nov. 2005 à 17:09
 Tu - 4 avril 2007 à 12:25
Bonjour,

J'aimerais Nommer une plage de cellule variant en taille à chaque nouvelle utilisation en utilisant Visual Basic.

J'ai essayé de nommer cette plage avec ces lignes de commande, mais cela ne fonctionne pas :

Sub Macro3()
'
Dim zoneactive As String

ActiveWorkbook.Names("PCG").Delete
Selection.CurrentRegion.Select
zoneactive = ActiveCell.Select
ActiveWorkbook.Names.Add Name:="PCG", refersToR1C1:=zoneactive

End Sub

Auriez vous une solution à) me proposer ??
Merci bcp,
Ludo.
A voir également:

2 réponses

Salut,

J'ai le même probleme.
As tu trouvé la solution??

Merci
1
Je bidouille quelque chose comme ça en ce moment, si ça peux servir...


Public Addr as String

'userform avec contrôle RefEdit1 et BoutonOK

Private Sub BoutonOK_Click()

Addr = RefEdit1.Value

'Vérifie s'il y a eu une sélection
If Addr = "" Then
MsgBox "Sélectionnez une plage de cellule"
Exit Sub
End If


'Nomme plage sélectionnée
ActiveWorkbook.Names.Add Name:="NOm_Donné", RefersToR1C1:=Range(Addr)

UserForm1.Hide

End Sub


'affichez le userform1, à mettre dans un module

Sub Afficher()

UserForm1.Show

End Sub
0