Nommer plage de cellule active sous VB [Résolu/Fermé]

Signaler
-
 Tu -
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.

2 réponses

Salut,

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

Merci
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 57931 internautes nous ont dit merci ce mois-ci

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