[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)
  

Bluetooth : comment accepter automatiquement une demande de transfert ? sujet

Bonjour,

Quand un smartphone et un pc sous Windows 8 sont appairés, et que le smartphone demande à envoyer un fichier vers le pc, une fenêtre s'ouvre automatiquement pour accepter ou refuser le transfert de ce fichier.

Est-il possible de paramétrer Windows de sorte que le transfert soit automatiquement accepté sans intervention de l'utilisateur ?

Merci par avance pour votre aide ! ;)

Archiver automatiquement les Journaux Windows sujet

Bonjour à tous,

Je cherche à réaliser un archivage des journaux d'évènement mais cela ne semble pas fonctionner. Je souhaite qu'au dépassement de la taille critique d'un journal, qu'une archive des évènements soit créé, que le journal une fois archivé soit vidé et qu'il continue d'enregistrer les logs (et recommence l'opération aussi souvent que nécessaire).

Je me suis tourné vers la GPO local où l'on peut gérer les options suivantes :
- Taille maximal du journal (1Mo pour mes tests)
- Sauvegarder le journal automatiquement lorsqu'il est plein : Activer
- Conserver les anciens évènements : Activer

Si l'on se tourne vers la description de "Sauvegarder le journal automatiquement lorsqu'il est plein", on peut lire :
"Si vous activez ce paramètre de stratégie et si le paramètre "Conserver les anciens évènements" est activé, le fichier Journal des évènements est automatiquement fermé et renommé lorsqu'il est plein. Un nouveau fichier est alors démarré."
Ce que je comprends comme : Lorsque le journal est plein, je le renomme, puis j'en créé un nouveau avec le nom d'origine de celui que je viens de renommer (en gros une copie vide) et je continue à ajouter les logs.

Cependant, lorsque je configure ma stratégie comme cela, j'obtiens un fichier d'archive de mon journal (qui fait la taille max autorisé) et le journal en cours contiens bien les derniers évènements qui aurait été perdu si il n'y avait pas eu d'archivage MAIS le problème est qu'à partir du moment où il créé l'archive, il arrête de recevoir de nouveau log.

De ce fait j'ai essayer en désactivent la stratégie "Conserver les anciens évènements" mais cela n'a rien changé. Il m'a de nouveau enregistré une archive puis plus rien.

Si quelqu'un à une solution à ce problème, je suis preneur.