Résultats de la recherche

Re : Problème condition ne se vérifiant pas Merci à vous 2 pour la rapidité de votre réponse. Avec Cstr(), mon problème a été résolu :)

Bonjour, Après m'être creusé la tête pendant quelques heures, j'ai décidé de faire appel à vous... Pour le bout de code suivant: Fact = InputBox("Entrez le numéro Facture") Sheets("base").Activate For Each item In Range(Range("Q2"), Range("Q2").End(xlDown)) i = item.Row If...

Re : Fusionner les infos sur une feuille C'est bon ca marche impec. Encore merci Ya'v :)

Re : Fusionner les infos sur une feuille Merci c'est ce que je voulais, mais quand je copie ta macro sur mon fichier de travail, rien ne se passe. J'ai essaié de comprendre ton code mais je n'ai pas assez de connaissance en vba. Il faut que j'aille bosser, je verrai ce qui cloche ce soir.

Re : Fusionner les infos sur une feuille Oui c'est bien l'idée.

Bonjour, Mes connaissances en vba étant très limitées, je sollicite votre aide pour un petit problème. J'ai quatre feuilles et j'aimerais reprendre les infos des quatre feuilles sur une seule. Dans mon exemple, les quatres feuilles sont FAR, Insurance, Freight en Mark up, et la feuille...

Re : reprendre l'ensemble des noms des feuilles d'un classeur Trop fort... Quelle rapidité, merci :)

Re : reprendre l'ensemble des noms des feuilles d'un classeur Merci à toi aussi Boisgontier. J'ai encore une autre demande... J'aimerais ,que sur la feuille qui reprend tous les noms des feuilles, qu'en clickant sur le nom (dans la cellule A1 par exemple) je sois dirigé directement dans...

Re : reprendre l'ensemble des noms des feuilles d'un classeur Un grand merci cbea :)

Bonsoir, Est-il possible dans une feuille excel de reprendre l'ensemble des noms des feuilles d'un classeur ? Si j'ai dans un classeur 20 feuilles, la première se nomme "jeux", le deuxième "hobby", la 3ème "vacances" et ainsi de suite, je veux avoir sur une feuille à la cellule A1: "jeux"...

Re : cellule vide dans une formule Merci Wamme Cela me permet de compléter les lignes vides et ainsi me faciliter la vie puisqu'ensuite je n'ai plus qu'à faire un copier coller...

Bonjour, J'ai une formule avec SI qui teste la condition suivante: si cellule vide alors ... voici mon code mais je n'arrive pas ce que je veux: For Each cel In Range([A6], [A500]) lig = cel.Row Cells(lig, 7).FormulaLocal = "IF(A" & lig & "=" & "" & ";G" &...

Re : Uiliser une boucle Elle marche impec, Merci !!!! J'avais finalement trouvé une solution avec plusieurs if mais ta solution simplifie le code... Bon il me reste à comprendre ton code. Bonne soirée, et encore merci skoobi.

Re : Uiliser une boucle Ci-joint, vous trouverez 2 fichiers. Le fichier1, la feuille: fichier_original reprend le fichier tel que je le reçois chaque mois, la feuille:resultat_escompté, en rouge c'est le résultat que j'aimerais avoir grâce à la macro. Le fichier2 c'est le fichier...

Re : Uiliser une boucle Bonjour, skoobi, j'ai modifier ton code et le résultat c'est que la macro bug lorsque Cells(1, col).End(xlDown).Offset(0, -1).Value a comme valeur #N/A (valeur sur excel je ne connais pas le code dans Vba) voici ci-dessous la macro modifié Sub test_cell()...

Re : Uiliser une boucle Scoobi, Tu n'as pas à être dsl, là j'ai appris comment forcer l'arrêt d'une macro :) Et puis je trouve sympa que tu prennes la peine de répondre et de proposer des solutions. La macro que tu m'as proposé me complète la colonne E que la cellule soit vide ou pas...

Re : Uiliser une boucle skoobi, Ta macro tourne à l'infini, j'ai du fermer excel... Mais je penses que je me suis mal exprimé, je vais reprendre les 2 boucles et mettre en rouge les Différences entre les 2 boucles: la 1ère boucle Range("E1").End(xlDown).Offset(1, 0).Select...

Re : Uiliser une boucle Bonsoir roro69, J'ai essaié ta proposition mais ca ne va pas, j'ai une erreur de syntax en l'exécutant. J'aimerais juste rectifier le code que je vous ai mis plus haut, voici la seconde boucle, j'ai juste oublié de changer la colonne 5 par 6...

Re : Uiliser une boucle Merci skoobi, L'autre boucle que j'aimerais exécuter après qu'il en ait fini avec la 1ère est celle-ci: Range("F1").End(xlDown).Offset(1, 0).Select Do While ActiveCell.Offset(O, -1).Value <> "" ActiveCell.Formula = _...

Bonjour, Je débute dans la création de macro et j'espère que ma question sera comprise... J'aimerais faire une boucle ( du genre do while ... loop) et lorsque la condition n'est plus satisfaite qu'il passe à une autre boucle avec une autre condition. Pour mon cas, j'aimerais compléter...