pb résolu: utiliser un modéle pour faire plusieurs copies
pb résolu: utiliser un modéle pour faire plusieurs copies - VB/VBA/VBS - Programmation
Marsh Posté le 19-10-2005 à 18:45:41
x = Textbox.Value
Do
x = x- 1
Sheets("type" ).Copy , after:=Sheets("type" )
Loop Until x= 0
Marsh Posté le 20-10-2005 à 11:57:03
salut beberf1,
avant de pouvoir t'aider il serait bon de nous dire sous quoi tu cherche à faire cette macro...
@+
---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)
Sujets relatifs:
- (RESOLU) : Comment ajouter un message d'erreur?
- Z-index et objet flash [Résolu]
- Résolu : Recherche des doublons dans la base.
- utiliser qt avec java
- (résolu) Boucle For each sur textbox dans userform
- [Résolu] Créer une CMainFrame qui ne prend pas le focus à l'ouverture
- [resolu]reset pour les textbox
- [RESOLU] [FORMULAIRE] probleme de récup des données
- [résolu] lecture des informations d'un fichier
- [resolu]ajouter des données dans une requête htttp en js
Marsh Posté le 19-10-2005 à 17:44:32
Bonjour,
Je voudrais utiliser la feuille Type comme modéle.
Je rentre une valeur x.
x étant le nombre de feuille que je souhaite ajouter après le feuille test.
Dim x As Integer
'nombre de feuilles à créer après la feuille test
x = Textbox.Value
'permet de créer x feuille après ma feuille test
Sheets.Add Count:=x, after:=Sheets("test" )
ci-dessous un semblant de code pour essayer d'obtenir ce que je veux (mais ne fonctionne pas)
'Sheets("Type" ).Copy after:=Sheets(Sheets.Count)
votre aide me serrait très utile
Message édité par beberf1 le 18-11-2005 à 15:40:03