Nommer plage de cellule active sous VB
Résolu/Fermé
A voir également:
- Nommer plage de cellule active sous VB
- Vb cable - Télécharger - Audio & Musique
- Aller à la ligne dans une cellule excel - Guide
- Vb - Télécharger - Langages
- Verrouiller cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
2 réponses
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
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