je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
bonjour dans OE message/supprimer mais çà peut mettre un peu de temps
-- Pierre CFI MVP Microsoft Access "Gil HASH" a écrit dans le message de news:
Bonsoir Comme je trie mes messages par date d'arrivée - logique - Je viens de m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en première place de la fenêtre d'Outlook Express. Y a t'il quelque chose à faire sur le serveur? surtout qu'on a répondu à Karine -que je n'incrimine pas bien sûr : les erreurs de mise à l'heure ça existe. Mais je pense à quelque chose : avec ce système si quelqu'un de mal intentionné met son système à la date du 11 janvier 2014, on aura son message pendant 14 ans en première place?
bonjour
dans OE message/supprimer mais çà peut mettre un peu de temps
--
Pierre CFI
MVP Microsoft Access
"Gil HASH" <jeanluc.hoareau@wanadoo.fr> a écrit dans le message de news: eXkEszF2DHA.2396@TK2MSFTNGP09.phx.gbl...
Bonsoir
Comme je trie mes messages par date d'arrivée - logique - Je viens de
m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en
première place de la fenêtre d'Outlook Express.
Y a t'il quelque chose à faire sur le serveur? surtout qu'on a répondu à
Karine -que je n'incrimine pas bien sûr : les erreurs de mise à l'heure ça
existe.
Mais je pense à quelque chose : avec ce système si quelqu'un de mal
intentionné met son système à la date du 11 janvier 2014, on aura son
message pendant 14 ans en première place?
bonjour dans OE message/supprimer mais çà peut mettre un peu de temps
-- Pierre CFI MVP Microsoft Access "Gil HASH" a écrit dans le message de news:
Bonsoir Comme je trie mes messages par date d'arrivée - logique - Je viens de m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en première place de la fenêtre d'Outlook Express. Y a t'il quelque chose à faire sur le serveur? surtout qu'on a répondu à Karine -que je n'incrimine pas bien sûr : les erreurs de mise à l'heure ça existe. Mais je pense à quelque chose : avec ce système si quelqu'un de mal intentionné met son système à la date du 11 janvier 2014, on aura son message pendant 14 ans en première place?
JièL Goubert
Bonjoir(c) Gil HASH
Le 11/01/2004 17:06 vous nous disiez ceci :
Bonsoir Comme je trie mes messages par date d'arrivée - logique - Je viens de m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en première place de la fenêtre d'Outlook Express. Y a t'il quelque chose à faire sur le serveur?
Pas besoin d'aller sur le serveur, tu as la version 6 avec SP1 d'OE, clique sur le message et appui délicatement sur la touche Suppr. Tu peux ansuite confirmer en cliquant (toujours très délicatement) sur le bouton Oui, et hop, plus de message de Karine
Mais je pense à quelque chose : avec ce système si quelqu'un de mal intentionné met son système à la date du 11 janvier 2014, on aura son message pendant 14 ans en première place?
Non, car les messages ne sont conservés que (environ) 3 mois sur le serveur de MS, donc au maximum, si tu ne fais pas la manip ci dessus, tu le verras pendant ces 3 mois
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Bonjoir(c) Gil HASH
Le 11/01/2004 17:06 vous nous disiez ceci :
Bonsoir
Comme je trie mes messages par date d'arrivée - logique - Je viens de
m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en
première place de la fenêtre d'Outlook Express.
Y a t'il quelque chose à faire sur le serveur?
Pas besoin d'aller sur le serveur, tu as la version 6 avec SP1 d'OE,
clique sur le message et appui délicatement sur la touche Suppr. Tu peux
ansuite confirmer en cliquant (toujours très délicatement) sur le bouton
Oui, et hop, plus de message de Karine
Mais je pense à quelque chose : avec ce système si quelqu'un de mal
intentionné met son système à la date du 11 janvier 2014, on aura son
message pendant 14 ans en première place?
Non, car les messages ne sont conservés que (environ) 3 mois sur le
serveur de MS, donc au maximum, si tu ne fais pas la manip ci dessus, tu
le verras pendant ces 3 mois
--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Bonsoir Comme je trie mes messages par date d'arrivée - logique - Je viens de m'apercevoir que ce message et toutes ses réponses restera jusqu'en avril en première place de la fenêtre d'Outlook Express. Y a t'il quelque chose à faire sur le serveur?
Pas besoin d'aller sur le serveur, tu as la version 6 avec SP1 d'OE, clique sur le message et appui délicatement sur la touche Suppr. Tu peux ansuite confirmer en cliquant (toujours très délicatement) sur le bouton Oui, et hop, plus de message de Karine
Mais je pense à quelque chose : avec ce système si quelqu'un de mal intentionné met son système à la date du 11 janvier 2014, on aura son message pendant 14 ans en première place?
Non, car les messages ne sont conservés que (environ) 3 mois sur le serveur de MS, donc au maximum, si tu ne fais pas la manip ci dessus, tu le verras pendant ces 3 mois
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
JièL Goubert
Bonjoir(c) Pierre CFI [mvp]
Le 11/01/2004 17:23 vous nous disiez ceci :
bonjour dans OE message/supprimer mais çà peut mettre un peu de temps
Tu ne confond pas avec le menu Edition, Supprimer ? ou le menu Message, Annuler le message ? Dans ce dernier cas, seul l'expéditeur peut faire cette manip, mais effectivement, la ça peut prendre du temps, et ceux qui ont déjà chargés le messages le verront pendant un bout de temps ;-)
-- Pierre CFI MVP Microsoft Access
PS : il manque un espace aprés les "--" pour que ta signature soit supprimé automatiquement pas OE-Quotefix (ou Thinderbird en ce qui me concerne) lors de la réponse.
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Bonjoir(c) Pierre CFI [mvp]
Le 11/01/2004 17:23 vous nous disiez ceci :
bonjour
dans OE message/supprimer mais çà peut mettre un peu de temps
Tu ne confond pas avec le menu Edition, Supprimer ? ou le menu Message,
Annuler le message ? Dans ce dernier cas, seul l'expéditeur peut faire
cette manip, mais effectivement, la ça peut prendre du temps, et ceux
qui ont déjà chargés le messages le verront pendant un bout de temps ;-)
--
Pierre CFI
MVP Microsoft Access
PS : il manque un espace aprés les "--" pour que ta signature soit
supprimé automatiquement pas OE-Quotefix (ou Thinderbird en ce qui me
concerne) lors de la réponse.
--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
bonjour dans OE message/supprimer mais çà peut mettre un peu de temps
Tu ne confond pas avec le menu Edition, Supprimer ? ou le menu Message, Annuler le message ? Dans ce dernier cas, seul l'expéditeur peut faire cette manip, mais effectivement, la ça peut prendre du temps, et ceux qui ont déjà chargés le messages le verront pendant un bout de temps ;-)
-- Pierre CFI MVP Microsoft Access
PS : il manque un espace aprés les "--" pour que ta signature soit supprimé automatiquement pas OE-Quotefix (ou Thinderbird en ce qui me concerne) lors de la réponse.
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Christian M
Karine, tu as un problème de date de ton système : tes envois sont datés du 06/04/04 :-(
-- Christian M Adresse anti-spam : http://www.cerbermail.com/?9mv8U5g4zk --------------------------- "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
Karine,
tu as un problème de date de ton système : tes envois sont datés du 06/04/04
:-(
--
Christian M
Adresse anti-spam :
http://www.cerbermail.com/?9mv8U5g4zk
---------------------------
"karine" <karine.izquierdo@wanadoo.fr> a écrit dans le message de
news:uGgsqsF1DHA.1740@TK2MSFTNGP12.phx.gbl...
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
Karine, tu as un problème de date de ton système : tes envois sont datés du 06/04/04 :-(
-- Christian M Adresse anti-spam : http://www.cerbermail.com/?9mv8U5g4zk --------------------------- "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
Sylvie
Bonjour,
Voici un exemple:
Sub AjouteFeuille() Dim cpt As Integer cpt = 1 Do While cpt < 53 ' Ajout d'une feuille Application.Sheets.Add After:=Sheets.Item(Sheets.Count), Type:=xlWorksheet ' Renomme la feuille Application.ActiveSheet.Name = "Semaine " & CStr(cpt) cpt = cpt + 1 Loop End Sub
Sylvie
"AV" a écrit dans le message de news:
For i = 1 To 51
Et les années avec 52 ou 53 semaines ?
;-) AV
Bonjour,
Voici un exemple:
Sub AjouteFeuille()
Dim cpt As Integer
cpt = 1
Do While cpt < 53
' Ajout d'une feuille
Application.Sheets.Add After:=Sheets.Item(Sheets.Count),
Type:=xlWorksheet
' Renomme la feuille
Application.ActiveSheet.Name = "Semaine " & CStr(cpt)
cpt = cpt + 1
Loop
End Sub
Sylvie
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
etTs4xO1DHA.3436@tk2msftngp13.phx.gbl...
Sub AjouteFeuille() Dim cpt As Integer cpt = 1 Do While cpt < 53 ' Ajout d'une feuille Application.Sheets.Add After:=Sheets.Item(Sheets.Count), Type:=xlWorksheet ' Renomme la feuille Application.ActiveSheet.Name = "Semaine " & CStr(cpt) cpt = cpt + 1 Loop End Sub
Sylvie
"AV" a écrit dans le message de news:
For i = 1 To 51
Et les années avec 52 ou 53 semaines ?
;-) AV
Ted. D
pk ton message a été envoyé le 06 /04/2004 bizzare!!!!!! "karine" wrote in message news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
pk ton message a été envoyé le 06 /04/2004 bizzare!!!!!!
"karine" <karine.izquierdo@wanadoo.fr> wrote in message
news:uGgsqsF1DHA.1740@TK2MSFTNGP12.phx.gbl...
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
pk ton message a été envoyé le 06 /04/2004 bizzare!!!!!! "karine" wrote in message news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
karine
merci pour ta réponse je vais essayer de tester.
"Pascal Engelmajer" a écrit dans le message de news:
Salut, avec une macro : Sub weeks() 'supprimer les feuilles de départ sauf la première Sheets(1).Name = "Semaine_1" For i = 2 To 52 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "Semaine_" & i Next i End Sub
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
merci pour ta réponse
je vais essayer de tester.
"Pascal Engelmajer" <pascal.engelmajer@ilyapa_spam.net> a écrit dans le
message de news: e8WsZNG1DHA.3468@TK2MSFTNGP11.phx.gbl...
Salut,
avec une macro :
Sub weeks()
'supprimer les feuilles de départ sauf la première
Sheets(1).Name = "Semaine_1"
For i = 2 To 52
Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count))
ws.Name = "Semaine_" & i
Next i
End Sub
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
"karine" <karine.izquierdo@wanadoo.fr> a écrit dans le message de news:
uGgsqsF1DHA.1740@TK2MSFTNGP12.phx.gbl...
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
"Pascal Engelmajer" a écrit dans le message de news:
Salut, avec une macro : Sub weeks() 'supprimer les feuilles de départ sauf la première Sheets(1).Name = "Semaine_1" For i = 2 To 52 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "Semaine_" & i Next i End Sub
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
karine
merci pour ta réponse, je préfèrerai effectivement avoir le 1er jour de la semaine amicalement
"garnote" a écrit dans le message de news: ZoAKb.27820$
Et une variante sur la variante de Pascal :
Sub Semaines_Commencant_Lundi() 'supprimer les feuilles de départ sauf la première dd = #1/3/2004# Sheets(1).Name = "S1 " & Format(dd, "dd-mm-yy") For i = 1 To 51 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "S" & i + 1 & " " & Format(dd + 7 * i, "dd-mm-yy") Next i End Sub
Serge
"garnote" a écrit dans le message de news: ohAKb.27819$
Bonjour Karine,
Une variante à la macro de Pascal :
Sub Semaines_Commencant_Lundi() 'supprimer les feuilles de départ sauf la première dd = #1/3/2004# Sheets(1).Name = Format(dd, "dd-mm-yy") For i = 1 To 51 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = Format(dd + 7 * i, "dd-mm-yy") Next i End Sub
Serge
"karine" a écrit dans le message de news:
merci pour ta réponse je vais essayer de tester.
"Pascal Engelmajer" a écrit dans le
message de news:
Salut, avec une macro : Sub weeks() 'supprimer les feuilles de départ sauf la première Sheets(1).Name = "Semaine_1" For i = 2 To 52 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "Semaine_" & i Next i End Sub
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque. http://www.ilyapa.net/excel "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
Est possible??? si oui comment????
merci d'avance
merci pour ta réponse, je préfèrerai effectivement avoir le 1er jour de la
semaine
amicalement
"garnote" <rien@absent.net> a écrit dans le message de news:
ZoAKb.27820$6N3.10861@charlie.risq.qc.ca...
Et une variante sur la variante de Pascal :
Sub Semaines_Commencant_Lundi()
'supprimer les feuilles de départ sauf la première
dd = #1/3/2004#
Sheets(1).Name = "S1 " & Format(dd, "dd-mm-yy")
For i = 1 To 51
Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count))
ws.Name = "S" & i + 1 & " " & Format(dd + 7 * i, "dd-mm-yy")
Next i
End Sub
Serge
"garnote" <rien@absent.net> a écrit dans le message de news:
ohAKb.27819$6N3.10021@charlie.risq.qc.ca...
Bonjour Karine,
Une variante à la macro de Pascal :
Sub Semaines_Commencant_Lundi()
'supprimer les feuilles de départ sauf la première
dd = #1/3/2004#
Sheets(1).Name = Format(dd, "dd-mm-yy")
For i = 1 To 51
Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count))
ws.Name = Format(dd + 7 * i, "dd-mm-yy")
Next i
End Sub
Serge
"karine" <karine.izquierdo@wanadoo.fr> a écrit dans le message de news:
OQ1ejaG1DHA.2180@TK2MSFTNGP12.phx.gbl...
merci pour ta réponse
je vais essayer de tester.
"Pascal Engelmajer" <pascal.engelmajer@ilyapa_spam.net> a écrit dans
le
message de news: e8WsZNG1DHA.3468@TK2MSFTNGP11.phx.gbl...
Salut,
avec une macro :
Sub weeks()
'supprimer les feuilles de départ sauf la première
Sheets(1).Name = "Semaine_1"
For i = 2 To 52
Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count))
ws.Name = "Semaine_" & i
Next i
End Sub
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il
va."
Sénèque.
http://www.ilyapa.net/excel
"karine" <karine.izquierdo@wanadoo.fr> a écrit dans le message de
news:
uGgsqsF1DHA.1740@TK2MSFTNGP12.phx.gbl...
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de
semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit
automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.
merci pour ta réponse, je préfèrerai effectivement avoir le 1er jour de la semaine amicalement
"garnote" a écrit dans le message de news: ZoAKb.27820$
Et une variante sur la variante de Pascal :
Sub Semaines_Commencant_Lundi() 'supprimer les feuilles de départ sauf la première dd = #1/3/2004# Sheets(1).Name = "S1 " & Format(dd, "dd-mm-yy") For i = 1 To 51 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "S" & i + 1 & " " & Format(dd + 7 * i, "dd-mm-yy") Next i End Sub
Serge
"garnote" a écrit dans le message de news: ohAKb.27819$
Bonjour Karine,
Une variante à la macro de Pascal :
Sub Semaines_Commencant_Lundi() 'supprimer les feuilles de départ sauf la première dd = #1/3/2004# Sheets(1).Name = Format(dd, "dd-mm-yy") For i = 1 To 51 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = Format(dd + 7 * i, "dd-mm-yy") Next i End Sub
Serge
"karine" a écrit dans le message de news:
merci pour ta réponse je vais essayer de tester.
"Pascal Engelmajer" a écrit dans le
message de news:
Salut, avec une macro : Sub weeks() 'supprimer les feuilles de départ sauf la première Sheets(1).Name = "Semaine_1" For i = 2 To 52 Set ws = Sheets.Add(after:=Worksheets(Worksheets.Count)) ws.Name = "Semaine_" & i Next i End Sub
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque. http://www.ilyapa.net/excel "karine" a écrit dans le message de news:
bonjour et bonne année à tous
je souhaiterai créer un classeur avec autant de feuilles que de semaine
dans
l'année. de plus je souhaiterai que ces feuilles soit automatiquement
renommé avec le N° de la semaine, voire la date du 1er jour.