Transformer des données en écritures comptables [Résolu/Fermé]

Signaler
Messages postés
49
Date d'inscription
vendredi 17 janvier 2014
Statut
Membre
Dernière intervention
11 août 2015
-
Messages postés
13059
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
23 juillet 2021
-
Bonjour,

Tous les mois je reçois un fichier récapitulatif de la part d'une cliente qui me recense toutes les dépenses effectuées par jour (cf. onglet "données").

J'aimerais, dans l'onglet "écritures", réaliser une macro qui me permette de transformer ces données en écritures comptables selon le format proposé dans ce même onglet.

Etant donné que je n'ai pas de grosse connaissance en VBA, j'aimerais que vous m'aidiez à démarrer pour réaliser cette transformation.

Je vous mets ici le fichier : https://www.cjoint.com/?3AxwRq8Gf0B

Merci par avance de votre aide.

Cordialement,

Guillaume.

2 réponses

Messages postés
13059
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
23 juillet 2021
2 219
Bonsoir Guillaume

Un début de macro selon ton fichier
https://www.cjoint.com/?0Aya7Jun4u4

La macro transfère les dates, les n°de compte et leur libellé puis le montant
Seul le code analytique ne peut pas être renseigné avec les seules données existantes

Cdlmnt
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
49
Date d'inscription
vendredi 17 janvier 2014
Statut
Membre
Dernière intervention
11 août 2015

Bonjour via55,

C'est magique VBA !
Merci beaucoup pour ce code.

Effectivement, les colonnes "journal" et "code analytique" ne sont pas remplissables avec les données. Je m'occupe de modifier le code en fonction.

Je vais essayer de comprendre ce code.
Merci encore.

Cordialement,

Guillaume
Messages postés
13059
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
23 juillet 2021
2 219
Re,

En principe j'ai mis des explication en remarques dans le code
N'hésites pas à me demander s'il y a encore quelque chose d'obscur

Bonne suite

Cdlmnt