baptiser plage en VBA

Le
Jacquouille
Bonjour
j'ai environ 25 noms de plage à donner (tout un calendrier, rien que pour le
baptême)
pour des plages (ex:A2:A10000)

Sheets("statistiques").Select
Range("J2:J10000").Select
ActiveWorkbook.Names.Add Name:="dat_IN", RefersToR1C1:= _
"=statistiques!R2C10:R10000C10"
ensuite, col K -->dat_OUT ..

n'Y aurait-il pas un moyen plus élégant et plus rapide que cela?
Merci et bon W-e à tous et tousses.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #23180561
bonjour Jacquouille,

si la ligne 1 est la ligne de titre,

Sub Macro1()
Sheets("statistiques").Range("A1:J10000").CreateNames Top:=True
End Sub

isabelle

Le 2011-03-06 09:22, Jacquouille a écrit :
Bonjour
j'ai environ 25 noms de plage à donner (tout un calendrier, rien que
pour le baptême)
pour des plages (ex:A2:A10000)

Sheets("statistiques").Select
Range("J2:J10000").Select
ActiveWorkbook.Names.Add Name:="dat_IN", RefersToR1C1:= _
"=statistiques!R2C10:R10000C10"
ensuite, col K -->dat_OUT .....

n'Y aurait-il pas un moyen plus élégant et plus rapide que cela?
Merci et bon W-e à tous et tousses.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
DanielCo
Le #23180661
Bonjour Jacquouille,
Range("J2:J10000").Name="Nom"
Cordialement.
Daniel


Bonjour
j'ai environ 25 noms de plage à donner (tout un calendrier, rien que pour le
baptême)
pour des plages (ex:A2:A10000)

Sheets("statistiques").Select
Range("J2:J10000").Select
ActiveWorkbook.Names.Add Name:="dat_IN", RefersToR1C1:= _
"=statistiques!R2C10:R10000C10"
ensuite, col K -->dat_OUT .....

n'Y aurait-il pas un moyen plus élégant et plus rapide que cela?
Merci et bon W-e à tous et tousses.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
Jacquouille
Le #23184031
Un grand merci à Ysabelle et à Daniel.
Mon projet avance bien, grâce à vous.
Jacques



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jacquouille" a écrit dans le message de groupe de discussion :
4d739890$0$14261$

Bonjour
j'ai environ 25 noms de plage à donner (tout un calendrier, rien que pour le
baptême)
pour des plages (ex:A2:A10000)

Sheets("statistiques").Select
Range("J2:J10000").Select
ActiveWorkbook.Names.Add Name:="dat_IN", RefersToR1C1:= _
"=statistiques!R2C10:R10000C10"
ensuite, col K -->dat_OUT .....

n'Y aurait-il pas un moyen plus élégant et plus rapide que cela?
Merci et bon W-e à tous et tousses.

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
Publicité
Poster une réponse
Anonyme