Excel: D'un clic, introduction de la date

thunderesse -  
Thunderesse Messages postés 10 Statut Membre -
Bonjour,

Dans un classeur excel:

En cliquant sur une cellule avec le bouton G de la souris, j'aimerais que la date du jour s'inscrive. Celle-ci ne doit pas se modifier lors des prochaines ouvertures du classeur, les jours suivants.

Merci d'avance.

10 réponses

  1. Raymond PENTIER Messages postés 58211 Date d'inscription   Statut Contributeur Dernière intervention   17 480
     
    Non : Excel ne fonctionne pas ainsi !
    0
  2. thunderesse
     
    Dommage cela m'aurait fait gagné beaucoup de temps pour ma facturation. :-(( Je continuerai donc à taper la date du jour...
    0
  3. Raymond PENTIER Messages postés 58211 Date d'inscription   Statut Contributeur Dernière intervention   17 480
     
    . . . . . . . . . Ce n'est pourtant pas bien long : tu tapes
    7/8
    et excel affiche
    07/08/10
    ou
    07 août 2010
    ou
    samedi 07 août 2010
    selon le format date que tu auras appliqué à la cellule.
    0
  4. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   957
     
    Salut le forum

    Pour la date du jour, un simple raccourci clavier peut le faire CTRL+;

    Mytå
    Merci de donner suite à votre question, nous ne sommes pas des robots...
    Versions installées [MsProject 2003(FR), Excel 2003-2007(FR)]
    0
    1. Raymond PENTIER Messages postés 58211 Date d'inscription   Statut Contributeur Dernière intervention   17 480
       
      En effet, Mytå ; j'avais complètement oublié ce raccourci, que je n'utilise jamais.
      C'est effectivement la meilleure solution pour thunderesse
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Thunderesse Messages postés 10 Statut Membre
     
    Bon d'accord, on n'est flemmard ou on ne l'est pas...

    Et moi je le suis!!!

    Et heureusement car c'est grâce à ça et un peu à Vous que cette dernière semaine je viens de faire passer le temps que je dois consacrer à ma facturation de 2H/sem à 15min
    Alors d'un seul coup je me suis prise à rêver qu'il ne m'en faudrait plus que 10 avec 10 clics de souris et une seule main (ce qui est très pratique quand on a une petite puce qui hurle en nous tournant autour..).

    Alors je suis un peu déçue d'avoir rencontrer les limites d'excel, qui jusqu'à présent, ne m'avait pas laissée tomber...
    Ca avait pourtant l'air facile dans ma petite tête... Si clic G alors date du jour...

    Dans tous les cas, MERCI, ce forum m'a été d'un grand secours...
    0
  7. m@rina Messages postés 27515 Date d'inscription   Statut Modérateur Dernière intervention   11 562
     
    Oui, mais ça voudrait dire que tu ne pourrait plus sélectionner de cellule, que tu ne pourrait plus saisir dans une cellule autre chose qu'une date, etc... et que tu ne pourrais même plus supprimer la date car il faut bien cliquer pour cela ! :D

    m@rina
    0
  8. Thunderesse Messages postés 10 Statut Membre
     
    Et les autres boutons de cette petite bête-là... on ne peut pas non plus les utiliser?? Ou un double clic??
    0
  9. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
     
    En VBA, tu pourrais utiliser l'événement sur le clic droit de la feuille :

    Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
     ActiveCell.Value = Date
    End Sub
    
    0
    1. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
       
      Si le menu contextuel te gène :

      Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
        CommandBars("Cell").Enabled = False
        ActiveCell.Value = Date
      End Sub
      
      Private Sub Worksheet_Deactivate()
       CommandBars("Cell").Enabled = True
      End Sub
      
      0
    2. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
       
      En voyant la réponse de Lermite222 je m'aperçoit que j'ai oublié la deuxième condition (lui aussi !) :
      « Celle-ci ne doit pas se modifier lors des prochaines ouvertures du classeur, les jours suivants. »

      Voici donc une solution avec le clic droit :

      Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
        CommandBars("Cell").Enabled = False
        If VarType(ActiveCell.Value) = vbDate Then ActiveCell.Value = Date
      End Sub
      
      Private Sub Worksheet_Deactivate()
       CommandBars("Cell").Enabled = True
      End Sub
      
      0
    3. lermite222 Messages postés 9042 Statut Contributeur 1 199
       
      Comprend rien à ce que tu écrit.
      Dans mon exemple la date sera mémorisée et ne changera plus, sauf si ont le veux vraiment !!!
      0
    4. lermite222 Messages postés 9042 Statut Contributeur 1 199
       
      Copie mon code dans le module de la feuille
      Clic sur quelques colonnes.
      Sauve le classeur et réouvre le.
      Les date ont changer ????
      Tu confond avec la formute =DATE
      0
  10. lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjour tou(te)s,
    Avec un simple clic...
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        If Target.Count > 1 Then Exit Sub
        If Target.Column = 1 And Target = "" Then ' 1 pour la colonne A
            Target = Date
        End If
    End Sub

    A+
    0
  11. Thunderesse Messages postés 10 Statut Membre
     
    Et Sur MAC :-(((
    0
    1. lermite222 Messages postés 9042 Statut Contributeur 1 199
       
      Ca n'a rien à voir avec le PC c'est propre à Excel et celà devrait aussi fonctionner sur MAC.
      0
    2. Thunderesse Messages postés 10 Statut Membre
       
      C'est une macro?

      Si j'ai bien lu, les Macros ne fonctionnent pas sur MAC... I
      0
    3. lermite222 Messages postés 9042 Statut Contributeur 1 199
       
      ???
      Clic droit sur l'onglet de ta feuille>> selectionne "Voir le code"
      Dans la fenêtre qui s'ouvre tu colle le code ci-dessus.
      Et tu reviens dans excel.
      Tu clic sur une cellule vide de la colonne A
      A+
      0
    4. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   957
       
      Salut le forum

      Attention, les macros ont été supprimées de la version 2008 pour MAC

      Mytå
      0
    5. lermite222 Messages postés 9042 Statut Contributeur 1 199
       
      Merci pout l'info.
      mais je n'ai pas un MAC.
      Et excel perd beaucoup d'intérêt si plus de macro.
      A+
      0