Contenu récent par carlos

Job75, Macro encore plus rapide (0,16 au lieu de 0,23) . Le feuilles sont bien importées sauf la première feuille qui est concatenée en A1 et A2. Mince! Bizarre.

Bonjour JOB75, Cest génial. Et en plus très pédagogoue car tes 3 propositions fonctionnent tres bien avec tes fichiers CSV. Avec mes fichiers, seule la proposition Power Query fonctionne parfaitement. Ce qui me suffit amplement . Pour info : Ouverture classique des fichiers CSV, importe bien...

Bonjour cousinHub, Tu as raison mais malheuresement ce n'est pas possible car ce sont des données très sensibles. JBonne soirée

Re, Ta proposition fonctionne avec les fichier source que que je t'ai donné mais ... J'avais simplifié les 2 lignes de la PJ pour que ce soit plus facile mais en faite ca ne marche pas avec les données réélles que j'ai mise dans le fichier joint. Je suis désolé. Merci Voici le code que j'ai mis...

Voici la macro reprise par Job75 : Dim wbDest As Workbook, wbSource As Workbook Dim wsDest As Worksheet, wsSource As Worksheet Dim myFile As String, myPath As String Application.ScreenUpdating = False Application.DisplayAlerts = False Set wbDest = ThisWorkbook Set wsDest = wbDest.Worksheets(1)...

Bonjour Job75, Merci pour ta proposition mais le resultatobtenu n'est pas tout à fait celui souhaité. J'ai mis en piece jointe (onglet : Apres import) le resultat obtenu apres import avec ta macro. J'ai aussi collé les valeurs du CSV dans le premier onglet (CSV)car je n'ai pas réussi à le...

Bonjour Chris, Pourtant j'arrive à ouvrir le fichier en CSV manuellement puis je peux faire deplacer ou copier vers mon classeur de destination. Je voulais juste automatiser ceci car j'ai 72 fichiers à importer. J'ai essayé avec powerQuery mais il m'importe le fichier en le concatenant quand...

Bonjour, Cette macro ci dessous, me permet d'importer le contenu de plusieurs fichiers ".csv". Ces fichiers ont plusieurs colonne et lignes avec des valeurs bien séparées. Ce quie je ne comprends pas c'est qu'il me concatène toutes les colonnes entre elles. Est il possible de faire une copie des...

Encore une fois bravo car je l'ai intégré dans mon fichier et ca marche impeccable.

Bonjour Gégé, fanfan job, Merci pour vos réponses. Je retiens la proposition de Job75 qui répond parfaitement à ma demande. Bonne journée

Bonjour, J'aimerais connaitre le nombre de fois ou la lettre "A" apparait une fois par ligne . Idem ou elle apparait 2 fois . Etc.. Voir PJ Bonne journée

L'mage est bien enregistrée sous D mais à son ouverture j'ai ce message de windows:

La macro bloque sur .Export "D:\monImage.jpg", "JPG"

Bonjour, J'ai cette erreur qui apparait avec ce code et je ne vois pas pourquoi: Feuil11.Range("A16:J42").CopyPicture Feuil11.Paste With Feuil11.ChartObjects.Add(0, 0, Cells(16, 1).Left, Cells(42, 10).Top).Chart .Paste .Export "D:\monImage.jpg", "JPG" End With Gerer.Image1.Picture =...

Bonjour Sylvanu et Mapomme, Merci beaucoup pour vos réponses Sylvanu et Mapomme. Excellente journée