XL 2021 Excel CSV vers XSL et ne pas écraser les données

[jojoles]

Bonjour,

J'ai une baie d'acquisition qui mesures plusieurs paramètres, et j'exporte mensuellement les données (en CSV je n'ai pas le choix) pour les rapatrier dans un Excel qui me permet de faire du suivi de tendance. J'aimerai automatiser le tout via une macro excel. J'ai essayé de faire avec la fonction .rec des macros ou même avec chatGPT mais impossible.

Ce que j'aimerai avoir :
Une macro qui :
- Ouvre un explorateur de fichier, je sélectionne le fichier .csv que je souhaite
- Copie les données du .csv, à la suite des anciennes (les données sont datées avec une ligne par 30min, possible de faire une reconnaissance intelligente et de ne pas avoir des lignes en double ou de m'avertir si il manque une donnée ?) dans une autre feuille appelé "val physique"

Merci d'avance pour l'aide

Si vous n'avez déjà qu'un bout de macro je suis preneur

Cordialement,

 

[sylvanu]

Bonjour Jojoles, et bienvenu sur XLD,

Si vous n'avez déjà qu'un bout de macro je suis preneur

Si vous aviez un petit fichier csv comme exemple , je suis preneur. 🙂

 

[jojoles]

Bonjour Jojoles, et bienvenu sur XLD,

Si vous aviez un petit fichier csv comme exemple , je suis preneur. 🙂

Merci beaucoup,
impossible d'envoyer un fichier CSV sur le forum, sorry...

 

[Oneida]

Bonjour a tous,

Impossible: trop gros, donnees confidentielles ou ?

 

[sylvanu]

Re,
Encapsuler votre csv dans un zip. Ce format est accepte.

 

[jojoles]

Bonjour à tous, merci à vous pour vos réponses.

val_phy est le fichier ZIP "brut" que je récupère dans ma baie, pas moyen de changer quoi que ce soit

j'aimerai que dans le xslx ci dessous, via le bouton dans la feuille 1, un explorateur de fichier s'ouvre, on sélectionne notre bon CSV, et les données sont copier dans le même ordre.
Attention, j'ai du rajouter une colonne dans "suivi mensuel", il y a donc un décalage de 1 colonne.

J'ai du mal avec le fait de passer de CSV à XLSX via une macro. Je n'arrive pas a faire fonctionner la macro.
Si possible, j'aimerai également qu'une erreur s'affiche si jamais il manque une journée ou autre, que la macro ne colle pas a la suite sans réfléchir, mais qu'il y est une cohérence dans les dates.

Merci d'avance

 

[jojoles]

Bonjour a tous,

Impossible: trop gros, donnees confidentielles ou ?

Bonjour, je ne savais pas qu'un zip fonctionnait. Merci

 

[sylvanu]

Bonsoir,
Un essai en PJ.
A noter que le séparateur décimal dans votre fichier est le "," et chez moi ".". J'ai donc fait le remplacement.
Si cela crée un problème sur votre PC, supprimez ces lignes :

For C = 2 To UBound(Tablo, 2)
    For L = 2 To UBound(Tablo)
        On Error Resume Next
        Tablo(L, C) = Replace(Tablo(L, C), ",", ".")
    Next L
Next C

 

[Cousinhub]

Bonsoir,
Un essai en PJ.
A noter que le séparateur décimal dans votre fichier est le "," et chez moi ".". J'ai donc fait le remplacement.
Si cela crée un problème sur votre PC, supprimez ces lignes :

For C = 2 To UBound(Tablo, 2)
    For L = 2 To UBound(Tablo)
        On Error Resume Next
        Tablo(L, C) = Replace(Tablo(L, C), ",", ".")
    Next L
Next C

Hello,
Attention,
à ces dates, les valeurs sont non conformes dans la colonne SAR1 :

Pour info...
Bonne fin d'apm

 

[sylvanu]

Bonsoir Cousinhub,
Dans le fichier csv ouvert avec Notepad, on a bien ces valeurs :

Cependant une V2 car j'ai oublié deux points :
1- Coller à la suite et non au début.
2- Repérer les écarts > 30min.
J'ai mis une MFC en colonne A.
A ce sujet dans le fichier il détecte une erreur au 23/04/2025 à 11:00.