Contenu récent par RV51

Re : Somme des heures Le nom des feuilles va de 1 à 31 et classées dans l'ordre. J'ai un classeur par mois, comme les semaines sont différentes d'un mois à l'autre (la semaine 1 pour septembre va de 1au 5, mais pour octobre de 1au 3), je voudrais juste à avoir les dates de début et de fin de...

Bonjour à tous, Je dois faire un classeur qui regroupe les heures déclarées par personnel/machine/jour. J'ai donc 31 feuilles identiques numérotées de 1 à 31 et une feuille finale qui doit me permettre de faire le total par semaine sachant que les dates de début et fin de semaine changent...

Re : [VBA] Recherche de données dans plusieurs classeurs Non, pas forcement, bien que cela soit le cas pour une bonne partie. C'est quoi "ADO"?

Bonjour, Est-il possible en VBA d'aller chercher des donées dans tous les classeurs présents dans un répertoire précis?

Re : Boucle (VBA) Cela fonctionne, trop cool car cela faisait un certains nombres d'heures que je planchais là-dessus :-) Bon,maintenant, il faut que je comprenne parfaite ces lignes de code, étant débutant, il y a encore des fonctions que je cerne mal. En tout cas, un grand merci a vous...

Re : Boucle (VBA) Ok, je viens de mettre mon fichier expurer

Re : Boucle (VBA) Bonjour tototiti2008, Petite précision, ma feuille ML contenant 29483 lignes, j'ai donc déclaré LigML en Long. Sinon, c'est cette ligne (While Worksheets("ML").Cells((LigML + 1), 1).Value <> "" ) qui vous fait tiquer?

Bonjour, Petit soucis avec mes boucles: LigML = 5 While Worksheets("ML").Cells((LigML + 1), 1).Value <> "" LigML = LigML + 1 Ligne = 11 While Worksheets("Consolidation ZSFG").Cells(Ligne, 1).Value <> ""...

Re : comparaison 2 cellules sur feuilles differentes [VBA] Pour tototiti2008, les colonnes ne contiennent que des données ou sont vide. nyko283, je teste lundi au boulot. Merci à vous deux.

Bonjour, J'ai écris ce code pour déclencher une action de copie lorsque le contenu des 2 cellules sont identique: Ligne = 11 LigML = 6 While Worksheets("ML").Cells(LigML, 1).Value <> "" If Worksheets("ML").Cells(LigML...

Re : Fonction VLookup en VBA Ok, cela fonctionne, merci beaucoup pour votre aide

Re : Fonction VLookup en VBA Il faut que je remplace ZFGDZSFG.Range("B:C") par Worksheets("ZFGDZSFG").Range("B:C") ? J'ai pourtant essayé, mais cela ne fonctinne pas mieux :confused:

Bonjour, J'ai le message d'erreur "424" lorsque j'execute le code suivant: Sub WordArt1_QuandClic() 'Permet de faire l'extraction de la colonne Materiel Number du fichier ZFGD dans le fichier consolidation' Dim Ligne As Long Ligne = 1 While...

Re : Macro en VBA pour copier une colonne Merci, cela fonctionne maintenant.

Re : Macro en VBA pour copier une colonne Les réponses fusent...:D J'ai remplacé le 0 par 1 et le Sub est oublie au moment de la copie et j'obtiens Erreur d'excution "438" Je pourrais effectivement selectionner toute ma colonne, mais a un moment donner dans mon programme je serais...