1 champs = compléter une base de données

[samourra]

Bonjour à tous,

Je vous expose ma problématique:

Je prépare un tableau de suivi des resultats commerciaux hébdomadaires. puis-je chaque semaine renseigner la meme cellule et que excel garde les informations saisies auparavant et même mieux aditionne les successions de nombres que j'indiquerai.

merci beaucoup de votre aide.

 

[titiborregan5]

Re : 1 champs = compléter une base de données

Bonjour Samourra,

pourrais-tu mettre un fichier exemple pour qu'on comprenne mieux ce que tu souhaites stp?

Cordialement,
Tibo

 

[samourra]

Re : 1 champs = compléter une base de données

bonjour Tibo, merci de ta rapidité!

Voilà un fichier simplifié à l'extreme. il faudrait remplir le "total semaine" chaque semaine et que la ligne "Total cumulé" se mette à jour automatiquement (donc en gardant les chiffres des semaines précédentes en compte).
je suis claire? 😛

 

[samourra]

Re : 1 champs = compléter une base de données

hmm
on peut me trouver d'autres solutions de présentation si c'est ce qui bloque. C'est plus le but qui m'interesse que la forme.
merci encore.

 

[Papou-net]

Re : 1 champs = compléter une base de données

Bonjour samourra, et bienvenue sur le Forum,

Il n'est pas possible, je pense, de résoudre ta demande par formule, car celà pose un problème de redondance qu'Excel ne sait pas calculer.

Je te propose donc une solution par macro événementielle, qui s'exécute à chaque changement dans une des cellules B2 à G2.

Espérant avoir répondu à ton attente.

Cordialement.

 

[samourra]

Re : 1 champs = compléter une base de données

Merci Papou net,
tu as parfaitement répondu à mon attente mais peux tu m'expliquer comment tu as fait s'il te plait?
que je puisse le reproduire.

c'est très très gentil.
merci mille fois.

 

[jeanpierre]

Re : 1 champs = compléter une base de données

Bonjour samourra, Papou-net,

Si, on peut avec une simple formule, voir fichier joint.

Bon après-midi.

Jean-Pierre

Edit : Non, en fait, cela ne fonctionne pas la mise à jour se fait à chaque saisie et ce n'est pas le but... Désolé.

Valable pour un seule cellule uniquement.

 

[samourra]

Re : 1 champs = compléter une base de données

Merci quand même Jean-Pierre de ton intention d'aide ;-) ça compte aussi 😀

Papou-net, j'attends tjs tes indications pour faire ça toute seule comme une grande!

 

[samourra]

Re : 1 champs = compléter une base de données

Help 🙂 merciiiii

 

[jeanpierre]

Re : 1 champs = compléter une base de données

Re,

Papou-net étant déconnecté,

Clic droit sur l'onglet de ta feuille et Visualiser le code.

Procédure événementielle, c'est-à-dire, à chaque modification (à chaqiue événement).

B2:G2 ta zone de saisie.

Target.Row + 1 = la ligne du dessous

Target.Column = la colonne de saisie.

Bonne fin d'après-midi.

Jean-Pierre

 

[samourra]

Re : 1 champs = compléter une base de données

Merci Jean-Pierre.
comment je dois faire pour appliquer ma macro à d'autre cellules? les copier en somme.

 

[jeanpierre]

Re : 1 champs = compléter une base de données

Re,

Pas bien compris... "appliquer ma macro à d'autre cellules", lequelles ?

C'est ceci qu'il faut modifier : B2:G2 en B2:L2, par exemple ou autre chose.

 

[samourra]

Re : 1 champs = compléter une base de données

oui si je voulais par exemple appliquer ma macro à B2:G2 puis pour un autre tableau sur la même feuille excel dans les cellules B8:G8.

tu comprends ce que je veux dire?

 

[jeanpierre]

Re : 1 champs = compléter une base de données

Re,

Alors et sans rien trop toucher :

Private Sub Worksheet_Change(ByVal Target As Range)
Set cel = Intersect(Sheets("Feuil1").Range("B2:G2"), Target)
If Not cel Is Nothing Then
Me.Cells(Target.Row + 1, Target.Column) = Me.Cells(Target.Row + 1, Target.Column) + Target.Value
End If
Set cel = Intersect(Sheets("Feuil1").Range("B8:G8"), Target)
If Not cel Is Nothing Then
Me.Cells(Target.Row + 1, Target.Column) = Me.Cells(Target.Row + 1, Target.Column) + Target.Value
End If
End Sub

Pas réfléchi encore pour condenser.

 

[samourra]

Re : 1 champs = compléter une base de données

voilà mon tableau
je veux qu'en remplissant les cases roses, les jaunes se mettent à jour. que la macro fonctionne sur tous les tableaux.
je pense que c'est plus claire comme ça ;-)
merci beaucoup!