Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du
mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre Fauconnier
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin
inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers
le bas. Excel complètera les dates par incrément de 1
--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)
---
Dom wrote:
Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste
du mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Dom
il faudrait que cela se fasse par macro.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers
le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
il faudrait que cela se fasse par macro.
"Pierre Fauconnier" <pierre.fauconnier@NOSPAM.be> a écrit dans le message de
news:uRl$%23%23xnDHA.2364@TK2MSFTNGP11.phx.gbl...
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin
inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire
vers
le bas. Excel complètera les dates par incrément de 1
--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)
---
Dom wrote:
Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste
du mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers
le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Nicolas B.
Salut Dom,
Cette macro te convient-elle ?
Sub Mois() Jour = [A120] While Month(Jour + 1) = Month([A120]) Jour = Jour + 1 Cells(Day(Jour) + 119, 1) = Jour Wend End Sub
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Salut Dom,
Cette macro te convient-elle ?
Sub Mois()
Jour = [A120]
While Month(Jour + 1) = Month([A120])
Jour = Jour + 1
Cells(Day(Jour) + 119, 1) = Jour
Wend
End Sub
"Pierre Fauconnier" <pierre.fauconnier@NOSPAM.be> a écrit dans le
message de news:uRl$%23%23xnDHA.2364@TK2MSFTNGP11.phx.gbl...
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le
coin inférieur droit de ta cellule. Clique dessus et garde enfoncé
puis tire vers le bas. Excel complètera les dates par incrément de 1
--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)
---
Dom wrote:
Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste
du mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Dom
Merci cela fonctionne nickel
Dom
"Nicolas B." a écrit dans le message de news:
Salut Dom,
Cette macro te convient-elle ?
Sub Mois() Jour = [A120] While Month(Jour + 1) = Month([A120]) Jour = Jour + 1 Cells(Day(Jour) + 119, 1) = Jour Wend End Sub
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Merci cela fonctionne nickel
Dom
"Nicolas B." <nicolas.bruot@adresse.bidon.com> a écrit dans le message de
news:uBv9jOynDHA.976@tk2msftngp13.phx.gbl...
Salut Dom,
Cette macro te convient-elle ?
Sub Mois()
Jour = [A120]
While Month(Jour + 1) = Month([A120])
Jour = Jour + 1
Cells(Day(Jour) + 119, 1) = Jour
Wend
End Sub
"Pierre Fauconnier" <pierre.fauconnier@NOSPAM.be> a écrit dans le
message de news:uRl$%23%23xnDHA.2364@TK2MSFTNGP11.phx.gbl...
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le
coin inférieur droit de ta cellule. Clique dessus et garde enfoncé
puis tire vers le bas. Excel complètera les dates par incrément de 1
--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)
---
Dom wrote:
Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste
du mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Denis Michon
Bonjour Dom,
Tu n'as qu'à renseigner le mois que tu désires.
'------------------------ Sub RemplirUnePlageAvecDesDates()
Dim LaDate As Date, NbJours As Integer, Mois As Integer
Mois = 2
LaDate = DateSerial(2003, Mois, 1) NbJours = Day(DateSerial(2003, Mois + 1, 0)) With Worksheets("Feuil1") With .Range("A121") .Formula = LaDate .AutoFill .Resize(NbJours), xlFillDays End With End With
End Sub '------------------------
Salutations!
"Dom" a écrit dans le message de news: il faudrait que cela se fasse par macro.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers
le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
Merci d'avance.
Dom
Bonjour Dom,
Tu n'as qu'à renseigner le mois que tu désires.
'------------------------
Sub RemplirUnePlageAvecDesDates()
Dim LaDate As Date, NbJours As Integer, Mois As Integer
Mois = 2
LaDate = DateSerial(2003, Mois, 1)
NbJours = Day(DateSerial(2003, Mois + 1, 0))
With Worksheets("Feuil1")
With .Range("A121")
.Formula = LaDate
.AutoFill .Resize(NbJours), xlFillDays
End With
End With
End Sub
'------------------------
Salutations!
"Dom" <domy.v@wanadoo.fr> a écrit dans le message de news:OCQiNFynDHA.3700@TK2MSFTNGP11.phx.gbl...
il faudrait que cela se fasse par macro.
"Pierre Fauconnier" <pierre.fauconnier@NOSPAM.be> a écrit dans le message de
news:uRl$%23%23xnDHA.2364@TK2MSFTNGP11.phx.gbl...
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin
inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire
vers
le bas. Excel complètera les dates par incrément de 1
--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)
---
Dom wrote:
Bonjour,
En A120, j'ecrit un date, Ex : 01/04/03
Cela sera toujours le 1er du mois.
Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste
du mois.
J'ai beau chercher sur les site habituels, je ne trouve pas.
Je pense que cela doit etre possible mais je n'y arrive pas.
'------------------------ Sub RemplirUnePlageAvecDesDates()
Dim LaDate As Date, NbJours As Integer, Mois As Integer
Mois = 2
LaDate = DateSerial(2003, Mois, 1) NbJours = Day(DateSerial(2003, Mois + 1, 0)) With Worksheets("Feuil1") With .Range("A121") .Formula = LaDate .AutoFill .Resize(NbJours), xlFillDays End With End With
End Sub '------------------------
Salutations!
"Dom" a écrit dans le message de news: il faudrait que cela se fasse par macro.
"Pierre Fauconnier" a écrit dans le message de news:uRl$%23%
Bonsoir
Place-toi en A120. normalement, tu as un petit carré noir dans le coin inférieur droit de ta cellule. Clique dessus et garde enfoncé puis tire vers
le bas. Excel complètera les dates par incrément de 1
-- Cela convient-il? ---- Pierre Fauconnier "C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..." (remplacer NOSPAM par pfi pour me répondre. Merci)
--- Dom wrote:
Bonjour, En A120, j'ecrit un date, Ex : 01/04/03 Cela sera toujours le 1er du mois. Ce que je voudrais c'est qu'a partir de A121, cela m'ecrive le reste du mois. J'ai beau chercher sur les site habituels, je ne trouve pas. Je pense que cela doit etre possible mais je n'y arrive pas.
