GNT sans publicité, site mobile, fonctionnalitées exclusives...

Incompatiblité de type

Le
NetChris
Bonsoir, (une question pour les Cadors)

Impossible de comprendre pourquoi cette erreur d' incompatibilité de
type sur la fonction suivante:

Public Sub Word_Ouvrir_document(Nom_Document As Variant, Visu As
Variant)
Word_Creation_Lien_OLE
With Word_Application.Documents.Open( _
FileName:=Nom_Document, _
ConfirmConversions:= True, _
ReadOnly:úlse, _
AddToRecentFiles:úlse, _
PasswordDocument:="", _
PasswordTemplate:="", _
Revert:úlse, _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto, _
Visible:=Visu)
End With


J'envoie bien un champ texte exemple : c:\lettre\modele.doc et false ou
true pour visu !


Voici l'aide d'Acces concernant cette fonction d'ouverture d'un fichier WORD
:
'expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles,
PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument,
WritePasswordTemplate, Format, Encoding, Visible)
'FileName Argument de type Variant obligatoire. Nom du document (les
chemins d'accès sont acceptés).
'ConfirmConversions Argument de type Variant facultatif. Affectez-lui la
valeur True pour afficher la boîte de dialogue Convertir si le fichier n'est
pas au format Microsoft Word.
'ReadOnly Argument de type Variant facultatif. Affectez-lui la valeur True
pour ouvrir le document en lecture seule.
'AddToRecentFiles Argument de type Variant facultatif. Affectez-lui la
valeur True pour ajouter le nom de fichier dans la liste des derniers
fichiers utilisés. Cette liste est située au bas du menu Fichier.
'PasswordDocument Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du document.
'PasswordTemplate Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du modèle.
'Revert Argument de type Variant facultatif. Contrôle quelles actions
doivent être exécutées si la valeur de l'argument Name est le nom de fichier
d'un document ouvert. Affectez la valeur True à l'argument Revert pour
ignorer les modifications apportées au document ouvert depuis son dernier
enregistrement et rouvrir le fichier. Affectez-lui la valeur False pour
activer le document ouvert.
'WritePasswordDocument Argument de type Variant facultatif. Mot de passe
nécessaire à l'enregistrement des modifications apportées au document.
'WritePasswordTemplate Argument de type Variant facultatif. Mot de passe
nécessaire à l'enregistrement des modifications apportées au modèle.
'Format Argument de type Variant facultatif. Convertisseur de fichier à
utiliser pour ouvrir le document. Il peut s'agir de l'une des constantes
WdOpenFormat suivantes : wdOpenFormatAllWord, wdOpenFormatAuto,
wdOpenFormatDocument, wdOpenFormatEncodedText, wdOpenFormatRTF,
wdOpenFormatTemplate, wdOpenFormatText wdOpenFormatUnicodeText ou
wdOpenFormatWebPages. wdOpenFormatAuto est la valeur par défaut.
'Pour spécifier un format de fichier externe, appliquez la propriété
OpenFormat à un objet FileConverter pour savoir quelle valeur doit être
affectée à cet argument.
'Encoding Argument de type Variant facultatif. Codage du document (page de
code ou jeu de caractères) qui doit être utilisé par Microsoft Word lors de
l'affichage du document enregistré. Il peut s'agir de n'importe quelle
constante MsoEncoding valide. Pour obtenir la liste des constantes
MsoEncoding valides, consultez l'Explorateur d'objets dans l'éditeur de
Visual Basic. La valeur par défaut est la page de code système. Type de
données Long en lecture-écriture.
'Visible Argument de type Variant facultatif. Cet argument a pour valeur
True si le document est ouvert dans une fenêtre visible. La valeur par
défaut est True.
End Sub

Merci pour votre aide

Chris
Lire les 5 réponses

Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Raymond
Le #4238381
Bonsoir.

Dans mon site, à automation word, j'ai marqué:
Encoding : ne pas utiliser
Visible : ne pas utiliser
je ne sais plus pourquoi mais je devais avoir une bonne raison.
essaie sans ces options, sait-on jamais.

