Discussion :

[xtof79]

Bonjour,
Ma base de données utilise plusieurs boutons faisant appel à des codes VBA, la plupart très simples du type OpenForm ou OpenTable. Depuis peu, j'ai un message d'erreur systématique sur la plupart d'entre eux ("Microsoft Visual Basic pour Applications - fichier introuvable") qui m'envoie en mode débogage.
Le problème semble remonter à la modification d'un état, sur lequel j'ai tenté d'ajouter, puis supprimé un bouton de commande. Après moult manipulations hasardeuses (qui m'ont entre autre vérolé mes sauvegardes récentes ), j'ai depuis 3 objets "Report_...", vides et/ou "faisant référence à un état inexistant", et impossibles à supprimer. Si quelqu'un voit de quoi il en retourne...?
Merci de votre aide !

[titi95]

Bonjour

Quel était le rôle du bouton supprimé ?

[xtof79]

Il s'agissait de passer d'un état à une autre version du même état . Je ne suis pas allé très loin quoi qu'il en soit.

[xtof79]

je voulais dire, une version plus exhaustive

[titi95]

???
je ne vois pas ce que tu veux dire...
et je n'ai pas d'idée...

Vraiment à tout hasard, regarde tout de même si en Propriétés/Filtre de l'état, ou du formulaire qui l'appelle, il n'existe pas un filtre non souhaité.

[xtof79]

Pas de filtre qui traine... L'appel de procédure "On click" dans l'état a par ailleurs bien été supprimé. L'état s'appuie sur une requête sans code VBA associé. D'ailleurs l'état lui même s'ouvre correctement
Ci joint une copie d'écran du projet VBA, avec l'explorateur d'objet ouvert. Le premier objet "report" fait référence à l'état existant et fonctionnel, le 2e et le 3e sont vides.

[titi95]

1) est-ce que chacun des 3 états s'ouvre normalement en direct (en cliquant dans le volet de recherche, à gauche)
2) comment sont-ils appelés ? OpenReport?
3) fais nous un copier-coller des codes d'ouverture (entre les balises # de ton message).

[xtof79]

En l’occurrence seul le 1er état existe encore. Les 2 autres sont pour l'un une sorte de doublon fantôme apparu lors de mes tentatives précédentes, pour l'autre un état supprimé.
Ce 1er état est appelé de cette manière :

Code :

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

1
2
3
4
5
6
7
8
Private Sub Commande73_Click()
Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "E417_Fact-analyse"
    'apercu.Visible = True
 
    DoCmd.OpenReport stDocName, acViewReport, , stLinkCriteria
End Sub

Chose intéressante, j'ai un messages d'erreur de cette manière, mais pas en l'ouvrant directement. Après vérification, la plupart des boutons (pas tous !?) génère cette même erreur.

[titi95]

La clause Where du OpenReport n'a aucune valeur ?

[xtof79]

Non, c'est la requête en amont qui réclame une information (dans critères : "[N° de facture ?]") --> inputbox automatique standard

[titi95]

Déjà tu peux simplifier le code comme ceci

Code :

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

1
2
3
Private Sub Commande73_Click()
    DoCmd.OpenReport "E417_Fact-analyse", acViewReport
End Sub

Donc :
- ton état a pour source une requête,
- cette requête a un critère qui est la réponse à l'InputBox.

Comment récupères-tu, dans la requête, la valeur donnée à l'InputBox ?
Fait un copier-coller du SQL.

[xtof79]

non, pas de SQL ici (enfin pas explicitement) puisque dans ma requête je procède comme ceci :

(OK merci pour la simplification, tu confirme mon intuition )

[titi95]

[N° de facture ?] est le nom de la variable qui reçois l'InputBox ?
Donne le code concernant l'InputBox.

Remarque générale : évite d'employer des espaces et des caractères spéciaux dans les noms de champs, variables, contrôles, objets, fichiers... même si ça passe dans certains cas.
Utilise plutôt des noms condensés, parlants et facilement lisibles. Exemples : Nfacture, t_Factures, r_Commandes, CodePostal...

[xtof79]

Entendu. Pas de code (apparent) pour l'inputbox, puisque Access la génère automatiquement. J'ai quand même l'intuition que le problème vient plutôt d'un code corrompu par la suppression "mal digérée" d'un état et/ou d'un contrôle, non ? Malgré leurs approximations, ma requête et mon état fonctionnent bien en eux-mêmes...

[titi95]

Ok

suppression "mal digérée" d'un état et/ou d'un contrôle

Lance une Compilation dans Débogage (Menu)
Fait des recherches avec les noms des contrôles ou objets supprimés sur l'ensemble du projet (fenêtre Recherche)

[xtof79]

Le simple lancement de la compilation me fait renvoie à la même erreur "fichier introuvable". La recherche du contrôle "Boîte706_Click" (jugé problématique - cf. précédente copie d'écran) par exemple, sur procédure ou module en cours est infructueuse (normal) ; par contre on retombe sur "fichier introuvable" quand la recherche se fait sur l'ensemble du projet. Or ce n'est pas le cas avec une recherche d'un terme commun ("click") À CONDITION QUE L'ON SE POSITIONNE DANS UN DES OBJETS RÉPUTÉ VALIDE comme "Form_xxx". En revanche, la recherche de "click" sur projet en cours, depuis "Report_E417..." génère une erreur "fichier introuvable"

[titi95]

la compilation me fait renvoie à la même erreur "fichier introuvable"

oui, mais sur quelle ligne de code ??? (en surbrillance)

Il faut tout passer en revue avec la compilation et régler chaque pb. A relancer à chaque fois.
Pour la recherche, il faut la faire avec chaque nom de contrôle ou objet que tu as supprimé, et sur l'ensemble du projet (cocher Projet en cours)

[xtof79]

C'est bien le pb (désolé si j'ai pas été clair) : au lancement (Débogage --> compiler Database 2), j'ai le message d'erreur !
Et pour les recherches, relis-moi, j'ai bien distingué les résultats selon si elles se font sur procédure, module, ou ensemble du projet.
Au final, le message d'erreur apparait quand :
- recherche d'un terme spécifique à "Report_E417", depuis "Report_E417", sur procédure / module / ensemble du projet
- recherche d'un terme spécifique à "Report_E417", depuis un objet réputé valide ("Form_xxx"), sur ensemble du projet
- recherche d'un terme générique, depuis "Report_E417", sur procédure / module / ensemble du projet

[titi95]

j'ai le message d'erreur !

SUR QUELLE LIGNE DE CODE ???

Pour la recherche, tu te mets sur Projet en cours !!! (cela est suffisant)
Ensuite tu indiques le nom d'un contrôle ou objet que tu as supprimé. Tu parlais d'un bouton par exemple.
Le but est de rechercher dans le code d'éventuelles utilisations de contrôles ou objets supprimés. (même si Access en signale de lui-même)

[xtof79]

Bon, visiblement ce que j'avais de mieux à faire face à ce qui ressemble fort à un problème de bibliothèque (https://support.microsoft.com/fr-fr/...ccess-database), était de créer une nouvelle base et d'importer tous les éléments de l'ancienne : ça a l'air de fonctionner, mes objets fantôme ont disparu...
Merci titi95 d'avoir passé du temps sur la résolution de mon problème !