Discussion :

[MarioWeed]

Bonsoir à tous,
Je ne suis pas certaine d'avoir posté cette demande dans le bon Forum, mais je suppose qu'on pourra toujours me répondre..
Voilà c'est très simple: j'ai un tableur reprenant des commandes clients.
Dans une colonne intitulée "Etat d'avancement", j'ai inséré une liste déroulante (via Validation/liste): à traiter, en cours, livré, facturé, clôturé.
Plus loin, j'ai une autre colonne "date de réception paiement client".
Je voudrais que dès qu'une date est entrée dans cette colonne, autrement dit lorsqu'elle est différente de "", l'état d'avancement clôturé de ma première colonne s'affiche automatiquement, afin de ne pas devoir faire la modif moi même.
Rien de sorcier... mais après avoir cherché toute la journée, je désespère!
Merci d'avance pour votre aide.
Bye!

[SfJ5Rpw8]

Bonsoir,

Utilise une macro événementielle dans ta feuille qui sur changement d'état dans ta colone date met a jour ta première colonne.
Voir :
http://silkyroad.developpez.com/VBA/EvenementsFeuille/

[Invité]

Bonjour,

Pour illustrer ce qu'écrit bbil, ci-joint un exemple adapté à votre cas.

Le code ci-dessous est à coller dans le module de votre onglet de suivi des commandes et à adapter en fonction de la position des deux colonnes.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Option Explicit
 
Private Sub Worksheet_Change(ByVal CelluleDatePaiement As Range)
 
Dim LigneDeTitre As Long
Dim ColEtatAvancement As Long
Dim ColDatePaiement As Long
 
    LigneDeTitre = 10
    ColEtatAvancement = 4
    ColDatePaiement = 5
 
    If CelluleDatePaiement.Count > 1 Then Exit Sub
    If CelluleDatePaiement.Row <= LigneDeTitre Then Exit Sub
 
   On Error Resume Next
   If Not Application.Intersect(CelluleDatePaiement, Columns(ColDatePaiement)) Is Nothing Then
      CelluleDatePaiement.Offset(0, ColEtatAvancement - ColDatePaiement) = "Clôturé"
      Exit Sub
   End If
End Sub

Visuellement cela donne ça : Vidage d'écran


Cordialement.

[MarioWeed]

Un tout grand merci pour vos réponses, merci bbil pour la théorie envoyée (que je vais tenter de mettre en pratique dès mnt) et merci aussi Eric KERGRESSE de m'avoir préparé la macro car je n'y serais pas arrivée seule aussi rapidement, c'est sûr! J'ai encore bcp à apprendre en vba... C'était une trop bonne idée de poster cette question sur ce forum ;-)