[VBA-A] Utilisation d'objet

**cciocc** · 16/06/2006, 13h05

Bonjour, j'ai un problème avec ce bout de code:

Code :

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

1
2
3
4
5
 
Dim mi As Object
Set mi = CreateObject("MapInfo.Application")
mi.Do "open table Z:\MapInfo\Excel\Cat6.TAB"
End Sub

J'ai comme erreur variable ou champ Z non définie.
J'ai essayé de mettre des guillemets, des quotes et d'échapper les guillemets avec \ mais rien ne marche. merci de m'aide s'il vous plait.

**linda15975** · 16/06/2006, 13h18

Tu travaille à partie de koi? Excel ou Mapinfo?
Pour moi, ton chemin doit être obligatoirement entre guillemets

**cciocc** · 16/06/2006, 13h25

Je travaille a partir d'access et j'aimerai ouvrir un document mapinfo.
j'ai essayé avec les guillemets et ca me dit: erreur de compilation, attendu: fin d'instruction

**linda15975** · 16/06/2006, 13h27

Essaye un truc comme ça:

Code :

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

mi.Do open table "Z:\MapInfo\Excel\Cat6.TAB"

**cciocc** · 16/06/2006, 13h32

j'obtiens la même erreur... (en gros les guillemets sont obligatoires apres mi.do)

**cciocc** · 16/06/2006, 13h40

ca me donne une erreur parcequ'il y a les : dedans...

**cciocc** · 16/06/2006, 14h41

mi.Do open table ("Z:\MapInfo\Excel\Cat6.TAB")

Ca ne marche pas non plus...
Pour l'aide, ca donne rien vu qu'en fait c'est une fonction de MapInfo.Application ...
pour échapper les " on utilise bien \ ?

**cciocc** · 19/06/2006, 15h57

Envoyé par ouskel'n'or

Maintenant, tu dis que MapInfo est une appli... alors la syntaxe ne peut en aucun cas être celle que tu essaies
Donne-nous le chemin de MapInfo ainsi que son nom complet avec l'extension et le Chemin de ton .tab
Là on aura quelques chances de "trouver" quelque chose de plus proche de la vérité

A+

alors pour mapinfo: C:\Program Files\MapInfo\Professional\MAPINFOW.EXE
et pour le fichier .tab: Z:\MapInfo\Excel\Cat6.TAB
Voila je n'ai pas trés bien compris ce que tu voulais en faire mais bon!..
merci en tout cas!

**cciocc** · 20/06/2006, 15h15

Envoyé par cciocc

C:\Program Files\MapInfo\Professional\MAPINFOW.EXE
Z:\MapInfo\Excel\Cat6.dbf

Comment faire pour ouvrir le ficher cat6.dbf avec le logiciel mapinfo? (click droit, ouvrir avec... mapinfo)
merci d'avance

**cciocc** · 21/06/2006, 09h24

J'ai trouvé comment ouvrir un fichier, mais ca l'ouvre dans le logiciel par défault :

Code :

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

1
2
3
Dim wshShell
Set wshShell = CreateObject("wscript.shell")
wshShell.Run "Z:\MapInfo\Excel\CAT6.DBF"

Voila si quelqu'un peut m'aider a le faire ouvrir dans un logiciel en particulier (en l'occurence ici MapInfo) merci d'avance.

**cciocc** · 21/06/2006, 10h35

Bonjour, en cherchant dans les anciens forums, j'ai trouvé ceci :

Code :

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

1
2
 
Call Shell("""" & "C:\Program Files\MapInfo\Professional\MAPINFOW.EXE" & """ """ & "Z:\MapInfo\Excel\Cat6.dbf" & """")

Le logiciel MapInfo s'ouvre, mais une erreur avec marqué :

Code :

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

1
2
 
Tentative d'ouverture du fichier Cat6.dbf

s'affiche et il ne se passe rien... si quelqu'un a une explication??
merci

**ouskel'n'or** · 21/06/2006, 13h44

Code :

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

Call Shell("C:\Program Files\MapInfo\Professional\MAPINFOW.EXE Z:\MapInfo\Excel\Cat6.dbf")

Je ne pense pas que la multiplicité des guillemets ajoute quelque chose

Essaie, avec cette syntaxe, d'ouvrir une image par paint, tu verras qu'elle fonctionne. Mets simplement un espace entre .EXE et le nom complet (avec chemin) du fichier à ouvrir.

Tu dis
A+