Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 13/12/2006, 09h22   #1
Membre du Club
 
Développeur .NET
Inscription : juillet 2003
Messages : 185
Détails du profil
Informations personnelles :
Âge : 31

Informations professionnelles :
Activité : Développeur .NET

Informations forums :
Inscription : juillet 2003
Messages : 185
Points : 65
Points : 65
Envoyer un message via MSN à hirochirak
Par défaut [VBA Word] fonction qui marche aléatoirement (liaison avec excel)

Bonjour à tous !

Je suis en face d'un problème que je ne comprends pas !

En gros j'ai une macro qui va remplacer un libelle par une liaison vers un fichier Excel !

Voici exactement ce que ca fait :

Code :
1
2
3
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldLink, _
         Text:=test, _
        PreserveFormatting:=True
test contient la chaine suivante :

Code :
" Excel.Sheet.11 "R:\\WINDOWS\\lot275277DPE.xls"  "<nomfeuil>!L1C1:L49C11""
sachant que <nomfeuil> est ok j'ai vérifier

Je n'ai pas écrit cette fonction, je sais aussi qu'elle fonctionne sur certain poste mais pas sur d'autre
j'ai vérifier les version de word elles sont identiques.

Existe t'il une fonction plus générique qui permettrait de resoudre ce problème et d'éviter les problèmes entre les version ou je ne sais quoi qui fait planter la fonction dans certains cas.

Merci d'essayer de m'aider a resoudre ce problème et de mon cote je vais encore creuser un peu

@+

Hirochirak
__________________
-- Se lance dans l'asp.net 2.0 --

Made In Taïwan
hirochirak est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/12/2006, 10h15   #2
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Dans l'exemple que tu nous donnes, test n'est pas une chaîne. J'ai juste fait ça :
Citation:
Chaîne = " Excel.Sheet.11 "R:\\WINDOWS\\lot275277DPE.xls" "<nomfeuil>!L1C1:L49C11""
??? Doit y avoir quelque chose que je ne comprends pas si un jour ça a fonctionné
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/12/2006, 13h33   #3
Membre du Club
 
Développeur .NET
Inscription : juillet 2003
Messages : 185
Détails du profil
Informations personnelles :
Âge : 31

Informations professionnelles :
Activité : Développeur .NET

Informations forums :
Inscription : juillet 2003
Messages : 185
Points : 65
Points : 65
Envoyer un message via MSN à hirochirak
Alors j'ai éventuellement pu me tromper lors du copier coller !

voici exactement le code de la fonction :

Code :
1
2
3
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldLink, _
         Text:=" Excel.Sheet.8 " & MonTableau, _
        PreserveFormatting:=True
MonTableau contenant la valeur :

Code :
""R:\\WINDOWS\\lot275277DPE.xls"  "DPEQualigaz!L1C1:L49C11""
extrait via l'espion

ca me parait curieux comme syntaxe mais apres verif d'un collegue ca marche sur certaines stations (je devrais peut etre creuser aussi par la vu le bordel a tout les cas on utilise pas la meme macro)

@+

Hirochirak
__________________
-- Se lance dans l'asp.net 2.0 --

Made In Taïwan
hirochirak est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h45.


 
 
 
 
Partenaires

Hébergement Web