feuilles de calculs à l'infinie !!!

P

paolo

Guest
Bonjour à tous,

je voudrai savoir si il existe un outil afin de créer automatiquement un grand nombre de feuille de calculs


(ou encore mieux, mais ca je doute que ca existe, serait il possible de dupliquer à partir dun modele de feuille de calcul, sur laquelle se trouve plusieurs tableaux, et donc de réer autant de feuilles de calculs souhaitées en cnservant les tableaux sur chacune des copies!)

deuxieme petit question, connaissez vous un moyen de créer un lien hypetext dansun index pour chacund es feuilles de calcul ( dont le nom de l'hypertext serait dc le nom du workshette correspondant !)
:pinch:

voila merci bcp pour les eventuelles réponses !
 
J

JC de Lorient

Guest
salut Paolo, le forum

dans l'hypothèse ou ta feuille de base se nomme 'test'
essaye ce code a mettre dans un module

Sub Macro5()

Dim x, y As Byte

x = InputBox('combien de feuilles')

For y = 1 To x
Sheets('test').Select
Sheets('test').Copy After:=Sheets(1)
Sheets('test (2)').Select
Sheets('test (2)').Name = 'Test' & x
x = x - 1
Next

End Sub


JC
 
J

JC de Lorient

Guest
re

voilà un fichier vierge
fait ALT et F11 pour voir le module et le code

Bon courage

JC [file name=Paolo.zip size=12668]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Paolo.zip[/file]
 

Pièces jointes

  • Paolo.zip
    12.4 KB · Affichages: 22

PascalXLD

XLDnaute Barbatruc
Modérateur
Bonjour

Allez la même que JC mais avec quelques lignes de moins et pas de select

Sub Macro5()

Dim x, y As Byte

x = InputBox('combien de feuilles')

For y = 1 To x
Sheets('test').Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = 'Test' & y
Next

End Sub

Attention si tu as un grand nombre de feuilles à rajouter d'un seul coup et que ta feuille à copier soit assez conséquente il arrive que la macro plante au bout d'un certain nombre de feuilles

Sinon il faut que tu fasses ALT F11 pour avoir accès au VBE (visual basic editor) puis tu cherches le nom de ton classeur tu fais un clic droit ajouter un module et tu colles le code dans le module

Bon courage
 

Discussions similaires

Statistiques des forums

Discussions
312 381
Messages
2 087 824
Membres
103 667
dernier inscrit
datengo