Activation automatique des données

[AnneSophie]

Bonjour,

J'ai un fichier excel sur lequel des données sont extraites d'une base de donnée (access) sous forme de tableau croisé dynamique ou seulement de donnée. Comment faire pour que dès l'ouverture de mon fichier ces données s'actualisent automatiquement?

Merci Beaucoup

Bonne journée

Anne-Sophie

 

[James007]

Re : Activation automatique des données

Bonjour,

Tu as simplement besoin d'un petit code VBA qui lance automatiquement ta requête qui rafraichit tes données ...

N'hésites pas à partager ton code VBA ...

A +

 

[AnneSophie]

Re : Activation automatique des données

salut,
j eme doutais bien qu'il fallait une macro mais le problème c'est que je ne sais pas la faire .
Merci quand même
a+

 

[James007]

Re : Activation automatique des données

Re,

Dans le module ThisWorkbook ( Alt + F11 ) tu recopies ce code :

Private Sub Workbook_Open()
    Application.Run ("lenomdetamacro")
End Sub

A +

 

[AnneSophie]

Re : Activation automatique des données

mais la macro a été faite sur access. Ca peut marcher quand meme?

 

[James007]

Re : Activation automatique des données

Re,

Difficile de deviner ta configuration ... ... avec ma boule de crystal ... qui depuis longtemps ... est en panne ... !!!

Pour piloter Access depuis Excel ... deux points importants :

1. Avoir correctement référencé, pour ton code VBA Excel, la librairie : Microsoft Access 11.0 Object Library ...ou plus

2. Modifier le code

Private Sub Workbook_Open()
    Dim strDatabasePath As String
    Dim appAccess As Access.Application
    strDatabasePath = "C:\My Documents\LeNomduFichierAccess.mdb"
    Set appAccess = New Access.Application
    With appAccess
        Application.DisplayAlerts = False
        .OpenCurrentDatabase strDatabasePath
        .DoCmd.RunMacro "LenomdelamacroAccess"
        .Quit
    End With
    Set appAccess = Nothing
End Sub

A +