Bonsoir,
Excel 2000
Je sèche sur l'ajout d'un nom concernant une plage variable
Je sélectionne en vba une plage de cellule
puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address
pas de plantage
le nom attribué étant
="$M$2:$M$15" qui correspond bien à Selection
ce nom est non valide !
Comment dois-je modifier ma ligne de code pour le rendre valide
Merci d'avance
--
Cordialement
jpmonnier-nospam@neuf.fr
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
michdenis
Pour donner un nom à ta plage de cellules sélectionner :
If TypeName(Selection) = "Range" Then Selection.Name = Selection.Parent.Name & "!" & "LeNomDeLaPlageNommé" End If
"JPMonnier" a écrit dans le message de groupe de discussion :
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
Pour donner un nom à ta plage de cellules sélectionner :
If TypeName(Selection) = "Range" Then
Selection.Name = Selection.Parent.Name & "!" & "LeNomDeLaPlageNommé"
End If
"JPMonnier" <jpmonnier-no-spam@neuf.fr> a écrit dans le message de groupe de discussion :
Oh5KTzXgJHA.5540@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Excel 2000
Je sèche sur l'ajout d'un nom concernant une plage variable
Je sélectionne en vba une plage de cellule
puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address
pas de plantage
le nom attribué étant
="$M$2:$M$15" qui correspond bien à Selection
ce nom est non valide !
Comment dois-je modifier ma ligne de code pour le rendre valide
Merci d'avance
--
Cordialement
jpmonnier-nospam@neuf.fr
Pour donner un nom à ta plage de cellules sélectionner :
If TypeName(Selection) = "Range" Then Selection.Name = Selection.Parent.Name & "!" & "LeNomDeLaPlageNommé" End If
"JPMonnier" a écrit dans le message de groupe de discussion :
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
garnote
Salut,
Essaie ceci :
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
Salut,
Essaie ceci :
Sub Nommer()
Set s = Selection
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s
End Sub
Serge
"JPMonnier" <jpmonnier-no-spam@neuf.fr> a écrit dans le message de news: Oh5KTzXgJHA.5540@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Excel 2000
Je sèche sur l'ajout d'un nom concernant une plage variable
Je sélectionne en vba une plage de cellule
puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address
pas de plantage
le nom attribué étant
="$M$2:$M$15" qui correspond bien à Selection
ce nom est non valide !
Comment dois-je modifier ma ligne de code pour le rendre valide
Merci d'avance
--
Cordialement
jpmonnier-nospam@neuf.fr
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
garnote
Ou plus prudent ( n'est-ce pas Denis ? ) :
Sub Nommer() If TypeName(Selection) = "Range" Then _ ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection End Sub
Serge
"garnote" a écrit dans le message de news:
Salut,
Essaie ceci :
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
Ou plus prudent ( n'est-ce pas Denis ? ) :
Sub Nommer()
If TypeName(Selection) = "Range" Then _
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection
End Sub
Serge
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news: e69yW7XgJHA.4220@TK2MSFTNGP06.phx.gbl...
Salut,
Essaie ceci :
Sub Nommer()
Set s = Selection
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s
End Sub
Serge
"JPMonnier" <jpmonnier-no-spam@neuf.fr> a écrit dans le message de news: Oh5KTzXgJHA.5540@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Excel 2000
Je sèche sur l'ajout d'un nom concernant une plage variable
Je sélectionne en vba une plage de cellule
puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address
pas de plantage
le nom attribué étant
="$M$2:$M$15" qui correspond bien à Selection
ce nom est non valide !
Comment dois-je modifier ma ligne de code pour le rendre valide
Merci d'avance
--
Cordialement
jpmonnier-nospam@neuf.fr
Sub Nommer() If TypeName(Selection) = "Range" Then _ ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection End Sub
Serge
"garnote" a écrit dans le message de news:
Salut,
Essaie ceci :
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
garnote
Viens de constater que ma macro définit un nom auquel on peut se référer sur toutes les feuilles du classeur alors que celle de Denis définit un nom auquel on peut se référer que sur la feuille contenant la sélection.
Serge
"garnote" a écrit dans le message de news:
Ou plus prudent ( n'est-ce pas Denis ? ) :
Sub Nommer() If TypeName(Selection) = "Range" Then _ ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection End Sub
Serge
"garnote" a écrit dans le message de news:
Salut,
Essaie ceci :
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
Viens de constater que ma macro définit un nom auquel on peut
se référer sur toutes les feuilles du classeur alors que celle de Denis
définit un nom auquel on peut se référer que sur la feuille contenant
la sélection.
Serge
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news: OKtMFCYgJHA.500@TK2MSFTNGP06.phx.gbl...
Ou plus prudent ( n'est-ce pas Denis ? ) :
Sub Nommer()
If TypeName(Selection) = "Range" Then _
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection
End Sub
Serge
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de news: e69yW7XgJHA.4220@TK2MSFTNGP06.phx.gbl...
Salut,
Essaie ceci :
Sub Nommer()
Set s = Selection
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s
End Sub
Serge
"JPMonnier" <jpmonnier-no-spam@neuf.fr> a écrit dans le message de news: Oh5KTzXgJHA.5540@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Excel 2000
Je sèche sur l'ajout d'un nom concernant une plage variable
Je sélectionne en vba une plage de cellule
puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address
pas de plantage
le nom attribué étant
="$M$2:$M$15" qui correspond bien à Selection
ce nom est non valide !
Comment dois-je modifier ma ligne de code pour le rendre valide
Merci d'avance
--
Cordialement
jpmonnier-nospam@neuf.fr
Viens de constater que ma macro définit un nom auquel on peut se référer sur toutes les feuilles du classeur alors que celle de Denis définit un nom auquel on peut se référer que sur la feuille contenant la sélection.
Serge
"garnote" a écrit dans le message de news:
Ou plus prudent ( n'est-ce pas Denis ? ) :
Sub Nommer() If TypeName(Selection) = "Range" Then _ ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selection End Sub
Serge
"garnote" a écrit dans le message de news:
Salut,
Essaie ceci :
Sub Nommer() Set s = Selection ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=s End Sub
Serge
"JPMonnier" a écrit dans le message de news:
Bonsoir, Excel 2000 Je sèche sur l'ajout d'un nom concernant une plage variable Je sélectionne en vba une plage de cellule puis j'ai cette ligne de code
Sheets("barres").Names.Add Name:="FENGTS", RefersToR1C1:=Selection.Address pas de plantage le nom attribué étant ="$M$2:$M$15" qui correspond bien à Selection ce nom est non valide ! Comment dois-je modifier ma ligne de code pour le rendre valide Merci d'avance -- Cordialement
michdenis
| Ou plus prudent ( n'est-ce pas Denis ? ) Effectivement ;-) ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio ** ceci crée un nom défini au niveau du Workbook le demandeur me semble-t-il définissait son nom au niveau de la feuille.
| Ou plus prudent ( n'est-ce pas Denis ? )
Effectivement ;-)
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio
** ceci crée un nom défini au niveau du Workbook
le demandeur me semble-t-il définissait son nom au niveau de la feuille.
| Ou plus prudent ( n'est-ce pas Denis ? ) Effectivement ;-) ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio ** ceci crée un nom défini au niveau du Workbook le demandeur me semble-t-il définissait son nom au niveau de la feuille.
JPMonnier
Bonsoir micheldenis toujours aussi efficace ! C'est nickel Merci ainsi qu'à garnote -- Cordialement
"michdenis" a écrit dans le message de news:
| Ou plus prudent ( n'est-ce pas Denis ? ) Effectivement ;-) ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio ** ceci crée un nom défini au niveau du Workbook le demandeur me semble-t-il définissait son nom au niveau de la feuille.
Bonsoir micheldenis
toujours aussi efficace !
C'est nickel
Merci ainsi qu'à garnote
--
Cordialement
jpmonnier-nospam@neuf.fr
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:914380D8-F6C0-4BE4-AEC3-6CC75ED04742@microsoft.com...
| Ou plus prudent ( n'est-ce pas Denis ? )
Effectivement ;-)
ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio
** ceci crée un nom défini au niveau du Workbook
le demandeur me semble-t-il définissait son nom au niveau de la
feuille.
Bonsoir micheldenis toujours aussi efficace ! C'est nickel Merci ainsi qu'à garnote -- Cordialement
"michdenis" a écrit dans le message de news:
| Ou plus prudent ( n'est-ce pas Denis ? ) Effectivement ;-) ActiveWorkbook.Names.Add Name:="FENGTS", RefersTo:=Selectio ** ceci crée un nom défini au niveau du Workbook le demandeur me semble-t-il définissait son nom au niveau de la feuille.