Pb avec getopenfilename

Re : Pb avec getopenfilename

Bonjour ,

Je ne comprends pas ... Chez moi, ça marche nickel ...

Re : Pb avec getopenfilename

Bonjour Coriolan

Mince c'est vrai que cela fonctionne sur le site ! Et bien je suppose que cela vient de mon intranet ? En fait la macro de pierrejean bugue a Workbooks.Open (LeFichier). Mais vraiment je ne vois pas ce qui coince !

Re : Pb avec getopenfilename

Bonsoir




Et en essayant

Sub test2()
Dim nodeb As Long
Dim nofin As Long
Dim moi As String
moi = ActiveWorkbook.Name
Dim LeFichier As String
Dim LeNom$

Cliquez pour agrandir...

Re : Pb avec getopenfilename

Bonsoir Staple1600

Comme je suis rentré chez moi, je testerai ta solution demain au boulôt sur l'intranet

Bonne soirée

Philippe

Re : Pb avec getopenfilename

Bonjour à tous

Pour Staple1600: J'ai testé avec la déclaration de variable, mais sans changement. J'ai tjs une erreur type 1004. En fait j'apporte une préçision par rapport à mon premier post. Contrairement à ce que je disais, il y a 1 différence notable entre un fichier excel mis sur le site et le mien sur intranet.

Mon classeur se comporte comme n'importe quel classeur excel mais au lieu du menu excel, j'ai le menu internet explorer. Donc le workbook open est peut-être incompatible ds ce cas là ?

Philippe

Je me rends compte que ma demande est un peu confuse et je pense que je vais arrêter là le fil. Je vais tâcher de revoir ma copie et mettre un nouveau post plus explicite