• Initiateur de la discussion Initiateur de la discussion nino65
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

N

nino65

Guest
Bonjour a tous et bravo pour votre forum😀
Voila puis que ça fait deux jours que je cherche et trouve pas je me decide a vous demander.

Je voudrais qu'il apparaisse la date fixe dans une cellule de A quand une des autres cellules B,C,D etc est remplie.Mais je ne trouve pas, il faut dire que je suis nul en excel et macros.
Si vous pouviez m'aider?
J'ai excel 2007
Merci d'avance 😱
 
Re : cellule date??

Hello,
En vba, a placer dans le code de la feuille(click droit sur l'onglet, visuliser le code...)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
Target.Offset(0, -1) = Date

End If
End Sub
Toute saisie en colonne B te met la date du jour en colonne A
A++

Edit: La version de Hasco correspond encore mieux à ton désir
Lio
 
Dernière édition:
Re : cellule date??

Bonsoir Nino,

Voici un petit classeur exemple qui le fait.
Pour voir le code: click-droit sur le nom de l'onglet puis 'Visualiser le code'

A+

[Edit] bonsoir Tous
 
Dernière modification par un modérateur:
Re : cellule date??

En décryptant ton message .. c'est peut être çà que tu veux ...
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
    If Target.Value <> "" Then
        Cells(Target.Row, 1).Value = Date
        Cells(Target.Row, 1).NumberFormat = "d-mmm-yy"
    Else
        Cells(Target.Row, 1).ClearContents
    End If
End Sub

A +
 
Re : cellule date??

BRAVO les gars , vous êtes géniaux ça marche du tonnerre🙂
Merci beaucoup!!!!

Si je peux abuser...
Quand je veux enregistrer il me dit "les fonctionalites suivantes ne peuvent pas etre enregistrees dans des classeurs sans macro:
Projet vb"

????????????????????????????????????😕

Merci encore
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
190
Réponses
2
Affichages
260
Retour