Discussion :

[lagirelu]

Bonjour,

j'ai un petit souci de mémoire quand j'exécute ce code depuis une feuille EXCEL:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
            Set appAccess = CreateObject("Access.Application")
            appAccess.OpenCurrentDatabase "A:\AM\AM.accdb", False
 
            If Cells(Target.Row, Target.Column).Font.Italic Then
                appAccess.Run "mettreAJourRYMSong", Cells(Target.Row, 2).Value, Cells(Target.Row, 14).Value, Target.Value
            Else
                appAccess.Run "mettreAJourRYMAlbum", Cells(Target.Row, 2).Value, Cells(Target.Row, 14).Value, Target.Value
            End If
            Set appAccess = Nothing

Une instance de MSACCESS.EXE reste dans le gestionnaire de tâches et comme j'appelle tt le temps ce bout de code lors d'un changement de valeur dans une cellule EXCEL, j'ai ensuite de multiples instances de MSACCESS.EXE et donc évidemment ensuite pb de mémoire.
j'ai déjà regardé sur plusieurs forums, mais aucun ne résout mon souci.
j'ai déjà rajouté
appAccess.CloseCurrentDatabase
appAccess.Application.Quit

juste avant "Set appAccess = Nothing" , mais rien n'y fait.
à part killer le process à chaque fois, je suis sans solution.

Merci pour vos retours.

[micniv]

Une page intéressante sur les subtilités des fonctions GetObject() et CreateObject()
https://mskb.pkisolutions.com/kb/210111

[lagirelu]

Une page intéressante sur les subtilités des fonctions GetObject() et CreateObject()
https://mskb.pkisolutions.com/kb/210111

Merci pb résolu avec GetObject