Contenu récent par guez

Re : Erreur de code Ca fonctionne. Il y'a ptete des choses en trop mais il me saute bien les lignes en cas d'erreur et ne bloque plus à la 2éme. Merci Pierrot, on dirait que tu es mon aide attitré ;) Allez, on va pouvoir rentrer maintenant, bonne soirée.

Re : Erreur de code Il bloque tjs sur la 2eme erreur. Avec la fonction DIR ça a l'air de fonctionner, ce qui m'embete c'est que dans le cas ou le fichier n'existe pas, il faudrait pouvoir sauter une ligne pour que mes données soient tjs en face des fichiers, sinon j'ai un décallage de ligne.

Re : Erreur de code Il passe la premiere erreur mais pas la seconde. Mon suite est bien placé?

Re : Probleme avec GoTo Je sais mais sur mon post précédent, le probléme initial n'est pas le même. Je pensais bien faire justement... :(

Bonjour, Le GoTo dans la macro suivante fonctionne sur la premiere erreur rencontré mais pas sur la 2eme? La macro: J'ouvre une liste de fichier afin d'y extraire des données. La macro bloque quand elle ne trouve pas de fichier. Dans ce cas, je souhaite qu'elle continue. Merci pour...

Re : Erreur de code Je comprend pas pkoi la macro arrive a passer la 1ere erreur mais pas la 2eme?

Re : Erreur de code Je le met à quel niveau??

Re : Erreur de code C'est bon, je ferme mon fichier comme cela: 'localisation des données à extraire Dim Effectif As String, NumGestion As String, Jours As String Effectif = Sheets("BALANCE").Range("D89") NumGestion = Sheets("PARAMETRES").Range("D9") Jours =...

Re : Ouvrir une liste de fichier sous condition oui c'est ça. mais j'ai résolu mon probléme en filtrant sur les 1 pour créer une base de donnée finale. Merci a toi en tout cas.

Re : Erreur de code Mon code entier: Sub recup() 'Parametre d'importation ThisWorkbook.Activate Dim Source As String, Fichier As String ThisWorkbook.Sheets("EXPORT").Activate ' vider la feuille EXPORT Cells.Select Selection.Delete Shift:=xlUp Range("A1").Select...

Re : Erreur de code Salut Pierrot, J'ai déjà essayé avec workbooks, ça change rien. Oui j'ai le chemin complet dans mon fichier excel mais je stocke le fichier excel dans "Fichier", pkoi c'est normal que ça plante??

Bonjour, Savez-vous pourquoi la macro bloque sur la ligne Windows(fichier).Close savechanges:=False Merci Sub recup() 'Parametre d'importation ThisWorkbook.Activate Dim Source As String ligne = 1 'ligne d'ecriture colonne = 1 ' colonne d'ecriture For n = 12 To 18 Source =...

Re : Ouvrir une liste de fichier sous condition J'ouvre mon fichier, j'extrait mes données puis je le ferme. je passe ensuite à mon fichier suivant. La finalité est de créer une base de donnée que j'alimente tout les mois. Je ne connais pasgetvalue, je fais voir si ça m'est utile.

Re : Ouvrir une liste de fichier sous condition Pour le moment j'ai mis "For n = 12 To 18" pour le test. Ma liste est bien plus longue.

Re : Ouvrir une liste de fichier sous condition Pour le moment j'ai écris ça. il faut que j'ajoute ma condition Si A2 =1 alors ouvrir le fichier D2 et extraire les données. J'aurais également besoin de mettre les données sur la meme ligne, dans le cas présent sur la ligne 2. Les chemins...