Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Macro pour Import CA Compta

Mansouri

XLDnaute Nouveau
Bonjour,
Je dois importer régulièrement dans ma comptabilité un dossier qui sort de notre Gescom.
Pour ce, je dois réaliser un certains nombre de transformations sur excel qui me prennent beaucoup de temps et qui sont source d'ereures.
J'aimerais savoir s'il était possible de transformer mon fichier de base en fichier souhaitait et ce de façon automatisé.


La difficulté supplémentaire vient du fait qu'en Nouvelle-Calédonie nos ventes subissent plusieurs taxes (similaire à une TVA) mais à des taux différents selon la nature de la prestation vendue.
Il est donc important d'isoler :
- Dans des comptes de produit différents les bases soumises à ces taux.
- Dans des comptes de taxes différents les taxes qui y sont relatives.

Par exemple :

Pour une vente TTC à 15 792 Frs.

Crédit :
Compte client : 15 792 Frs (Vente + Taxe globale)

Débit

# 70700025 : CA soumis à taux de 0.25% ( 10 500 frs )
# 70700035 : CA soumis à taux de 0.35% (4 500 Frs)
# 44571035 : Taxe à 0.35% (16 Frs)
# 44571025 : Taxe à 0.25% : (26Frs)
# 44571 : Taxe général sur les services : 5% (750Frs)




J'ai tenté de travailler sur un fichier trouvé sur votre site qui pourrait ressembler à ce dont j'ai besoin. Mais je n'ai pas les compétences en excel suffisante.
https://www.excel-downloads.com/threads/macro-pour-import-compta.163709/

Vous trouverez en pièce jointe :
En onglet 1 : Un extrait du document extrait de ma Gescom
En onglet 2 : Le fichier final que je me dois d'obtenir pour mon importation.

Je vous remercie grandement de l'aide qu'il vous sera possible de m'apporter.

Cordialement.



Mélissa
 

Pièces jointes

  • Import pour aide.xlsx
    26.7 KB · Affichages: 61

jp14

XLDnaute Barbatruc
Bonjour

Ci joint le fichier avec quelque modifications
Message lors de la fermeture de l'userform avec le bouton quitter.
La colonne S contient la date du transfert.

A tester

JP
 

Pièces jointes

  • encours.zip
    74.7 KB · Affichages: 41

Mansouri

XLDnaute Nouveau
Bonjour,

Je ne peux plus choisir de fichier :

Private Function ChDossier()
Dim objShell, objFolder, chemin, SecuriteSlash

Set objShell = CreateObject("Shell.Application")
Set objFolder = _
objShell.BrowseForFolder(&H0&, "Choisisser un répertoire", &H1&)
On Error Resume Next
chemin = objFolder.ParentFolder.ParseName(objFolder.Title).Path & ""
If objFolder.Title = "Bureau" Then chemin = "C:\"
If objFolder.Title = "" Then chemin = ""
SecuriteSlash = InStr(objFolder.Title, ":")
If SecuriteSlash > 0 Then
chemin = Mid(objFolder.Title, SecuriteSlash - 1, 2) & ""
End If
TextBox1 = chemin

End Function
 

jp14

XLDnaute Barbatruc
Bonjour

Ci joint le fichier avec la feuille "final" qui contient les données des fichiers Gescom, Gescom2, Gescom3.

Bonnes fêtes

JP14
 

Pièces jointes

  • Copie de Copie de Userform liste fichier MM2.xls
    245 KB · Affichages: 50

Mansouri

XLDnaute Nouveau
Bonjour
Je reviens vers vous car après utilisation de la matrice je rencontre de nouveaux des problèmes.
J'arrive à paramétrer mes numéros de compte pour les adapter aux différentes comptas.
Cependant pour l'une d'entre elle mon problème est le suivant :
Une partie du HT n'est soumise à aucune taxe et mes écritures sont donc déséquilibrées

SINON CAS OU VENTES EGALEMENT SOUMISES A TGC
9000N°FRS - Colonne Z
70610025 - Colonne P
70610035 - Colonne R
70710050 - Colonne U
707000- Partie soumise a aucune taxe soit quand colonne HT > colonne P ou R ou U
44571025- Colonne Q
44571035 - Colonne S
44571050 - Colonne V
44571000 - Colonne L

Pouvez vous m'expliquer comment paramétrer cela ?

Merci d'avance.
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…