commence par mettre toutes tes options en remarques et remet-les une à une
jusqu'à ce que ça bloque, je ne vois que ce moyen.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"NetChris" news:bj2kn2$1f5$
Bonsoir, (une question pour les Cadors)

Impossible de comprendre pourquoi cette erreur d' incompatibilité de
type sur la fonction suivante:

Public Sub Word_Ouvrir_document(Nom_Document As Variant, Visu As
Variant)
Word_Creation_Lien_OLE
With Word_Application.Documents.Open( _
FileName:=Nom_Document, _
ConfirmConversions:= True, _
ReadOnly:úlse, _
AddToRecentFiles:úlse, _
PasswordDocument:="", _
PasswordTemplate:="", _
Revert:úlse, _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto, _
Visible:=Visu)
End With


J'envoie bien un champ texte exemple : c:lettremodele.doc et false ou
true pour visu !




NetChris
Le #4238351
L'erreur apparaît sur Nom_Document !
or il est égale à c:lettremodele.doc

Le ire, c'est que j'ai fait un programme de test simple avec un champ
Nom_Document et un bouton pour lancer la procédure, cela ne marche pas !
J'ai écrit un programme plus complexe, qui fait appel à cette même
procédure, et cela fonctionne !!
Je n'y comprend rien.


"Raymond" news:
Bonsoir.

Dans mon site, à automation word, j'ai marqué:
Encoding : ne pas utiliser
Visible : ne pas utiliser
je ne sais plus pourquoi mais je devais avoir une bonne raison.
essaie sans ces options, sait-on jamais.

commence par mettre toutes tes options en remarques et remet-les une à une
jusqu'à ce que ça bloque, je ne vois que ce moyen.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"NetChris" news:bj2kn2$1f5$
Bonsoir, (une question pour les Cadors)

Impossible de comprendre pourquoi cette erreur d' incompatibilité de
type sur la fonction suivante:

Public Sub Word_Ouvrir_document(Nom_Document As Variant, Visu As
Variant)
Word_Creation_Lien_OLE
With Word_Application.Documents.Open( _
FileName:=Nom_Document, _
ConfirmConversions:= True, _
ReadOnly:úlse, _
AddToRecentFiles:úlse, _
PasswordDocument:="", _
PasswordTemplate:="", _
Revert:úlse, _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto, _
Visible:=Visu)
End With


J'envoie bien un champ texte exemple : c:lettremodele.doc et false
ou


true pour visu !








Raymond
Le #4238301
essaie simplement avec ça :

With Word_Application
.Visible = True
.Documents.Open ("c:lettremodele.doc")
End With
ajouter les set nothing derrière

si ça marche avec ça , il y a un truc dans ton instruction.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"NetChris" news:bj2n5q$367$
L'erreur apparaît sur Nom_Document !
or il est égale à c:lettremodele.doc

Le ire, c'est que j'ai fait un programme de test simple avec un champ
Nom_Document et un bouton pour lancer la procédure, cela ne marche pas !
J'ai écrit un programme plus complexe, qui fait appel à cette même
procédure, et cela fonctionne !!
Je n'y comprend rien.




Daniel Carollo
Le #4238011
Bonjour Christian!

J'ai verifie votre procedure d'ouverture du document, elle marche. Le
probleme doit se situer au niveau de la procedure Word_Creation_Lien_OLE.

Essayez de la replacer avec une procedure de test qui fait juste le minimum,
du genre:
Dim Word_Application As Word.Application
Set Word_Application = GetObject(, "Word.Application")

Si ca marche, faites nous voir le code de votre procedure
Word_Creation_Lien_OLE.

A bientot.

--
Daniel :-)

Computing Technologies International - www.computing-tech.com - We
provide solutions...

"NetChris" news:bj2kn2$1f5$
Bonsoir, (une question pour les Cadors)

Impossible de comprendre pourquoi cette erreur d' incompatibilité de
type sur la fonction suivante:

