Discussion :

[Denis_67]

Bonjour,

Vous m'aviez donné une astuce pour nommer un plage, qui fonctionnait, malheureusement en voulant reprendre mon appli depuis j'ai systématiquement une erreur 1004.
J'ai esayé de fermer Excel et de rédémarrer , mais c'est pareil.
Que puis-je vérifier ?
Merci
Denis

Code :

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

1
2
3
4
5
6
7
8
Sub Macro2()
Dim Maselection As Range
    Range("A1").Select
    Selection.End(xlDown).Select
    nbmaj = ActiveCell.Row
    ActiveWorkbook.Names.Add Name:="Maselection", RefersToR1C1:= _
        "=Feuil1!" & Cells(2, 1).Address & ":" & Cells(nbmaj, 1).Address
End Sub

[gFZT82]

Bonjour,

Pour nommer "Maselection" la plage $A$2:$A$(nbmaj) de la Feuil1 :

Code :

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

1
2
3
4
5
6
Sub Macro2()
Dim nbmaj As Long
    nbmaj = Range("A1").End(xlDown).Row
    ActiveWorkbook.Names.Add Name:="Maselection", RefersTo:= _
        "=Feuil1!" & Cells(2, 1).Address & ":" & Cells(nbmaj, 1).Address
End Sub

Cordialement.

[Denis_67]

Tout dans la nuance, et le SAV est inclus !

Merci beaucoup.
Denis