automatisation

Y compris Power BI, Power Query et toute autre question en lien avec Excel
v
vincentt
Membre fidèle
Membre fidèle
Messages : 193
Inscrit le : 24 août 2012
Version d'Excel : excel vista

Message par vincentt » 31 mai 2013, 17:09

Bonjour,

J'utilise un fichier pour faire un suivi comptable des encaissements/décaissements (cf fichier joint).
Il y un journal classé par date et par comptes, et un recap qui fait la somme par compte.
Sachant qu'on utilise rarement plus de 10 comptes par mois.

Actuellement je dois mettre manuellement dans la Recap les comptes présents dans le Journal.
Comment pourrais je automatiser cela ? Par exemple, si le compte "espace vert" est présent dans la plage du journal (qu'il soit présent une fois ou 15 fois...) comment le faire figurer 1 fois automatiquement dans la plage recap ?

Merci pour toute idée de formule !

vincent
question caisse.xlsx
(30.84 Kio) Téléchargé 24 fois
Avatar du membre
Game Over
Membre dévoué
Membre dévoué
Messages : 780
Appréciations reçues : 2
Inscrit le : 9 mars 2013
Version d'Excel : 2016 EN
Contact :

Message par Game Over » 31 mai 2013, 19:25

Bonjour,

colle ce code dans le module de ta feuille REGIE

Les modifications de ta zone orange seront immédiatement enregistrées dans ta zone jaune
(à tester)
Private Sub Worksheet_Change(ByVal Target As Range)

Application.ScreenUpdating = False
Dim Dico As Object, c As Integer, myRange As Range
Set Dico = CreateObject("scripting.dictionary")

If Target.Count > 1 Then Exit Sub
Set myRange = Range("D10:D40")

If Not Intersect(Target, myRange) Is Nothing Then
    
    Range("C47:C70") = ""
    c = 10
    
    Do Until IsEmpty(Cells(c, 4))
        Dico(Cells(c, 4).Value) = ""
        c = c + 1
    Loop
    
    Cells(47, "C").Resize(Dico.Count, 1) = Application.Transpose(Dico.keys)
End If

Set Dico = Nothing
Application.ScreenUpdating = True

End Sub

t
tulipe_4
Passionné d'Excel
Passionné d'Excel
Messages : 7'728
Appréciations reçues : 123
Inscrit le : 1 janvier 2011
Version d'Excel : 2000 2007

Message par tulipe_4 » 31 mai 2013, 20:40

bonjour
un essai (sans vba) : par formule
vincenttt.xls
(80 Kio) Téléchargé 21 fois
cordialement
c'est en cherchant qu'on trouve
v
vincentt
Membre fidèle
Membre fidèle
Messages : 193
Inscrit le : 24 août 2012
Version d'Excel : excel vista

Message par vincentt » 3 juin 2013, 17:49

Bonjour,
Merci pour ces deux solutions.
Aprés plusieurs tests, la méthode par macro marche
Je viens d'essayer la méthode par formule mais qd j'ajoute des comptes ça ne marche pas, si j'ajoute des comptes dans le journal ils ne s'affichent pas forcément dans la recap.

Tulipe_4 tu pourrais m'expliquer la formule s'il te plaît ? Pourquoi il y a t-il un lien avec la colonne A ?


Merci encore,

Vincent
caisses 03-06-2013.xls
(75 Kio) Téléchargé 19 fois
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message
  • Automatisation
    par JOUFFRAY » 30 avril 2014, 17:14 » dans Excel - VBA
    2 Réponses
    317 Vues
    Dernier message par JOUFFRAY
    1 mai 2014, 09:41
  • Automatisation
    par MojitoDu75 » 13 juin 2016, 10:18 » dans Excel - VBA
    9 Réponses
    265 Vues
    Dernier message par d3d9x
    14 juin 2016, 18:04
  • automatisation
    par jpr » 7 août 2013, 09:50 » dans Excel - VBA
    3 Réponses
    364 Vues
    Dernier message par eriiic
    7 août 2013, 10:52
  • automatisation
    par jeanhilo22 » 8 décembre 2017, 22:02 » dans Excel - VBA
    2 Réponses
    122 Vues
    Dernier message par h2so4
    9 décembre 2017, 11:35
  • Automatisation de planning
    par Grem974 » 4 mai 2015, 21:43 » dans Excel - VBA
    29 Réponses
    746 Vues
    Dernier message par James007
    11 mai 2015, 20:26
  • Automatisation de TCD
    par Alex64140 » 14 juin 2013, 18:03 » dans Excel - VBA
    9 Réponses
    401 Vues
    Dernier message par Alex64140
    20 juin 2013, 10:37