Public Sub Word_Ouvrir_document(Nom_Document As Variant, Visu As
Variant)
Word_Creation_Lien_OLE
With Word_Application.Documents.Open( _
FileName:=Nom_Document, _
ConfirmConversions:= True, _
ReadOnly:úlse, _
AddToRecentFiles:úlse, _
PasswordDocument:="", _
PasswordTemplate:="", _
Revert:úlse, _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto, _
Visible:=Visu)
End With


J'envoie bien un champ texte exemple : c:lettremodele.doc et false ou
true pour visu !


Voici l'aide d'Acces concernant cette fonction d'ouverture d'un fichier
WORD

:
'expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles,
PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument,
WritePasswordTemplate, Format, Encoding, Visible)
'FileName Argument de type Variant obligatoire. Nom du document (les
chemins d'accès sont acceptés).
'ConfirmConversions Argument de type Variant facultatif. Affectez-lui la
valeur True pour afficher la boîte de dialogue Convertir si le fichier
n'est

pas au format Microsoft Word.
'ReadOnly Argument de type Variant facultatif. Affectez-lui la valeur
True

pour ouvrir le document en lecture seule.
'AddToRecentFiles Argument de type Variant facultatif. Affectez-lui la
valeur True pour ajouter le nom de fichier dans la liste des derniers
fichiers utilisés. Cette liste est située au bas du menu Fichier.
'PasswordDocument Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du document.
'PasswordTemplate Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du modèle.
'Revert Argument de type Variant facultatif. Contrôle quelles actions
doivent être exécutées si la valeur de l'argument Name est le nom de
fichier

d'un document ouvert. Affectez la valeur True à l'argument Revert pour
ignorer les modifications apportées au document ouvert depuis son dernier
enregistrement et rouvrir le fichier. Affectez-lui la valeur False pour
activer le document ouvert.
'WritePasswordDocument Argument de type Variant facultatif. Mot de passe
nécessaire à l'enregistrement des modifications apportées au document.
'WritePasswordTemplate Argument de type Variant facultatif. Mot de passe
nécessaire à l'enregistrement des modifications apportées au modèle.
'Format Argument de type Variant facultatif. Convertisseur de fichier à
utiliser pour ouvrir le document. Il peut s'agir de l'une des constantes
WdOpenFormat suivantes : wdOpenFormatAllWord, wdOpenFormatAuto,
wdOpenFormatDocument, wdOpenFormatEncodedText, wdOpenFormatRTF,
wdOpenFormatTemplate, wdOpenFormatText wdOpenFormatUnicodeText ou
wdOpenFormatWebPages. wdOpenFormatAuto est la valeur par défaut.
'Pour spécifier un format de fichier externe, appliquez la propriété
OpenFormat à un objet FileConverter pour savoir quelle valeur doit être
affectée à cet argument.
'Encoding Argument de type Variant facultatif. Codage du document (page
de

code ou jeu de caractères) qui doit être utilisé par Microsoft Word lors
de

l'affichage du document enregistré. Il peut s'agir de n'importe quelle
constante MsoEncoding valide. Pour obtenir la liste des constantes
MsoEncoding valides, consultez l'Explorateur d'objets dans l'éditeur de
Visual Basic. La valeur par défaut est la page de code système. Type de
données Long en lecture-écriture.
'Visible Argument de type Variant facultatif. Cet argument a pour valeur
True si le document est ouvert dans une fenêtre visible. La valeur par
défaut est True.
End Sub

Merci pour votre aide

Chris





NetChris
Le #4232491
Merci Daniel,

En ne rien touchant, cela refonctionne !!! Je ne comprend pas, Enfin !

"Daniel Carollo" message de news:O%
Bonjour Christian!

J'ai verifie votre procedure d'ouverture du document, elle marche. Le
probleme doit se situer au niveau de la procedure Word_Creation_Lien_OLE.

Essayez de la replacer avec une procedure de test qui fait juste le
minimum,

du genre:
Dim Word_Application As Word.Application
Set Word_Application = GetObject(, "Word.Application")

Si ca marche, faites nous voir le code de votre procedure
Word_Creation_Lien_OLE.

