Résultats de la recherche

  1. bobjazz

    XL 2016 Création de fichiers avec 3 onglets à partir d'une condition

    Bonjour le Forum Beaucoup de personnes ont regardé ma demande et il semblerait que cela n'est pas possible. Merci quand même Bobjazz
  2. bobjazz

    XL 2016 Création de fichiers avec 3 onglets à partir d'une condition

    Bonjour le Forum, J'ai un fichier avec 3 onglets différents mais avec une donnée commune la colonne A. Mon souhait est de créer un fichier avec les 3 onglets par site. Pour le moment j'ai trouvé des codes que j'ai réussi à adapter avec de l'aide. le premier me crée des nouveaux onglets au nom...
  3. bobjazz

    Microsoft 365 Garder la mise en forme après une action d'une macro

    Mis au bonne endroit nickel Encore merci Je me permet de te demander si c'est possible, voici le fichier que je travaille. J'ai 3 onglets différents qui ont une valeur commune la colonne A J'ai trouvé un code que j'ai adapté, d'abords je crée des onglets avec le code que tu viens de m'adapter et...
  4. bobjazz

    Microsoft 365 Garder la mise en forme après une action d'une macro

    Voici où je l'ai mis With Sheets("Eclairage normal") dl = .Cells(Application.Rows.Count, 1).End(xlUp).Row Set pl = .Range("A1:A" & dl) End With Set d = CreateObject("Scripting.Dictionary") For Each cel In pl d(cel.Value) = "" Next cel tp = d.keys For i = 0 To UBound(tp) On Error...
  5. bobjazz

    Microsoft 365 Garder la mise en forme après une action d'une macro

    oui mais j'aurai voulu garder le principe de couleurs différentes dans les onglets créés si c'était possible. Merci de ton aide Bobjazz
  6. bobjazz

    Microsoft 365 Garder la mise en forme après une action d'une macro

    Bonjour Dranreb j'ai rajouté dans la boucle et je garde bien la mise en forme hauteur et largeur, mais je voudrais garder le mode tableau. Tu crois que c'est possible Merci Bobjazz
  7. bobjazz

    Microsoft 365 Garder la mise en forme après une action d'une macro

    Bonjour le Forum La macro que j'utilise me sert à créer des nouveaux classeurs en fonction d'une donnée en colonne A, cela fonctionne très bien, mais je ne garde pas la mise en forme du tableau d'origine; Joint un fichier pour l'exemple et joint le code. Sub Macro1Onglet() Dim dl As Long Dim pl...
  8. bobjazz

    Formats dates differents

    Bonjour, Merci à tous, je n'aurai jamais trouvé. Pour l'origine du fichier, export fournit par une application sous oracle. Encore merci Bobjazz
  9. bobjazz

    Formats dates differents

    Merci pour vos réponses cela fonctionne mais je n'arrive pas à calculer le temps entre les 2 dates Joint le vrai export comme je l’obtiens, mon souhait est de calculer le temps entre les colonnes Date Created et To take into account Dat et idem entre Date Created et TTR Effective . Merci...
  10. bobjazz

    Formats dates differents

    Bonjour, Problème avec une extraction qui me donne des formats dates différents et je n'arrive pas à les mettre dans les mêmes formats. Mon souhait si c'est possible est de faire la différence entre les 2 colonnes, colonne B - colonne A et si j'ai la valeur "No Value" = "No Value". Merci Bobjazz
  11. bobjazz

    Macro tourne en boucle

    Re : Macro tourne en boucle Bonjour à vous deux, Pour la mitrailleuse, n’étant pas un grand connaisseur de VBA, j'adapte tant que je peux, après je demande de l'aide si je n'arrive pas. :) Pour les variables k& et z$, je ne sais pas j'ai trouvé ce code qui fonctionnait. Je vais garder le code...
  12. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Re Cougar J'ai trouvé, en cherchant j'ai trouvé ces codes Dim DernLigne As Long DernLigne = Range("B" & Rows.Count).End(xlUp).Row Range("B" & DernLigne) = "" Range("C" & DernLigne) = "" Range("D" & DernLigne) = ""...
  13. bobjazz

    Macro tourne en boucle

    Bonjour le Forum La macro fonctionne très bien sur excel 2013, sur excel 2010, la macro tourne en boucle, ne s’arrête pas. Je ne vois pas pourquoi. Sub Effligne() Columns("T:T").Select Selection.Delete Shift:=xlToLeft Rows("1:1").Select Range("B1").Activate...
  14. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Bonjour Cougar Merci pour ton aide, cela fonctionne sur la ligne en gardant toutes les mises en formes, est-ce qu'il est possible de ne copier que les cellules qui ont une formule, en plus simple j'ai essayé de rajouter de codes pour...
  15. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Re Cougar Cela fonctionne avec la copie jusqu'à la colonne 11. Mon besoin étant jusqu'à la colonne 40, j'ai modifié dans le code et quand je lance la macro. Je copie bien la ligne, mais elle s'arrête à la colonne 11 et ne recopie...
  16. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Bonjour Cougar et JHA Merci à vous deux, les 2 solutions fonctionnent. Encore merci Bobjazz
  17. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Bonjour JHA Je ne connais ce que tu as fait, mais je ne vois pas où aller voir Merci Bobjazz
  18. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Re Cougar J'ai une errue à : ActiveCell = ActiveCell.Offset(-1, 0) + 1 Je dois coller où les lignes dans mon code. Merci Bobjazz
  19. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Re : Ajout de ligne avec agrémentation et recopie formule Merci Cougar Je vais essayer au bureau @+ Bojazz
  20. bobjazz

    XL 2013 Ajout de ligne avec agrémentation et recopie formule

    Bonsoir le Forum Mon souhait est d'ajouter une ligne à la fin du tableau en agrémentant la cellule A de la suite numérique et en gardant les formules, Pour l'instant, avec la macro que j'ai fait, je clique sur la dernière cellule remplie et je lance la macro. Mon souhait serait aussi est...