XL 2010 incrémentation auto jour : jour/date

[herve62]

Bonjour
Je voulais écrire des tableaux avec des dates comme par ex en A1 Lundi 15 puis mettre en A2 : =SI(A1="";"";A1+SI(JOURSEM(A1;2)=5;3;1))
ensuite "étirer" mais déjà en A2 j'ai #VALEUR! au lieu de Mardi 16 .....
La formule provient de ChatGPT (Bing) !!!! mais comme c'est un robot ; il persiste à me redonner à chaque fois la même formule ??

 

[Dranreb]

Bonjour.
Il y a probablement un String au lieu d'une Date en A1.

 

[TooFatBoy]

Bonjour,

Comme l'a dit Dranreb, tu n'as probablement pas une date mais du texte dans ta cellule A1.
A vérifier.

---

=SI(A1="";"";A1+SI(JOURSEM(A1;2)=5;3;1))

Cette formule sert-elle à ne pas prendre en compte les samedis et dimanches ?

 

[herve62]

je mets le fichier
et les com de Bing

1. En cellule A2, entrez la formule suivante :
   =SI(A1="";"";A1+SI(JOURSEM(A1;2)=5;3;1))
   
   Assurez-vous que la cellule A1 contient bien “lundi 15”. La formule vérifie si la cellule A1 est vide et renvoie une chaîne vide si c’est le cas. Sinon, elle ajoute 3 jours si le jour de la semaine est vendredi (JOURSEM(A1;2)=5), sinon elle ajoute 1 jour.
2. Utilisez la poignée de recopie pour étirer la formule vers le bas. Vous devriez maintenant obtenir une séquence de jours de la semaine correcte.

 

[Dranreb]

Exactement ce que je disais : "lundi 15" en A1 au lieu de 15/01/2024
(Avec format personnalisé "jjjj j" partout, bien évidemment)

 

[TooFatBoy]

Assurez-vous que la cellule A1 contient bien “lundi 15”.

Bing ou ChatGPT est débile : il te faut évidemment une date en A1 et non le texte "lundi 15 !

Rappel : une date pour Excel est un nombre entier.

 

[herve62]

j'ai comme ça , ça va pas ?
moi je veux dans une colonne A1 ..... A20 écrit : Lundi 15 , Mardi 16 , Mercredi 17 ..etc
Au fait ça marche chez vous ??

 

[Dranreb]

Non. Par formule on ne peut rien additionner à du texte, surtout s'il n'est pas convertible en nombre.

 

[TooFatBoy]

moi je veux dans une colonne A1 ..... A20 écrit : Lundi 15 , Mardi 16 , Mercredi 17 ..etc
Au fait ça marche chez vous ??

ATTENTION : ne pas confondre le contenu d'une cellule et ce qu'elle affiche.

Tu dois mettre une date valide en A1, mais tu peux lui faire afficher "lundi 15" si tu veux avec le format indiqué par Dranreb : jjjj j

 

[Dranreb]

Éventuellement vous pouvez autoriser la saisie du jour de la semaine et le corriger par cette procédure dans le module de l'objet Worksheet représentant la feuille :

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
   Dim TSpl() As String, Dt As Date
   If VarType(Target.Value) <> vbString Then Exit Sub
   TSpl = Split(Target.Value)
   Dt = DateSerial(Year(Date), Month(Date), TSpl(1))
   If TSpl(0) <> Format(Dt, "dddd") Then
      If MsgBox("le " & Format(Dt, "d mmmm yyyy") & " est un " & Format(Dt, "dddd") & "," _
         & vbLf & "pas un " & TSpl(0), vbOKCancel, "Saisie """ & Target.Value & """.") = vbCancel Then Exit Sub
      End If
   Target.Value = Dt
   Target.NumberFormat = "dddd d"
   End Sub

 

[herve62]

c'est bon ça marche ; IA de Bing n'est pas à la hauteur , un Robot ne remplacera jamais l'humain
Il m'a déjà fait un tour idem pour écrire un script powershell qui ne fonctionne pas ! tu lui dis il marque qu'il corrige mais t'a TOUJOURS pareil !!

 

[TooFatBoy]

@TooFatBoy peux tu me retourner le fichier corrigé ?

Oui, bien sûr.

Je le corrige et je te l'envoie.

 

[patricktoulon]

Bonjour
l'incrémentation peut être simple
en A1 j'ai 01/01/2024
en A2 je met =$A$1+LIGNE(A1)
et j'etire vers le bas jusqu'a tant que je veux
tout simplement
j'attire ton Attention sur l'address de A1 en absolu

si on veux faire la même chose mais etalé sur une ligne on remplace "ligne " par "colonne" dans la formule
tout simplement

 

[TooFatBoy]

Le fichier en pj.

 

[TooFatBoy]

l'incrémentation peut être simple
en A1 j'ai 01/01/2024
en B2 je met =$A$1+LIGNE(A1)
et j'etire vers le bas jusqu'a tant que je veux
tout simplement
j'attire ton Attention sur l'address de A1 en absolu

Ce n'est pas bon : tu ne fais pas sauter les samedis et dimanches comme dans la formule de #1.