Transfert de données Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
f
feever
Membre habitué
Membre habitué
Messages : 145
Appréciation reçue : 1
Inscrit le : 1 janvier 2012
Version d'Excel : 2016FR

Message par feever » 24 août 2015, 19:15

Devis.xlsm
3M.xlsm
Bonsoir,

J'ai un problème avec 2 fichiers qui m'ont été adressés par mail à partir d'un PC portable.
Ces 2 fichiers sont liés par une macro qui transfère des données du second fichier vers le premier. Tout fonctionne très bien sur le PC qui a envoyé le mail, mais aucun résultat sur mon propre PC (message d'erreur Microsoft Visual Basic).

Je vous joins les 2 fichiers et je vous indique la procédure :
dans le fichier 3M, onglet3MDom, taper un nombre pour la Qté dans la colonne F, puis cliquer sur "EXTRAIRE".

Normalement, toutes les informations de la ligne concernée devraient se retrouver dans le fichier Devis, onglet Devis, à la suite des lignes déjà renseignées.

J'espère que mes propos sont assez explicites et que quelqu'un pourra m'éclairer sur ce dysfonctionnement.

Merci d'avance;

Feever
Avatar du membre
SoumZoum
Membre fidèle
Membre fidèle
Messages : 349
Inscrit le : 18 novembre 2014
Version d'Excel : Excel 2010 FR

Message par SoumZoum » 24 août 2015, 22:57

Hello,

Alors ça, si c'est pas une tripotée de modules :mrgreen:
Plus sérieusement, l'erreur ne se produit pas chez moi, pourrais-tu me dire quelle est la ligne incriminée lorsque l'erreur apparaît ?
Cordialement,

Toto l'asticot :D
f
feever
Membre habitué
Membre habitué
Messages : 145
Appréciation reçue : 1
Inscrit le : 1 janvier 2012
Version d'Excel : 2016FR

Message par feever » 25 août 2015, 08:15

Bonjour,

Tout d'abord, merci pour ta réponse. Je ne comprends pas pourquoi le fichier fonctionne sur d'autres PC, mais pas sur le mien!
Sur mon ordi, l'erreur s'affiche quelque soit la ligne incriminée!

Voici le message qui se présente :
Erreur d'exécution'9':
L'indice n'appartient pas à la sélection

En cliquant sur débogage du message, ça me renvoie à la première ligne de la macro Sub Transfert :
Cells(i, 3).Copy Workbooks("Devis").Sheets(1).Range("B5000").End(xlUp)(2) et ce, quelque soit la ligne choisie dans 3MDom.

Si tu trouves une explication, je t'en remercie d'avance.

Feever
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message
  • Transfert de données
    par bigari » 30 octobre 2017, 13:45 » dans Excel - VBA
    3 Réponses
    200 Vues
    Dernier message par patrick1957
    30 octobre 2017, 16:22
  • TRANSFERT DE DONNEES
    par USMALGER » 1 décembre 2016, 19:41 » dans Excel - VBA
    2 Réponses
    82 Vues
    Dernier message par USMALGER
    2 décembre 2016, 07:19
  • Transfert de données
    par bigari » 17 juin 2016, 19:35 » dans Excel - VBA
    2 Réponses
    103 Vues
    Dernier message par bigari
    17 juin 2016, 22:59
  • transfert données
    par roms30 » 30 septembre 2017, 18:02 » dans Excel - VBA
    26 Réponses
    473 Vues
    Dernier message par James007
    1 octobre 2017, 20:31
  • Transfert de données
    par Thomas25 » 28 mars 2017, 22:54 » dans Excel - VBA
    6 Réponses
    142 Vues
    Dernier message par Thomas25
    29 mars 2017, 22:29
  • Transfert de données
    par TheDoud » 10 avril 2016, 17:59 » dans Excel - VBA
    5 Réponses
    174 Vues
    Dernier message par TheDoud
    12 avril 2016, 13:08