XL 2013 texte suivant date saisi dans une autre feuille

Big66677 · 27 Janvier 2021

Bonjour,

Je suis toujours avec mon calendrier « ont lâche rien »

Dans ce calendrier (en pièce jointe)
On voit dans la partie calendrier, des colonnes avec les dates et des cases vides en colonne.
-----------
Dans la feuille saisie des dates il y a des colonnes au format date et un texte au début de chaque colonne.
--------------
Le but est de récupérer la valeur texte des cellules A1 B1 C1 ext…
Si, une date et saisi en dessous de celle-ci.

merci pour voter aide

job75 · 27 Janvier 2021

Bonsoir Big66677,

Big66677 à dit:
Le but est de récupérer la valeur texte des cellules A1 B1 C1 ext…
Si, une date et saisi en dessous de celle-ci.

Pas bien clair mais bon, mettez dans le code de la feuille "saisie des dates" :

VB:

Private Sub worksheet_Change(ByVal Target As Range)
Dim titre$
If Target.Row = 1 Or Target.Count > 1 Or Not IsDate(Target(1)) Then Exit Sub
titre = Cells(1, Target.Column)
MsgBox titre 'pour tester
End Sub

A+

Big66677 · 27 Janvier 2021

Bonsoir,

J’aurais dire sans vba, mais par formule. Sauf si c’est impossible autrement.
-------------
La feuille "saisie des dates" est organisée par colonne avec au début un texte.
"CE" "CTPsdle" " Prépa CT Psdle"ext..

la feuille calendrier et organisé par un ensemble de 3 colonnes fois 12 (mois dans l’année)
Si, une date ce produit dans l’une de ces colonnes, alors, affiché texte de la première cellule.
je joins le classeur avec explication.

merci

XL 2013 texte suivant date saisi dans une autre feuille

Big66677

XLDnaute Occasionnel

Pièces jointes

job75

XLDnaute Barbatruc

Big66677

XLDnaute Occasionnel

Pièces jointes

Discussions similaires