Condition + AUJOURDHUI() figé

[loya]

Bonjour tout le monde un grand BRAVO pour ce magnifique site permettez moi de poster mon cas:

Je voudrais afficher (figer) la date du jour en C1 si A1 & B1 non vides

Merci encore pour cet excellent site 😉

 

[JCGL]

Re : Condition + AUJOURDHUI() figé

Bonjour à tous,
Bienvenue à Loya 🙂,

Peux-tu essayer avec :

Option Explicit
Dim Cel
Private Sub Worksheet_Change(ByVal Target As Range)
  For Each Cel In Target
    With Cel
      If (.Column = 1 Or .Column = 2) Then
        With .EntireRow
          If .Cells(1, 1) <> "" And Cells(1, 2) <> "" Then .Cells(1, 3) = Date
         End With
      End If
    End With
  Next Cel
End Sub

dans le code de la feuille :



A+

 

[loya]

Re : Condition + AUJOURDHUI() figé

Bonjour JCGL

Merci pour votre réponse,mais en ecrivant juste en A2 sans B2 j'ai la date en C2 , alors le C2 devra mentionner la date que si A2 & B2 ne sont pas vides tous les deux en même temp.

Pour le A1 & B1 c'est bon.

Merci.

 

[loya]

Re : Condition + AUJOURDHUI() figé

Bonjour le forum;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For i = 1 To 200
If Range("A" & i).Value <> "" And Range("B" & i).Value <> "" Then
Range("C" & i) = Date
End If
Next i
End Sub

J'ai trouvé ce code 🙂 que j'ai un peu modifié.

 

[loya]

Re : Condition + AUJOURDHUI() figé

Bonjour le forum;

Apres reflexion c'est le code de JCGL (que je remercie vivement au passage) qui marche bien,mais j'ai encore un souci sur ma feuille excel de 800 lignes j'ai déja des dates saisies manuellement que je veux garder, comment exploiter ce code tout en gardant les dates déja saisies.

Merci.

 

[loya]

Re : Condition + AUJOURDHUI() figé

j'avoue que je comprends rien, des fois ça marche tres bien (C=date jour si A & B non vides) des fois ça plante ...😕

Voir fichier joint:

 

[ninbihan]

Re : Condition + AUJOURDHUI() figé

Bonsoir,


En l'absence de JCGL, voici ma proposition,

A tester,


Bonne soirée,

Ninbihan

 

[loya]

Re : Condition + AUJOURDHUI() figé

Bonsoir Ninbihan

Ca me semble parfait,
Merci.