Copier des lignes dans une autre feuille Excel
Fermé
ArnaudNR
-
Modifié par ArnaudNR le 30/07/2016 à 14:19
gbinforme Messages postés 14939 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 3 août 2016 à 22:24
gbinforme Messages postés 14939 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 3 août 2016 à 22:24
A voir également:
- Copier des lignes dans une autre feuille Excel
- Liste déroulante excel - Guide
- Formule excel - Guide
- Aller à la ligne excel - Guide
- Déplacer une colonne excel - Guide
- Copier une vidéo youtube - Guide
1 réponse
gbinforme
Messages postés
14939
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 656
3 août 2016 à 22:24
3 août 2016 à 22:24
Bonjour,
dans une feuille "Adwords" tu mets cette petite macro et dès que tu choisiras cette feuille elle sera mise à jour.
dans une feuille "Adwords" tu mets cette petite macro et dès que tu choisiras cette feuille elle sera mise à jour.
Option Explicit
Private Sub Worksheet_Activate()
Dim sel As Variant, cel As Range, lig As Long
Application.ScreenUpdating = False
With Sheets("FactureIN")
Rows(2).Resize(UsedRange.Rows.Count).Delete
Set sel = .Cells.Find("Imputation")
If Not sel Is Nothing Then
lig = 2
For Each cel In .UsedRange.Columns(sel.Column).Cells
If cel.Value = "Adwords" Then
.Rows(cel.Row).Copy Destination:=Rows(lig)
lig = lig + 1
End If
Next cel
End If
End With
Application.ScreenUpdating = True
End Sub