!!! Macro de numérotaiton croissante !!!

F

fabrice

Guest
Bonjour tout le monde,

J'espere que vous ne vous etes pas fait de soucis car ca fait un bout de temps que je n'ais pas poster de posts ;=). Je vais bien, tout va bien (comme le dirai un comique aux grandes oreilles ;=) ).

Non, plus serieusement, j'ai un probleme avec les boucles dans excel.
Je souhaiterai faire une nuémrotation croissante jusqu'a une valeur définie dans une cellule.
Ex
A1 1
A2 2
A3 3
...
Ax x ou X est définit dans une autre cellule (par exemple B1)

Pourriez vous m'aider SVP.

Merci de votre aide,
FAb
 
F

fabrice

Guest
Bonsoir Cathy

Tout va tres bien a l'exeption que mon boutton est sur une feuille différente de celle ou doit se dérouler la macro.

Pour remdéier à cela, j'ai rajouté a ton code ceci:
Sheets("Donnees_graphique")Range("A1").Select
NbCopie = Selection.CurrentRegion.Rows.Count
Sheets("Donnees_graphique")Range("B1").Select
Selection.AutoFill Destination:=Range("B1:B" & NbCopie), Type:=xlFillDefault

Comment faire??? Je pensé que ca serait bon mais en fait non :=(

Merci de ton aide pour une dernière fois (je l'espère!!!)
FAb
 

Discussions similaires

Réponses
3
Affichages
448

Statistiques des forums

Discussions
314 645
Messages
2 111 536
Membres
111 184
dernier inscrit
amiko