j'aimerais pouvoir piloter XL depusi le VBA de R=E9flection=20
pour windows; ce vba ressemble pas mal =E0 celui xl
le d=E9but de code est le suivant:
le but est d'aller dans excel (il pourrait =EAtre d=E9j=E0=20
ouvert) et dans xl lancer une macro qui fait un=20
copier/coller de XL2000 vers reflection.
Mon prob est que si j'ouvre bien excel ici, je ne sais pas=20
ouvrir le fichier demand=E9.
Sub testXL()
Dim RetVal, Chemin
Chemin =3D "c:\Classement individuel Div. 2"
RetVal =3D Shell("C:\Program Files\Microsoft=20
Office\Office\excel.exe /c:\test vers reflection.xls ", 1)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
papou
Bonjour Enlève le "/" : RetVal = Shell("C:Program FilesMicrosoft OfficeOffice11excel.exe c:test vers reflection.xls", 1) Cordialement Pascal
"patrick" a écrit dans le message de news:66a401c4756d$40aea950$ Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection pour windows; ce vba ressemble pas mal à celui xl le début de code est le suivant: le but est d'aller dans excel (il pourrait être déjà ouvert) et dans xl lancer une macro qui fait un copier/coller de XL2000 vers reflection. Mon prob est que si j'ouvre bien excel ici, je ne sais pas ouvrir le fichier demandé. Sub testXL() Dim RetVal, Chemin Chemin = "c:Classement individuel Div. 2" RetVal = Shell("C:Program FilesMicrosoft OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
AppActivate RetVal ' Active Microsoft Excel.
End Sub
Suite au prochain épisode
Bonjour
Enlève le "/" :
RetVal = Shell("C:Program FilesMicrosoft OfficeOffice11excel.exe c:test
vers reflection.xls", 1)
Cordialement
Pascal
"patrick" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:66a401c4756d$40aea950$a401280a@phx.gbl...
Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection
pour windows; ce vba ressemble pas mal à celui xl
le début de code est le suivant:
le but est d'aller dans excel (il pourrait être déjà
ouvert) et dans xl lancer une macro qui fait un
copier/coller de XL2000 vers reflection.
Mon prob est que si j'ouvre bien excel ici, je ne sais pas
ouvrir le fichier demandé.
Sub testXL()
Dim RetVal, Chemin
Chemin = "c:Classement individuel Div. 2"
RetVal = Shell("C:Program FilesMicrosoft
OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
Bonjour Enlève le "/" : RetVal = Shell("C:Program FilesMicrosoft OfficeOffice11excel.exe c:test vers reflection.xls", 1) Cordialement Pascal
"patrick" a écrit dans le message de news:66a401c4756d$40aea950$ Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection pour windows; ce vba ressemble pas mal à celui xl le début de code est le suivant: le but est d'aller dans excel (il pourrait être déjà ouvert) et dans xl lancer une macro qui fait un copier/coller de XL2000 vers reflection. Mon prob est que si j'ouvre bien excel ici, je ne sais pas ouvrir le fichier demandé. Sub testXL() Dim RetVal, Chemin Chemin = "c:Classement individuel Div. 2" RetVal = Shell("C:Program FilesMicrosoft OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
AppActivate RetVal ' Active Microsoft Excel.
End Sub
Suite au prochain épisode
...Patrick
OK Pascal j'essaie demain et si maintenant je veux retourner dans reflection, j'y arrive pas .... ;-(((
je dois aller dans un fichier xl, faire un copier d'une cellule, retourner dans reflection , coller l'info, faire 25 tabulations(ça je sais faire) et retourner dans xl sans le réouvrir bien sur mais en continuant une boucle sur une série de cellules
Merci
"papou" <cestpasbonprobin@çanonpluscg44.fr> a écrit dans le message de news:%
"patrick" a écrit dans le message de news:66a401c4756d$40aea950$ Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection pour windows; ce vba ressemble pas mal à celui xl le début de code est le suivant: le but est d'aller dans excel (il pourrait être déjà ouvert) et dans xl lancer une macro qui fait un copier/coller de XL2000 vers reflection. Mon prob est que si j'ouvre bien excel ici, je ne sais pas ouvrir le fichier demandé. Sub testXL() Dim RetVal, Chemin Chemin = "c:Classement individuel Div. 2" RetVal = Shell("C:Program FilesMicrosoft OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
AppActivate RetVal ' Active Microsoft Excel.
End Sub
Suite au prochain épisode
OK Pascal j'essaie demain
et si maintenant je veux retourner dans reflection, j'y arrive pas ....
;-(((
je dois aller dans un fichier xl, faire un copier d'une cellule, retourner
dans reflection , coller l'info, faire 25 tabulations(ça je sais faire) et
retourner dans xl sans le réouvrir bien sur mais en continuant une boucle
sur une série de cellules
Merci
"papou" <cestpasbonprobin@çanonpluscg44.fr> a écrit dans le message de
news:%23gFYGJXdEHA.1356@TK2MSFTNGP09.phx.gbl...
"patrick" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:66a401c4756d$40aea950$a401280a@phx.gbl...
Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection
pour windows; ce vba ressemble pas mal à celui xl
le début de code est le suivant:
le but est d'aller dans excel (il pourrait être déjà
ouvert) et dans xl lancer une macro qui fait un
copier/coller de XL2000 vers reflection.
Mon prob est que si j'ouvre bien excel ici, je ne sais pas
ouvrir le fichier demandé.
Sub testXL()
Dim RetVal, Chemin
Chemin = "c:Classement individuel Div. 2"
RetVal = Shell("C:Program FilesMicrosoft
OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
OK Pascal j'essaie demain et si maintenant je veux retourner dans reflection, j'y arrive pas .... ;-(((
je dois aller dans un fichier xl, faire un copier d'une cellule, retourner dans reflection , coller l'info, faire 25 tabulations(ça je sais faire) et retourner dans xl sans le réouvrir bien sur mais en continuant une boucle sur une série de cellules
Merci
"papou" <cestpasbonprobin@çanonpluscg44.fr> a écrit dans le message de news:%
"patrick" a écrit dans le message de news:66a401c4756d$40aea950$ Bonjour,
j'aimerais pouvoir piloter XL depusi le VBA de Réflection pour windows; ce vba ressemble pas mal à celui xl le début de code est le suivant: le but est d'aller dans excel (il pourrait être déjà ouvert) et dans xl lancer une macro qui fait un copier/coller de XL2000 vers reflection. Mon prob est que si j'ouvre bien excel ici, je ne sais pas ouvrir le fichier demandé. Sub testXL() Dim RetVal, Chemin Chemin = "c:Classement individuel Div. 2" RetVal = Shell("C:Program FilesMicrosoft OfficeOfficeexcel.exe /c:test vers reflection.xls ", 1)
