Vba debutante

Bonjour,

Je fais mes premiers pas dans VBA et j'aimerais copier coller l'ensemble des cellules si ma colonne Ac.pr est égale à 5 ou à 7.

Pendant ce temps j'ai écrit ça :

Sheets("data air car fer").Select
Range("A1:E8").copy
Sheets("data air").Select
Range("A1:E8").Select
ActiveSheet.Paste
End Sub

J'ai 5 colonnes : Nom Prénom N°facture dest ac.pr

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    Bonjour,
    Concernant le VBA tu peu déjà simplifier ton code par..
    Sheets("data air car fer").Range("A1:E8").copy Sheets("data air").Range("A1")

    ou encore
    Sheets("data air car fer").[A1:E8].copy Sheets("data air").[A1]

    Concernant ta question.. j'ai rien compris, essaye de mieux l'exprimer.
    A+