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é 26 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 : 8'105
Appréciations reçues : 165
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é 23 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é 20 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
    334 Vues
    Dernier message par JOUFFRAY
    1 mai 2014, 09:41
  • Automatisation
    par MojitoDu75 » 13 juin 2016, 10:18 » dans Excel - VBA
    9 Réponses
    283 Vues
    Dernier message par d3d9x
    14 juin 2016, 18:04
  • automatisation
    par jeanhilo22 » 8 décembre 2017, 22:02 » dans Excel - VBA
    2 Réponses
    141 Vues
    Dernier message par h2so4
    9 décembre 2017, 11:35
  • Automatisation de la date
    par mandreux » 2 novembre 2017, 11:39 » dans Excel - VBA
    2 Réponses
    100 Vues
    Dernier message par mandreux
    2 novembre 2017, 11:56
  • automatisation d'entrées
    par martialjade » 8 juillet 2017, 07:58 » dans Excel - VBA
    3 Réponses
    127 Vues
    Dernier message par jmd
    8 juillet 2017, 08:35
  • Automatisation rechercheV
    par flocarmo » 18 avril 2017, 10:45 » dans Excel - VBA
    1 Réponses
    80 Vues
    Dernier message par DjiDji59430
    18 avril 2017, 11:00