Discussion :

[xycoco]

Bonsoir à tous,

J'ai une feuille excel insérée dans un formulaire access d'une base de données appelée A. A l'intérieur de celle-ci j'ai des applis qui marchent très bien et qui me permettent de copier/coller des infos de ma base de données A vers excel.

Mais il ya un hic : les applis d'excel ne marchent plus dès que j'ai une autre base de données access d'ouverte (appelée B): excel confond les formulaires de A et de B.

Ce code est intégrer à un bouton de contrôle installé dans ma feuille excel et va me chercher le nom du formulaire ouvert :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Ajouter_Click()
On Error GoTo non_ouvert
    Dim LeFichier As String
        LeFichier = Forms(frm_Bouteille).Name
    Frm_BouteilleOuvert = True
    AjouterFrm_Bouteille
    Exit Sub
non_ouvert: If (Err.Number = 2450) Then
    Frm_BouteilleOuvert = False
    Err.Clear
    AjouterFrm_BouteilleNouveau
    End If
End Sub

Si j'ai une autre base d'ouverte en même temps, il me renvoit le nom d'un formulaire de B et du coup mon code ne fonctionne plus. Ce que je ne comprend pas c'est cette feuille excel est intégrée au formulaire de A.

Comment faire?

Merci de votre aide

[keita]

Pardon, mais pas du tout facile de retrouver dans tes explications.
@+