problem version excel ?

[anna]

Bonjour à toutes et à tous
dans le cadre de mon travail j'ai fais une macro qui ouvre un fichier, fait des traitement dessus ....puis copie les resultats dans un autre fichier.Le problem:Sur nos postes (la socite) Excel2000Francais ca marche tres bien mais quand je l envoie chez le client qui a Excel 2000 mais anglais ca ne marche pas(la macro n'arrive meme pas a recuperer le chemin du fichier selectionne et l'ouvrir.
alors est ce que c un problem de version ou quoi.
merci bcq de votre aide
voila le bout de ma macro :


Sub Report_Drawing()
'
' Filtre_Islast Macro
' Macro enregistrée le 15/09/2005 par lhordoir
'
Dim objShell, objFolder, Repertoire, SecuriteSlash, FlagChoix&, Msg$, choix, chemin
Dim nom As String

FlagChoix = &H4000&: Msg = 'Choisissez un fichier :'
Set objShell = CreateObject('Shell.Application')
Set objFolder = objShell.BrowseForFolder(&H0&, Msg, FlagChoix, Racine)
On Error Resume Next
chemin = objFolder.ParentFolder.ParseName(objFolder.Title).Path & ''
' A la compilation chemin est vide donc il n arrive pas a l'ouvrir
nom = objFolder.Title
SecuriteSlash = InStr(objFolder.Title, ':')

If SecuriteSlash > 0 Then
chemin = Mid(objFolder.Title, SecuriteSlash - 1, 2) & ''
End If

ActiveWindow.LargeScroll ToRight:=2
Selection.AutoFilter Field:=49, Criteria1:='TRUE'
ActiveWindow.LargeScroll ToRight:=-3
Range('A:AZ').Select
Selection.Copy
........... suite des traitement

 

[:(]

re bonjour à tous
je sais que vous n avez pas que mes problem a resoudre mais je n 'est pas eu une seule reponse j espere que vous allez m aider rapidement car le client veut me faire bosse le WE a cause de ca.
pitie d'une jeune maman qui veut passer un WE en famille
Merci bcq et desole pour le derangement