Effacement cellules selon ligne active

Résolu
Bonjour le forum CCM,

Tout d'abord chaleureusement bonne année à tous !!!
J'espère que ce forum sera aussi vivant qu'en 2014, on est toujours bien reçu ici !

Voici ma problématique du jour :

Je souhaite modifier une macro pour effacer le contenu des cellules 3 et 4 de la ligne active.
J'en suis là :
ActiveSheet.Rows(ActiveCell.Row).ligne3,ligne4.Delete ""

Puis-je vous demander un peu d'aide ?

D'avance merci

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Bonjour,

    Pour effacer le contenu des cellules, colonnes 3 et 4 de la ligne active :

    ActiveSheet.Cells(ActiveCell.Row, 3).Resize(1, 2).Clear


    A+
    1. Merci beaucoup Gyrus c'est parfait !

      Bonne journée

      Sympa le coup de main
  2. Bonsoir à tous.

    Ce n'est pas le printemps mais une fois de plus Visual "Basilic" me donne du fil à retordre.
    J'ai réussi, dans ma macro, à sélectionner une partie de colonne, dans laquelle je souhaiterais incrémenter des chiffres en partant de 1 avec un pas de 1.
    Il y a la commande Autofill mais je ne sais pas l'appliquer à ma sélection.

    Puis-je solliciter de l'aide ?

    Merci par avance