Erreur dans script d'import de fichier csv

Y compris Power BI, Power Query et toute autre question en lien avec Excel
o
osacleux
Nouveau venu
Nouveau venu
Messages : 2
Inscrit le : 14 mars 2019
Version d'Excel : 2016 FR Mac (16.23)

Message par osacleux » 14 mars 2019, 14:54

Bonjour,

J'ai un script qui permet d'importer un fichier au format csv et de le nettoyer afin de le mettre dans un certain format.
Ce script a d'abord été fait sur PC en Excel 2007, puis adapté pour fonction sur PC en Excel 2016. Jusque là tout va bien.
Maintenant on me demande à pouvoir l'utiliser depuis un Mac, version d'Excel 16.23.
Quand je l'exécute j'ai une erreur 1004 et ça fait 4 jours que je cherche et que je n'arrive pas à la résoudre.
Vous trouverez le début du script ci-dessous.

'
' Import du fichier issu de Mailchimp
'
fileToOpen = Application.GetOpenFilename()
If fileToOpen <> False Then
Workbooks.OpenText Filename:=fileToOpen
End If

With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & fileToOpen, Destination:=Range("A1"))
.Name = "members_export"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
' .PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
' .RefreshPeriod = 0
.TextFilePromptOnRefresh = False
' .TextFilePlatform = -535
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = True
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
' .TextFileTrailingMinusNumbers = True
.Refresh BackgroundQuery:=False
End With

Pouvez-vous m'aider ?

Merci d'avance,
Olivier.
Avatar du membre
BrunoM45
Membre impliqué
Membre impliqué
Messages : 2'911
Appréciations reçues : 87
Inscrit le : 29 octobre 2011
Version d'Excel : 2016 FR, O365 FR
Contact :

Message par BrunoM45 » 14 mars 2019, 17:31

Bonjour,

Normal je pense, les options Mac ne doivent pas être les mêmes et là je ne peux pas t'aider :P
[F1] est une touche qui appelle l'aide : Essayez, c'est assez performant et on trouve plein de choses

Il n'y a ni bon ni mauvais usage de la liberté d'expression, il n'en existe qu'un usage insuffisant.
o
osacleux
Nouveau venu
Nouveau venu
Messages : 2
Inscrit le : 14 mars 2019
Version d'Excel : 2016 FR Mac (16.23)

Message par osacleux » 15 mars 2019, 11:22

C'est sur la méthode Refresh que le problème se produit.
Avatar du membre
BrunoM45
Membre impliqué
Membre impliqué
Messages : 2'911
Appréciations reçues : 87
Inscrit le : 29 octobre 2011
Version d'Excel : 2016 FR, O365 FR
Contact :

Message par BrunoM45 » 15 mars 2019, 12:04

Re,

C'est que dans ta requête quelque chose n'est pas compris :wink:
[F1] est une touche qui appelle l'aide : Essayez, c'est assez performant et on trouve plein de choses

Il n'y a ni bon ni mauvais usage de la liberté d'expression, il n'en existe qu'un usage insuffisant.
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message