Formule excel

Résolu
ptitof95 -  
Bonjour,

je souhaiterais faire une main courante via excel

exemple :

Si en cellule B1 il ya du texte mettre l'heure et la date du moment en A1

est ce possible ?

cordialement
christophe

5 réponses

  1. sinane123
    bonjour
    =SI(B1<>"";MAINTENANT();"")
    personnaliser la forme de la cellule A1
    dans le menu contextuel--> sélectionner le commande " Format de cellule"
    Dans la boite de dialogue (l'onglet "Nombre") sélectionner la catégorie "Date"
    puis personnaliser dans le type "14/3/01 13:30"
    valider par ok
    puis recopier la formule pour les autres cellules de la colonne A
    -2
    1. ptitof95 Auteur
      merci, cela fonctionne le seul problème c'est que lorsque je fais la meme sur B2 l'heure change sur également sur A1
      0
      1. sinane123
        chager b1 par b2
        ou recopier la formule :
        sélectionner la cellule a1
        cliquer sur le carré noir au bas droit de la cellule a1
        glisser la souris vers le bas puis relâcher
        -2
        1. ptitof95 Auteur
          c'est exactement ce que j'ai fait
          j'ai copier coller la formule en changeant B1 en B2 puis en B3 etc.
          ccela met bien l'heure de saisie en A1 lorsque j'ecris en B1
          mais lorsque j'ecris en B2, en A2 l'heure de saisie saffiche mais change l'heure A1 en heure de saisie B2.

          je sais pas si je suis tres clair dans mes explication....

          christophe
          1
          1. eriiic Contributeur
            Bonjour,

            ca ne peut être fait que par macro.
            A mettre dans le module de la feuille : 
            Private Sub Worksheet_Change(ByVal Target As Range)
     Dim c As Range
     Static noEvents As Boolean
     If noEvents Then Exit Sub
     noEvents = True
     For Each c In Intersect(Target, Columns(2))
        If c <> "" And c.Offset(, -1) = "" Then c.Offset(, -1) = Now()
     Next c
     noEvents = False
End Sub

            Date et heure ne sont mises que si A est vide. Si tu veux écraser l'ancienne heure sur une modif enlever le test And c.Offset(, -1) = ""
            https://www.cjoint.com/?DIptxx0kOIs

            eric
            0
          2. ptitof95 Auteur
            bonjour,

            quesque le module de la feuille ?
            puis je vous envoyer mon fichier afin que vous me mettiez la macros ?

            cordialement
            christophe
            0
          3. eriiic Contributeur
            Bonjour,

            Tes remerciements me touchent...
            Fait clic-droit sur le nom d'onglet de ta feuille et 'visualiser le code'.
            Tu colles le code dans la fenêtre de droite.
            Sinon déposer le fichier sur cjoint.com et coller ici le lien fourni.

            eric
            0
          4. ptitof95 Auteur
            nous sommes dans un dialogue je te remercierai pour ton aide bien entendu à la fin du dialogue....

            voici le lien ci joint

            http://cjoint.com/data3/3IqkagLO446.htm

            En vous remerciant toi et sinane123

            christophe
            0
          5. eriiic Contributeur
            http://cjoint.com/14sp/DIqkw3mHtkR_classeur2.xls
            0