Dernière activité de job75
-
job75 a répondu à la discussion Autres Possibilité de faire une macro?.Bonjour un internaute, Il n'y a rien à modifier. A+ -
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.Bonjour achraf26, Vous n'avez pas eu de réponse parce que le fichier déposé au post #14 est incohérent. Pourquoi ne pas utiliser le...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Ceci est plus simple : Private Sub Worksheet_Activate() Dim tablo, resu, i&, n& tablo = Sheets("Import").ListObjects(1).Range.Resize(...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Bonjour lynyrd, le forum, Private Sub Worksheet_Activate() Dim tablo, resu, i&, n& tablo =...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Je ne comprends pas ce que vous voulez.
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Bien sûr, la macro dans le code de la feuille "Transpose" : Private Sub Worksheet_Activate() Dim tablo, resu, i&, n& tablo =...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Prenez cette version (2), l'écriture des cellules et plages est plus simple : Private Sub Worksheet_Activate() Dim francais As Range, a...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Voici la macro, elle est placée dans le code de la feuille "Résultat" : Private Sub Worksheet_Activate() Dim francais As Range, a As...
-
job75 a répondu à la discussion XL 2019 Réunir du texte.Bonjour lynrd, le forum, Avant de vous donner la macro voici quelques explications sur le fichier du post #1. 1) Les données en...
-
job75 a répondu à la discussion XL 2016 humains VS chatGPT.Bonsoir à tous, Remettre à True en fin de macro est inutile : l'expression se met à True avec le End Sub. C'est la même chose avec...
-
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.Bonjour le forum, Avec cette version tous les tableaux structurés sont traités dans une boucle : Private Sub Worksheet_Change(ByVal...
-
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.J'ai ajouté Target.Select au début de la macro, le visuel est meilleur.
-
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.Oui bien sûr, la macro dans le code de la feuille : Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address <> "$U$3"...
-
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.J'ai testé en recopiant Tableau1 sur 60 000 lignes, chez moi sur Win 11 Excel 2019 : - macro du post #6 => 21 secondes - macro du post...
-
job75 a répondu à la discussion XL 2021 Modification et remplacer l'origine.Bonsoir achraf26, sylvanu, Notez que pour la 1ère macro on peut utiliser le filtre automatique : Sub Chercher() Dim Client, AC As...