Contenu récent par re4

  1. R

    XL 2019 Erreur avec Formula

    Bonjour Merci, bien sûr ,-) ta solution fonctionne, je vais m'en inspirer pour la suite Bonne journée
  2. R

    XL 2019 Erreur avec Formula

    Bonjour Je n'y arrive pas avec range(cells( Range(Cells(32, 15)).Formula "=IFERROR(VLOOKUP(range(cells(3,6),cells(26,9)),2,False),""0"")" Merci
  3. R

    XL 2019 Erreur avec Formula

    Merci beaucoup Efgé
  4. R

    XL 2019 Erreur avec Formula

    Bonjour, Cette formule fonctionne dans une cellule =SIERREUR(RECHERCHEV(L32;$F$3:$I$22;2;FAUX);"0")) Mais pas celle-ci en VBA, ou fais-je l'erreur ? je ne veux pas utiliser Formula R1C1 Range("N32").Formula = "=IFERROR(VLOOKUP(L32,$F$3:$I$26,2,FALSE),""0""))" Autre exemple qui donne comme...
  5. R

    XL 2019 Erreur avec CurDir

    Exact ,-) Ca fonctionne, ça simplifie... Sub csv() Sheets("Mise_en_forme").Visible = True Worksheets("Mise_en_forme").Select Fichier = Application.GetOpenFilename("Fichier CSV (*.csv), *.csv") If Fichier <> False Then LireCSV Fichier End If End Sub
  6. R

    XL 2019 Erreur avec CurDir

    Marcel32 Oui, en fait dans une précédente macro je vais chercher des infos dans un fichier excel ( il y a plusieurs répertoires avec un xls et un csv) et avec la macro de notre sujet je vais chercher des données dans un fichier csv qui est dans le même dossier que le précédent, comme vous l'avez...
  7. R

    XL 2019 Erreur avec CurDir

  8. R

    XL 2019 Erreur avec CurDir

    Bonjour, Merci pour votre retour, erreur de compilation ici GestionFiS
  9. R

    XL 2019 Erreur avec CurDir

    Bonjour Merci pour votre retour. Erreur de complation ici GestionFiS
  10. R

    XL 2019 Erreur avec CurDir

    Voici le code complet et qui fonctionne bien chez moi Option Explicit Sub csv_Import() Sheets("Mise_en_forme").Visible = True Worksheets("Mise_en_forme").Select Dim Fichier As Variant Dim MyPath MyPath = CurDir 'ThisWorkbook.Path Fichier = Application.GetOpenFilename("Fichier CSV...
  11. R

    XL 2019 Erreur avec CurDir

    Bonjour, Merci beaucoup pour toutes ces infos, comme je le disais, je ne suis pas un expert, ma petite modification du code original fonctionne mais à vous lire ça veut dire qu'il vaut mieux utiliser votre procédure Bernard_XLD ? Mais ou insérer l’équivalent de Lire CSV Fichier ? Bonne journée
  12. R

    XL 2019 Erreur avec CurDir

  13. R

    XL 2019 Erreur avec CurDir

    Merci pour vos réponses qui m'ont mis sur la piste, le code ci-dessous semble fonctionner A la seconde ouverture, je vais bien chercher le 2éme fichier dans le même répertoire. Bonne soirée
  14. R

    XL 2019 Erreur avec CurDir

    Bonjour, N'étant pas un expert ;-( je bloque sur ce petit code, j'ai remplacé ChDir par CurDir pour rester dans le même répertoire à l'ouverture d'une autre fenêtre mais il y a une erreur ici If Fichier <> False Then Pouvez-vous m'aider c'est visiblement pas la bonne procédure Merci ' ChDir...
  15. R

    XL 2019 Lire propriété (vidéo) à partir d'une boite de dialogue ?

    Bonjour, exact, j'ai testé pour ceux que j'utilise le plus souvent avec *.jpg - *.mov - *.mts - *.mp4 Avec du vba il n'est peut-être pas possible d'obtenir les mêmes infos que nous donne par exemple MediaInfo. Pour terminer peut-être, J'ai une préférence pour le code du post #27, qui me...