Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents .
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du
mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un
bouton intitulé "changer de mois" et que la colonne se mette à jour avec le
mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est
cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Bonjour,
Avec le numéro du mois en A1 et cette formule à recopier vers le bas sur 31
cellules :
Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents .
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du
mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un
bouton intitulé "changer de mois" et que la colonne se mette à jour avec le
mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est
cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Daniel
Bonjour. Essaie :
Private Sub CommandButton1_Click() Dim Mois As Integer, Jour As Integer, i As Integer Columns(1).ClearContents Mois = Month(Date) Mois = 2 Jour = Day(DateSerial(Year(Date), Mois + 1, 0)) i = 1 Do While i <= Jour Range("A1").Offset(i - 1, 0).Value = DateSerial(Year(Date), Mois, i) i = i + 1 Loop ActiveWorkbook.SaveAs "TOM" & Year(Date) & Mois & Day(Date) End Sub
Cordialement. Daniel "news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Bonjour.
Essaie :
Private Sub CommandButton1_Click()
Dim Mois As Integer, Jour As Integer, i As Integer
Columns(1).ClearContents
Mois = Month(Date)
Mois = 2
Jour = Day(DateSerial(Year(Date), Mois + 1, 0))
i = 1
Do While i <= Jour
Range("A1").Offset(i - 1, 0).Value = DateSerial(Year(Date), Mois, i)
i = i + 1
Loop
ActiveWorkbook.SaveAs "TOM" & Year(Date) & Mois & Day(Date)
End Sub
Cordialement.
Daniel
"news.wanadoo.fr" <xx-rzanni@agp-developpement.com> a écrit dans le message
de news: 4369d75c$0$7867$8fcfb975@news.wanadoo.fr...
Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents .
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour
du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer
sur un bouton intitulé "changer de mois" et que la colonne se mette à jour
avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce
bouton est cliqué mon fichier soit enregistré sous un autre nom du genre
"TOMdate.xls"
Private Sub CommandButton1_Click() Dim Mois As Integer, Jour As Integer, i As Integer Columns(1).ClearContents Mois = Month(Date) Mois = 2 Jour = Day(DateSerial(Year(Date), Mois + 1, 0)) i = 1 Do While i <= Jour Range("A1").Offset(i - 1, 0).Value = DateSerial(Year(Date), Mois, i) i = i + 1 Loop ActiveWorkbook.SaveAs "TOM" & Year(Date) & Mois & Day(Date) End Sub
Cordialement. Daniel "news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Raf
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Merci ca marche bien sur un mois
Par contre si je clique une nouvelle fois sur le bouton
La valeur de i ne s'incremente pas à +1
Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" <xx-rzanni@agp-developpement.com> a écrit dans le message
de news: 4369d75c$0$7867$8fcfb975@news.wanadoo.fr...
Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents .
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour
du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer
sur un bouton intitulé "changer de mois" et que la colonne se mette à jour
avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce
bouton est cliqué mon fichier soit enregistré sous un autre nom du genre
"TOMdate.xls"
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Daniel
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas d'incrément si tu utilises plusieurs fois la macro, tu auras toujours novembre, jusqu'au 30/11. Daniel "Raf" a écrit dans le message de news: 436a0a83$0$1735$
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester
Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas
d'incrément si tu utilises plusieurs fois la macro, tu auras toujours
novembre, jusqu'au 30/11.
Daniel
"Raf" <xx-rzanni@agp-developpement.com> a écrit dans le message de news:
436a0a83$0$1735$8fcfb975@news.wanadoo.fr...
Merci ca marche bien sur un mois
Par contre si je clique une nouvelle fois sur le bouton
La valeur de i ne s'incremente pas à +1
Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" <xx-rzanni@agp-developpement.com> a écrit dans le
message de news: 4369d75c$0$7867$8fcfb975@news.wanadoo.fr...
Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents
.
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour
du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer
sur un bouton intitulé "changer de mois" et que la colonne se mette à
jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque
ce bouton est cliqué mon fichier soit enregistré sous un autre nom du
genre "TOMdate.xls"
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas d'incrément si tu utilises plusieurs fois la macro, tu auras toujours novembre, jusqu'au 30/11. Daniel "Raf" a écrit dans le message de news: 436a0a83$0$1735$
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
Raf
OK Merci
C 'est encore mieux que ce que j'esperais.
Merci à tous.
Raf
"Daniel" a écrit dans le message de news:
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas d'incrément si tu utilises plusieurs fois la macro, tu auras toujours novembre, jusqu'au 30/11. Daniel "Raf" a écrit dans le message de news: 436a0a83$0$1735$
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
Merci pour votre aide.
Raf
OK Merci
C 'est encore mieux que ce que j'esperais.
Merci à tous.
Raf
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
unnzteH4FHA.252@TK2MSFTNGP15.phx.gbl...
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester
Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas
d'incrément si tu utilises plusieurs fois la macro, tu auras toujours
novembre, jusqu'au 30/11.
Daniel
"Raf" <xx-rzanni@agp-developpement.com> a écrit dans le message de news:
436a0a83$0$1735$8fcfb975@news.wanadoo.fr...
Merci ca marche bien sur un mois
Par contre si je clique une nouvelle fois sur le bouton
La valeur de i ne s'incremente pas à +1
Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" <xx-rzanni@agp-developpement.com> a écrit dans le
message de news: 4369d75c$0$7867$8fcfb975@news.wanadoo.fr...
Bonjour,
Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents
.
Je souhaiterais mettre à jour une colonne "Date" qui contient chaque
jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite
cliquer sur un bouton intitulé "changer de mois" et que la colonne se
mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que
lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre
nom du genre "TOMdate.xls"
S'il te plaît, ôte la ligne : Mois = 2 que j'avais ajouté pour tester Février. Par contre, le mois utilisé est le mois en cours, il n'y a pas d'incrément si tu utilises plusieurs fois la macro, tu auras toujours novembre, jusqu'au 30/11. Daniel "Raf" a écrit dans le message de news: 436a0a83$0$1735$
Merci ca marche bien sur un mois Par contre si je clique une nouvelle fois sur le bouton La valeur de i ne s'incremente pas à +1 Y a t il quelque chose que j'ai pas compris?
Merci à tous
Raf
"news.wanadoo.fr" a écrit dans le message de news: 4369d75c$0$7867$
Bonjour, Je n'ai pas trouvé de solutions à mon probleme dans les posts précédents . Je souhaiterais mettre à jour une colonne "Date" qui contient chaque jour du mois en cours (du 1er au 31 ou 30 selon le mois).Je souhaite cliquer sur un bouton intitulé "changer de mois" et que la colonne se mette à jour avec le mois en cours.De plus (Tant qu'a faire)je veux que lorsque ce bouton est cliqué mon fichier soit enregistré sous un autre nom du genre "TOMdate.xls"
