[AC-2007] Type non defini

[Donnit]

Bonjour tout le monde,

je viens a vous car j´ai besoin d´aide.

Je suis en stage dans une association en Allemagne. C´est une association qui orgnise des camps de vacances.Je suis ici pour entre autres enregistrer les reservations et participer a des camps.
Aussi ayant etudier l´informatique (reseaux), des qu´un probleme survient je suis attendus comme le Messie.
Generalement je m´en sort mais ce matin c´est tres difficile.
En effet un probleme touche Access, mais de 1 c´est en allemand et de 2 je ne suis pas programmeur.

Pour vous explique grossierement, apres avoir enreigtrer un reseveration ou une inscription, on clique sur un bouton qui remplis un fichier texte avec les bonnes infos. Alors depuis une semaine ce ne fonctionnais plus sur certains PC, mais sur le miens oui, et comme c´est moi qui m´occupe de cette partie, ce ne derangeait pas trop. Deja je ne comprennais pas pourquoi car tout le monde utilise la meme BD. Mais maintenant ce ne fonctionne plus sur aucune machines. Voici le mesage d´erreur :



En francais :
Erreur de compilation
type défini par l'utilisateur non défini

Voici le code ou Access nous emmene apres avoir clique sur un des boutons :

Private Sub Befehl60_Click()
Dim Anrede As String
Dim dateiname As String
Dim Sachbearbeiter As String
Dim rs As Recordset
Dim myWordApp As Word.Application
Dim doc As Word.Document
Dim rs1 As Recordset
Dim rs2 As Recordset
' Reservierungsbestätigung
Set rs1 = CurrentDb.OpenRecordset("Select * from que_kunde_teilnehmer where TeilnehmerID = " & Me.TeilnehmerID)
Set rs2 = CurrentDb.OpenRecordset("Select * from Fahrt where FahrtID = " & Me.txtFahrtenID)

Cette ligne la etant surlignee :
Dim doc As Word.Document

Avez vous des idees?

Merci.

Edit : "Microsoft DAO 3.6 Object library" est bien coche.
Tout fonctionnait quand je suis partit mercredi midi, c´est dans l´apres midi que ca s´est mis a deconner.

[jpcheck]

Salut,

la reference a Microsoft Word est-elle bien cochee ?

[Donnit]

Salut,

J´etait justement en train d´editer le message.

Oui la case est bien cochee.

Edit : En lisant bien ton message, je ne suis pas sure, parle t´on de la meme chose?
Sinon ou dois cocher cette reference?

Voici une image pour aider :

[jpcheck]

En fait ce qui m'etonne c'est que ca planterait au niveau de Word.Application directement et non pas Word.Document

Oui oui, je parle bien des references standard

[Donnit]

Je dois t´avouer que je ne peux pas te dire.

Sinon je ne comprend pas comment ca peut arriver du jour au landemain, sans que personne n´ai touche au code.

[jpcheck]

Compacte la base, tu es peut-etre arrive a une taille limite

[Donnit]

Comment faire cela?


Sinon du progres, ou pas.


Apres avoir coche Microsoft Word.

Si je clique sur le bouton lecture, ce message apparrait :



Puis si je clique sur "Ausführen", j´ai cela :


Je ne sais pas ce qu´est le fichier Flo.doc et en plus de cela, un document s´imprime. C´est un document qu´on envoie avec un catalogue. Et dans l´en tete a la place de l´adresse c´est ecrit Flo et Teststr. 12
Sachant que Strasse en allemand c´est rue.

Alors j´ai demande une trad du dernier message, et il parle de quelque chose de plein, et d´un doc protege. L´erreur pouvant venir de l´un ou l´autre.
Et Flo, c´est apprerement le mec qui a cree le programme.

[jpcheck]

OK,

je penche pour un fichier temporaire cree a la volee.

Il serait imprime puis supprime. Le cas etant ici de la suppression alors que le fichier est encore ouvert.

Est-il possible de voir le code VBA actuel (si aucune information confidentielle n'est visible) ?

[Donnit]

Ca marche!!!!!!!!

Alors je sais pas ce qui s´est passe mais ca refonctionne.

En fait je travaille sur un copie en local, et j´ai voulu teste les modif sur le serveur, ca donnais rien.
J´ai rouvert la version local ca fonctionnait, j´ai rouvert le version serveur et ca fonctionne aussi.
Je dirait que ca venais de la reference a Word, pas coche, mais pourquoi ca fonctionnait avant??

Aussi la BD n´a jamais fonctionner correctement depuis mon arrive.

Oups, j´ai parle trop vite, ca fonctionne mais il demande cela au demarrage :



Impossible de joindre...
enfin je crois que c´est ce que ca dit.

Si je fais Ja, apres ca a l´air de fonctionner plus ou moins correctement.

Voici les different message d´erreur avant de pouvoir utilie le programme :



Puis :



Et enfin :



Et apres avoir cliquer sur Beeden, je peux enfin utiliser le programme.

[Donnit]

Non pas d´info confidentiel.

Dis moi ou aller et je te montre, si ca peut ameliorer les choses.

[Donnit]

Alors quelques infos :

Sur mon PC, apres avoir valide plein de message d´erreur ca fonctionne, sur un autre PC, un seul petit message a valider et ca fonctionne et sur 2 autres, que neni.
Sachant que tout le monde clique sur la meme icone sur le serveur et utilise la meme BD.

Et pendant ce temps toutes les resevations et inscrptions qui s´accumulent...

[jpcheck]

Les messages d'Office au sujet des risques sont generes de base lors de l'ouverture des bases access. Ils ne s'affichent plus seulement que la securite des macros a ete reduite

La validation des message d'erreur doit te mettre la puce a l'oreille qu'il faut deboguer le code, non

[Donnit]

Beh je vois bien que c´est pas normal, mais je suis pas capable de reparer cela seul.

Alors sur un des PC ou ca ne fonctionne pas, si on essaye la version ou jai travailelr en local ca fonctionne.

Je deviens fou...