Dans notre quotidien professionnel, nous devons fréquemment réaliser des tâches répétitives avec des desseins plus ou moins complexes. Par exemple, dans le cadre d’un reporting mensuel, collecter les balances d’un groupe de sociétés, les ouvrir, les mettre en forme pour enfin les analyser. Prises isolément, ces tâches ne prennent pas beaucoup de temps mais répétées, elles sont non seulement chronophages mais également sans aucune valeur ajoutée. L’automatisation de ces tâches sera utilement mise en œuvre afin de focaliser le maximum de temps homme sur la phase d’analyse de données, de loin la plus valorisante.

Sub AfficheMatrice()
  Dim détenteur As Integer
  Dim détenu As Integer
 
  classeurAppli.Sheets.Add after:=Worksheets(Worksheets.Count)
  With classeurAppli.Sheets(classeurAppli.Sheets.Count)
    .Cells(1, 1).Value = "Matrice I-M"
    For détenteur = 1 To NbEntités
      For détenu = 1 To NbEntités
        If détenteur = 1 Then
          .Cells(1, détenu + 1).Value = Entités(détenu)
          .Cells(3 + NbEntités, détenu + 1).Value = Entités(détenu)
        End If
        If détenu = 1 Then
          .Cells(détenteur + 1, 1).Value = Entités(détenteur)
          .Cells(détenteur + NbEntités + 3, 1).Value = Entités(détenteur)
        End If
        .Cells(détenteur + 1, détenu + 1).Value = MatriceImoinsDétentions(détenteur, détenu)
      Next détenu
    Next détenteur
    .Cells(3 + NbEntités, 1).Value = "Matrice (I-M)^-1"
    .Range("B" & 4 + NbEntités & ":" & Chr(64 + NbEntités + 1) & NbEntités * 2 + 3).FormulaArray = "=minverse(B2:" & Chr(64 + NbEntités + 1) & NbEntités + 1 & ")"
    'FormulaArray équivaut à Ctrl+Maj+Entrée
    For détenu = 2 To NbEntités
      PourcentagesIntérêt(détenu) = Cells(4 + NbEntités, détenu + 1)
    Next détenu
  End With
End Sub

La phase de réflexion préalable revêt une importance primordiale. Elle consiste à modéliser le problème à résoudre, c’est-à-dire, à choisir la solution la mieux adaptée (éventuellement la plus simple à programmer et offrant le meilleur gain de temps) puis à décomposer la solution retenue en étapes élémentaires qui chacune feront l’objet d’une codification informatique.

Sur les projets les plus complexes, cette phase représente un investissement important mais loin de constituer une perte de temps, elle est la garantie du succès de la réalisation du projet. Une fois le programme terminé, les gains de temps obtenus sont largement bénéfiques.

Dans les métiers de la comptabilité, la mise en œuvre d’un programme passe généralement par le langage VBA en lien avec Excel et/ou ACCESS, car ce langage est simple à programmer et permet de traiter de conséquents volumes de données.

Il y a quelques années, je cherchais une solution pour calculer rapidement les pourcentages d’intérêt en présence de participations croisées dans le cadre de la validation des comptes consolidés de groupes de sociétés. Le calcul matriciel semblait la solution la plus adaptée. D’ailleurs, le Memento Comptes consolidés évoque la programmation en langage Basic du calcul matriciel, en se gardant toutefois bien d’en fournir une solution opérationnelle. J’avais déjà mis en œuvre cette solution pour résoudre des systèmes d’équations il y a bien longtemps. La modélisation du problème m’a permis de résoudre rapidement la phase de programmation de cette tâche.

Extrait du Memento Comptes consolidés (Editions Francis Lefebvre) :

The following two tabs change content below.

• Bio
• Derniers articles

Benoît RIVIERE

Après seize années passées en cabinet d’expertise-comptable et de commissariat aux comptes (où j’ai exercé comme expert-comptable et chef de mission audit), j’ai pris le poste de directeur comptable d’un groupe de distribution automobile en novembre 2014. Au cours de ma carrière, j’ai acquis une expérience significative en audit et en exploitation des systèmes d’information (analyse de données, automatisation des tâches, programmation informatique) au service de la production des comptes annuels et consolidés. C’est cette expérience personnelle et ma passion pour l’informatique que je partage sur ce blog. Mon CV / Réalisations personnelles et projets informatiques / Ma collection / Me contacter

Derniers articles parBenoît RIVIERE (voir tous)

• Analyse de données & FEC provisoire : créer des numéros d’écriture avec un script Python - samedi 27 avril 2024
• Excel : collecter des données juridiques sur les entreprises avec l’API SIRENE – 1ère partie : base SIREN (entreprises) - lundi 15 avril 2024
• Obtenir les données financières de sociétés au format Excel - mardi 2 avril 2024
• Robotic Process Automation (RPA) et Python : piloter des applications web - dimanche 24 mars 2024
• Initiation à la programmation en Basic : nouveau compilateur FreeBASIC - lundi 18 mars 2024