[XL-2007] Incrémentation dates dans onglets générés automatiquement sujet

Bonjour à toutes et à tous.

J'ai fait un petit code vba pour dupliquer automatiquement le contenu d'un onglet (onglet J1 du fichier ORGANISATION VACANCES ETE). Pour chacun des onglets dupliqués, la date contenu dans la cellule A1 doit s'incrémenter de un jour à chaque fois.
Ex: la cellule A1 de l'onglet J1 contient la valeur "mardi 08 avril 2014". Je duplique 3 fois l'onglet; j'ai alors les onglets J2, J3, J4 qui se créent; et je devrais avoir la valeur "mercredi 09 avril 2014" en A1 de l'onglet J2, "jeudi 10 avril 2014" en A1 de l'onglet J3 et "vendredi 11 avril 2014" en A1 de l'onglet J4.
Or ça n'est pas tout à fait le cas.... d'où vient l'erreur dans mon code?

Sub Copie()
Dim i, z, Valeur_A_Recup
z = InputBox("Nombre de copies ", "Copie")
Valeur_A_Recup = Sheets("J1").Range("A1").Value
For i = 1 To z
Sheets("J1").Copy After:=Sheets(i)
ActiveSheet.Name = "J" & i + 1
Sheets("J" & i).Range("A1").Value = Valeur_A_Recup + i
Next i
End Sub


Merci de votre aide.

Fichiers attachés

• 
  
  CAHIER VACANCES.zip
  (49,7 Ko)
  

XL 2010 Recopie dans les onglets sujet

Bonjour le Forum
On m' a beaucoup aidé dans différentes applications à des projets et je vous en remercie
Actuellement je travaille sur un projet de saisies de donnees mais je bute avec le VB
Serait il possible a partir d' un tableau excel onglet "BDD" de recopier automatiquement dans les différents mois par rapport à la date donnée et chaque mois se rempli en foction des entrees dans l' onglet BDD et rajouter également un bouton dans chaque mois de trier par designation ainsi que son total.
Je vous joins un fichier excel afin que vous comprenniez

Je vous remercie tous pour votre aide

Merci encore

Fichiers attachés

• 
  
  Frais (2).xls‎
  (37,5 Ko)
  

XL 2010 Générer automatiquement x onglets à partir de la valeur saisie dans une cellule sujet

Bonjour,

Je souhaiterais rédiger un script VBA qui permettrait de générer automatiquement x nouvelles feuilles à partir de la valeur saisir dans la cellule d'une première feuille.

J'ai tenté deux trois bricoles sans succès. Pourriez-vous m'aider SVP?

Bien cordialement,

David

[XL-2007] rapatrier les données de plusieurs onglets dans un onglet sujet

Bonjour, à tous

Dans le fichier joint, je renseigne des dates en colorant les cases correspondantes
Voila mon probléme, pour avoir une vision annuelle pour un poste concerné, j'aimerai rapatrier dans UN ONGLET les données annuelles d'un "Poste" à la demande.

Je joint le fichier, peut étre vous pourrez mieux comprendre.

Merci d'avance

fthem

Fichiers attachés

Planning complet.zip (151,4 Ko)