Vba debutante

chriska971 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   -
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

lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
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+
0