Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
merci cela marche
mais une question a quoi correspond le code que j'ai trouvé et pourquoi et t'il si long
alors que la une seul ligne fait a 1ere vu la même chose ?
Je me souviens que dans ton code il y avait pas mal de chose pour remettre à jour des filtres ou des selections. Pas facile d'en dire plus.
explications ....
Sheets.count=nombre d'onglets
Sheets(Sheets.Count).......est le dernier onglet
Pour copier toujours le dernier onglet même en étant sur n'importe quel onglet...........
Sheets(Sheets.Count).Copy after:=Sheets(Sheets.Count)
Ne pas avoir peur de faire enregistrer une macro pour voir le résultat
Essai "enregistrer une macro" ensuite click avec le bouton droit de la souris en bas sur le nom de l'onglet et choisit "déplacer ou copier" coche "créer une copie et en dernier
Stop l'enregistreur et va voir le code
Ensuite ce code sera amélioré et on supprime éventuellement les select
Bruno
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.