Dépannage

Bonsoir,

Je suis nouveau sur le forum et un piètre utilisateur d'excel.

J'ai passé tout le week-end à saisir la comptabilité d'une petite association

sur un fichier excel téléchargé sur le lien suivant:

#

çà me semblait être un truc sérieux, pas trop lourd et facile à utiliser.

Le bilan devait s'établir automatiquement à partir des écritures du journal mais

malheureusement ce n'est pas le cas.

Je n'aimerais pas avoir perdu tout mon week-end et buter sur quelque chose qui est sans doute

simplissime mais que je ne connais pas.

L'aide n'est pas très explicite et j'ai envoyé des messages par leur formulaire de contact sans succès.

Alors si quelqu'un avait la gentillesse d'y jeter un oeil et me dire quelle est l'astuce je serai ravi.

Merci

Bonsoir,

sur la feuille "Balance des comptes"

dans le ruban sélectionnez "Outils de tableau croisé dynamique " (ou bien "Option")

Cliquez sur "Actualisé" (il est presque en dessous d'option un peu à gauche)

La feuille va se mettre à jour en fonction des données entrées sur la feuille "Journal"

A la suite de ceci, votre bilan se mettra à jour...

Pour éviter ce désagrément de mise à jour, vous pouvez ajouter un peu de "macro" :

[Alt]+[F11]

dans le module "ThisWorkBook"

collez ceci :

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Sheets("Balance des comptes").PivotTables("Tableau croisé dynamique1").PivotCache.Refresh
End Sub

qui a pour action de mettre à jour le tableau croisé dynamique (TCD) à chaque activation de feuille, comme cela il sera à jour continuellement...

@ bientôt

LouReeD

Bonjour,

Merci d'avoir pris du temps pour analyser mon problème.

J'ai essayé, mais la solution proposée ne semble pas fonctionner.

J'ai enregistré le code dans Thisworkbook et je n'ai pas eu de changement

alors j'ai activé "débuggage" et la seconde ligne s'est mise en surbrillance.

A un moment j'ai eu un message disant quelque chose comme Agent???.dll n'existe plus

dans cette version ( je n'ai pas bien noté et après je n'ai pas réussi à le faire apparaître).

Je continue à chercher de mon côté, mais s'il vous vient une idée, n'hésitez pas à me le

faire savoir.

merci encore

cordialement

yannick

Bonsoir,

avant de vous lancez dans le code VBA avez vous essayé la méthode "manuelle" :

sur la feuille "Balance des comptes"

dans le ruban sélectionnez "Outils de tableau croisé dynamique " (ou bien "Option")

Cliquez sur "Actualisé" (il est presque en dessous d'option un peu à gauche)

La feuille va se mettre à jour en fonction des données entrées sur la feuille "Journal"

A la suite de ceci, votre bilan se mettra à jour...

Que s'est-il passé à ce moment là ?

Merci

@ bientôt

LouReeD

Bonjour,

Tu as plusieurs solutions pour actualiser tes TCDs en automatique.

Je ne sais pas (plus) si Excel 2002 comporte l'évènement Workbook_SheetActivate!?

Cdlt.

'Module standard (ALT F8 pour exécuter la procédure)
Public Sub Refresh_Pivot_tables()
Dim ws As Worksheet
Dim pt As PivotTable

    Application.ScreenUpdating = False
    For Each ws In ActiveWorkbook.Worksheets
        For Each pt In ws.PivotTables
            'Excel 97-2003
            pt.RefreshTable
            'Excel 2007+
            'pt.PivotCache.Refresh
        Next pt
    Next ws

End Sub
'Module de feuille (à placer dans le module de la feuille comportant un TCD)
Private Sub Worksheet_Activate()

    Me.PivotTables(1).RefreshTable

End Sub
'Module ThisWorkbook
Private Sub Workbook_SheetActivate(ByVal Sh As Object)

    With Sh
        If .PivotTables.Count > 0 Then .PivotTables(1).RefreshTable
    End With

End Sub