Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Nom VBA

Nom VBA

2 réponses
Avatar
Pascal
Bonjour,
Je nomme une zone en VBA de cette manière que je ne trouve pas propre
ActiveWorkbook.Names.Add Name:="tot5", RefersToR1C1:= _
"=Réclamations!R117C24:R134C24,Réclamations!R117C31:R134C31,Réclamations!R117C33:R134C33,Réclamations!R117C35:R134C35"

Quelqu'un aurait-il une autre solution

Merci

Pascal
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Corona
Bonjour Pascal,
Sub NommePlage()
Dim maPlage As Range
Set maPlage = Range("maFeuille!B3:B11,maFeuille!e3:I6")
maPlage.Select
Set maPlage = Nothing
End Sub

Philippe Tulliez

Pascal a écrit :
Bonjour,
Je nomme une zone en VBA de cette manière que je ne trouve pas propre
ActiveWorkbook.Names.Add Name:="tot5", RefersToR1C1:= _
"=Réclamations!R117C24:R134C24,Réclamations!R117C31:R134C31,Réclamations!R117C33:R134C33,Réclamations!R117C35:R134C35"

Quelqu'un aurait-il une autre solution

Merci

Pascal




Avatar
Pascal
Merci
Je vais voir de ce côté car pas mal de zones discontinues à nommer (20 au
total)
Pascal
"Corona" a écrit dans le message de news:

Bonjour Pascal,
Sub NommePlage()
Dim maPlage As Range
Set maPlage = Range("maFeuille!B3:B11,maFeuille!e3:I6")
maPlage.Select
Set maPlage = Nothing
End Sub

Philippe Tulliez

Pascal a écrit :
Bonjour,
Je nomme une zone en VBA de cette manière que je ne trouve pas propre
ActiveWorkbook.Names.Add Name:="tot5", RefersToR1C1:= _

"=Réclamations!R117C24:R134C24,Réclamations!R117C31:R134C31,Réclamations!R117C33:R134C33,Réclamations!R117C35:R134C35"

Quelqu'un aurait-il une autre solution

Merci

Pascal