Supprime si date

Bonjour le forum,

Je cherche un code pour cette demande

Si R7 <> "Futur"

Alors copie ("K11:Q60") => coller avec l'option Valeurs (V) sur K11 et supprimer colonne ("D:J")

Merci d'avance

Jérôme

Bonjour,

En posant exactement la même question à Copilot (accessible gratuitement et automatiquement via Edge) :

Alors bien sûr, on pourrait gagner quelques lignes de code et prendre des raccourcis, mais ceci fait très bien le travail.

C'est un bon moyen de progresser également.

Salut,

Effectivement ça fait le job

Merci pour le conseil

Et bonne journée

Pour des questions simples et bien posées (tu cochais toutes les cases), le résultat est vraiment bluffant.

Tu peux discuter avec lui ensuite et lui demander des variations, des explications, etc.

Le résultat est forcément plus aléatoire pour des problèmes complexes, mais ça dégrossit vraiment bien.

Et sinon, normalement

ws.Range("K11:Q60").value = ws.Range("K11:Q60").value

donne la même chose que les 2 lignes proposées par Copilot.