vba - boucle

  1. F

    Microsoft 365 Effacer le contenu si cellule suivante identique

    Bonjour, Je suis à la recherche d'un code VBA permettant d'effacer le contenu de la cellule suivante si celle-ci est identique. J'ai fait plusieurs tentatives mais sans succès. C'est pourquoi, je fais appel à votre savoir et votre gentillesse pour m'aider à la résolution de mon pb. La valeur à...
  2. F

    Microsoft 365 Supprimer des lignes en fonction de la date et de l'heure

    Bonjour, Grâce à votre aide j'ai déjà pu automatiser le traitement de mes fichiers de température / humidité... Je souhaiterai maintenant supprimer les lignes qui concernent les samedi et dimanche ainsi que les heures avant 7h00 et après 19h00 les jours de semaine. J'ai 28 feuilles de 8000 ou...
  3. M

    XL 2021 Vba Userform textbox.value

    Bonjour, Est-il possible de créer une classe pour dire que lorsque je clique sur un bouton toutes les textbox de 1 à 15 soit copier et coller sur ma "Feuil1" Exemple : feuil1.range("a1").value = Textbox1.value feuil1.range("a2").value = Textbox2.value Dans ce style : Public WithEvents txt...
  4. D

    Microsoft 365 VBA une listbox devient inactive lors du second passage

    Bonjour, Je ne trouve aucune explication à ce problème. Pour le reproduire : - Ouvrir le classeur joint - clic sur "Update trading date" - clic sur "Update training info for another day" - clic sur "November" - clic sur "Wrong date !..." On recommence la boucle en choisissant une date supérieure...
  5. S

    Microsoft 365 VBA Copie lignes automatique avec conditions

    bonjour à tous je suis notice en VBA et j'ai besoin de votre aide j'ai un gros fichier (2000 lignes) que je dois exploiter de maniere a le figer en BDD pour un publipostage je vais essayer d'etre claire dans mes explications le fichier (un extrait en PJ) comprend une liste d'entp cliente qui...
  6. R3n0W

    XL 2016 Problèmes de Range, tentative de boucle entre 2 fichiers

    Bonjour Après mes 3 premiers jours de codage je suis encore novice en VBA mais je me soigne :) Je souhaite exécuter une macro me permettant, depuis un fichier maitre avec tous mes compteurs, de consulter dans un fichier de relève avec seulement quelques compteurs la correspondance entre ces 2...
  7. J

    Autres filtre et suppression doublons

    Bonjour à tous, J'ai besoin d'un coups de main sur une macro que j'ai crée. Dans le fichier joint normalement la macro fonctionne bien, elle donne l'exemple de ce que souhaite. La macro permet de filtre suivant la colonne C (ES ou MA) puis la colonne G ( suivant le numéro 40), elle copie le...
  8. L

    Microsoft 365 boucle en VBA

    Bonjour à tous, Alors je cherche à compléter ma formule en gros je souhaite que tant que la colonne B est égal à X alors qu'il vérifie que D + E est égal à 0 Si nous dépassons -10 alerte via msg box For b = 3 To a - 1 'Formule si la valeur de la cellule b est égal à la valeur de la...
  9. M

    Microsoft 365 Exercice VBA probleme variable

    Bonjour, J'ai un petit exercice VBA, et cela me renvoie tjs "Erreur 91", j'aimerai savoir si quelqu'un a la solution Merci d'avance. Exercice : sub afficheN(cellule as range, nombre as integer) Affiche les chiffres de 1 à nombre, les uns en dessous des autres, à partir de la cellule cellule...
  10. G

    XL 2019 Insérer une formule Excel via VBA avec boucle.

    Bonjour, J'aimerai insérer une formule Excel via un code VBA sur 31 colonnes avec changement de lettre par formule. Cette formule est à écrire dans les cellules C30 à AG30 avec l'incrément des lettres C dans la formule (C à AG) =SOMME_SI_COULEUR(C$31:C$34;16777215) jusqu'à...
  11. M

    Microsoft 365 Copier les données d'une feuille à une autre

    Bonjour, J'ai écrit une fonction qui copie des données d'une feuille à une autre. Dans la première feuille j'ai 3 colonnes de 3 règles différentes (Completness, Accuracy, Validity) mais dans la deuxième feuille je veux collecter ces règles dans une seule colonne et mettre le type de chaque...
  12. A

    XL 2016 Copier certaines cellules de plusieurs ou d'une ligne(s) d'un tableau sur autre feuille

    Bonjour, je fais encore appel aux génies présents ! je tourne en rond je préfère vous envoyer le fichier vierge qu'avec tous mes essais Je dois donc suivant le résultat d'une cellule nommée (numero de commande) faire apparaitre dans une autre feuille (résultat commande) sous forme de tableau...
  13. J

    XL 2016 vba copie de donnees filtrees sur plusieurs cellules

    Bonjour à tous, Je reviens vers vous car j'ai un fichier sur lequel je n'arrive pas à mettre ma macro en ordre. Sur le fichier joint dans l'onglet Nc formulaire j'ai deux boutons, sur celui "Appuyer pour re-édité une fiche d'action", je n'arrive pas a finalisé le transfère des données trouve du...
  14. J

    XL 2016 vba modification de tableau et modif la BDD

    Bonjour, J'essai de réaliser une macro sous VBA pour transférer les données modifier du tableau F6:AF32 de l'onglet Analyse semaine reedition à l'onglet "BDD analyse prod". Le but du fichier et dans un premier temps d'appuyer sur le bouton "Appuyer pour reediter" qui va afficher suivant le N°...
  15. J

    XL 2016 vba cherche 2 valeurs dans une autre feuille et remplace des données

    Bonjour, J'ai une nouvelle fois besoin d'un coups de main, dans mon fichier excel ci-joint, je souhaiterais en macro VBA faire en sorte en appuyant sur le bouton rechercher la valeur de C8 (date) plus G8 (équipe) dans le tableau de l'onglet BDD act semaine (colonne E et F), et si la ligne trouve...
  16. J

    XL 2016 vba trop lent en execution

    Bonjour à tous, Je viens vers vous car j'ai une macro qui était assez rapide il y a 2 semaines, mais aujourd'hui elle mets prés de 10minutes a se faire. En soit elle fonctionne mais très lente, pourriez-vous m'aider soit à la simplifier ou me dire ce qu'il faudrait faire pour la rendre plus...
  17. J

    XL 2016 VBA horaire equipe

    Bonjour, Je souhaiterais réaliser un code VBA pour mettre la date et l'équipe dans une cellule, voici ce que j'ai fais qui fonctionne mais avec un petit soucis : If Hour(Now) >= 13 And Hour(Now) <= 21 Then Range("G6").Value = "Après-midi" End If If Hour(Now) >= 21 And Hour(Now) <= 5...
  18. G

    Microsoft 365 création d'onglet/ enregistrement fichier en CSV

    Bonjour à tous, je viens vers vous car je bloque dans le codage de mon fichier. J'ai créer un fichier automatique pour avoir une trace informatique des pièces à relancer. Le fichier est tout simple, un formulaire sous userform qui lors de l'enregistrement vient à la suite dans une BDD. Lorsque...