Discussion :

[zoumzoum59]

Bonsoir a tous,

je cherche a incorporer des données d'un fichier csv et de les incorporer dans un classeur préformaté et de placer les donnes dans des cellules définis.
seulement je suis un peu perdu, j'ai déjà exporter des données mais jamais l'inverse et du coup je galère, et je ne trouve pas les bonnes infos sur le net.

Si quelqu'un peux me mettre sur la piste.
Merci d'avance

[mfoxy]

Bonjour,

Peut-être pourrais-tu déjà commencer par utiliser l'enregistreur de macro pour la partie importe de csv.

Ensuite nous montrer le rendu que tu espères.

Bat

[zoumzoum59]

je viens d'utiliser l'enregistreur de macro qui me donne le code suivant, je sais c'est absurde de vous présenter le code , mais ça prouve que je lai fait.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Sub Macro2()'
' Macro2 Macro
'
 
 
'
    With ActiveSheet.QueryTables.Add(Connection:="TEXT;C:\Temp\myFile.csv", _
        Destination:=Range("$A$1"))
        .CommandType = 0
        .Name = "myFile"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 850
        .TextFileStartRow = 2
        .TextFileParseType = xlDelimited
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = True
        .TextFileSpaceDelimiter = False
        .TextFileColumnDataTypes = Array(1, 1, 1, 1)
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
    End With
End Sub

Ce code m'importe le csv e ligne 1 et colonne 1,moi ce que j'ai besoins c'est de sélectionner la ligne de départ, je pense que c'est faisable, mais le plus compliqué c'est que mes données de colonnes doivent être dans des colonnes particulières, comme dans l'exemple ci dessous.



Je ne sais pas si c'est possible ou pas,on ne peut pas importer et insérer des ligne et colonne après, on peut peut être le faire dans une autre feuille ou classeur puis copier les cellules en fonction de cela.
Je réfléchis en même temps que je tape texte, donc je vais avancer de mon coté, mais si vous avez des idées je suis preneur