VBA - Coller que la valeur des cellules copiées dans une boucle de recherche
Nono_1602
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je recherche comment faire pour que ma plage copiée, se colle uniquement avec la valeur à la fin de la recherche et non la mise en forme des cellules... ?
Je précise juste que le code fonctionne très bien :)
Merci d'avance et une belle journée !
Je recherche comment faire pour que ma plage copiée, se colle uniquement avec la valeur à la fin de la recherche et non la mise en forme des cellules... ?
Je précise juste que le code fonctionne très bien :)
Merci d'avance et une belle journée !
Dim i As Integer
Dim FL1 As Worksheet, NoCol As Integer
Dim NoLig As Long, Var As Variant, cherche
cherche = Worksheets("Saisies").Range("B2").Value
NoCol = 2 'lecture de la colonne B
For i = 4 To 22 'feuilles
Set FL1 = Worksheets(Worksheets(i).Name)
For NoLig = 2 To 37 'colonne B
Var = FL1.Cells(NoLig, NoCol)
If Var = cherche Then
Worksheets("Saisies").Range("B2:V2").Copy _
Destination:=FL1.Cells(NoLig, 2)
End If
Next
A voir également:
- VBA - Coller que la valeur des cellules copiées dans une boucle de recherche
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Verrouiller des cellules excel - Guide
- Aller à la ligne dans une cellule excel - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Comment faire une recherche à partir d'une photo - Guide