A bientot.

--
Daniel :-)

Computing Technologies International - www.computing-tech.com - We
provide solutions...

"NetChris" news:bj2kn2$1f5$
Bonsoir, (une question pour les Cadors)

Impossible de comprendre pourquoi cette erreur d' incompatibilité de
type sur la fonction suivante:

Public Sub Word_Ouvrir_document(Nom_Document As Variant, Visu As
Variant)
Word_Creation_Lien_OLE
With Word_Application.Documents.Open( _
FileName:=Nom_Document, _
ConfirmConversions:= True, _
ReadOnly:úlse, _
AddToRecentFiles:úlse, _
PasswordDocument:="", _
PasswordTemplate:="", _
Revert:úlse, _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto, _
Visible:=Visu)
End With


J'envoie bien un champ texte exemple : c:lettremodele.doc et false
ou


true pour visu !


Voici l'aide d'Acces concernant cette fonction d'ouverture d'un fichier
WORD

:
'expression.Open(FileName, ConfirmConversions, ReadOnly,
AddToRecentFiles,


PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument,
WritePasswordTemplate, Format, Encoding, Visible)
'FileName Argument de type Variant obligatoire. Nom du document (les
chemins d'accès sont acceptés).
'ConfirmConversions Argument de type Variant facultatif. Affectez-lui
la


valeur True pour afficher la boîte de dialogue Convertir si le fichier
n'est

pas au format Microsoft Word.
'ReadOnly Argument de type Variant facultatif. Affectez-lui la valeur
True

pour ouvrir le document en lecture seule.
'AddToRecentFiles Argument de type Variant facultatif. Affectez-lui la
valeur True pour ajouter le nom de fichier dans la liste des derniers
fichiers utilisés. Cette liste est située au bas du menu Fichier.
'PasswordDocument Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du document.
'PasswordTemplate Argument de type Variant facultatif. Mot de passe
nécessaire à l'ouverture du modèle.
'Revert Argument de type Variant facultatif. Contrôle quelles actions
doivent être exécutées si la valeur de l'argument Name est le nom de
fichier

d'un document ouvert. Affectez la valeur True à l'argument Revert pour
ignorer les modifications apportées au document ouvert depuis son
dernier


enregistrement et rouvrir le fichier. Affectez-lui la valeur False pour
activer le document ouvert.
'WritePasswordDocument Argument de type Variant facultatif. Mot de
passe


nécessaire à l'enregistrement des modifications apportées au document.
'WritePasswordTemplate Argument de type Variant facultatif. Mot de
passe


nécessaire à l'enregistrement des modifications apportées au modèle.
'Format Argument de type Variant facultatif. Convertisseur de fichier
à


utiliser pour ouvrir le document. Il peut s'agir de l'une des constantes
WdOpenFormat suivantes : wdOpenFormatAllWord, wdOpenFormatAuto,
wdOpenFormatDocument, wdOpenFormatEncodedText, wdOpenFormatRTF,
wdOpenFormatTemplate, wdOpenFormatText wdOpenFormatUnicodeText ou
wdOpenFormatWebPages. wdOpenFormatAuto est la valeur par défaut.
'Pour spécifier un format de fichier externe, appliquez la propriété
OpenFormat à un objet FileConverter pour savoir quelle valeur doit être
affectée à cet argument.
'Encoding Argument de type Variant facultatif. Codage du document
(page


de
code ou jeu de caractères) qui doit être utilisé par Microsoft Word lors
de

l'affichage du document enregistré. Il peut s'agir de n'importe quelle
constante MsoEncoding valide. Pour obtenir la liste des constantes
MsoEncoding valides, consultez l'Explorateur d'objets dans l'éditeur de
Visual Basic. La valeur par défaut est la page de code système. Type de
données Long en lecture-écriture.
'Visible Argument de type Variant facultatif. Cet argument a pour
valeur


True si le document est ouvert dans une fenêtre visible. La valeur par
défaut est True.
End Sub

Merci pour votre aide

Chris









Publicité
Suivre les réponses
Poster une réponse
Anonyme