P
Paul
Guest
Bonjour,
Cette macro ci dessous me permet de selectionner les valeurs de la feuille "weight" qui ne figurent pas dans la liste de la feuille "list MSCI", et de les envoyer dans la feuille attribution totale.
cette macro pourtant ne fonctionne pas tres bien: elle "range" bien les valeurs que je recherche dans la feuille "attribution total" mais continue apres en faisant n importe quoi!
que se passe t il?
merci beaucoup pour votre aide
Sub sele()
For Each cel In Sheets("weight").Range("a7:a91")
Set absent = Sheets("list msci").Range("a6:a379").Find(cel, LookIn:=xlValue)
'Cellule = Cel.Address(RowAbsolute:=False, ColumnAbsolute:=False)
If absent Is Nothing Then
Sheets("attribution total").Range("N6").Offset(i, 0).Value = cel
i = i + 1
End If
Next
End Sub
Cette macro ci dessous me permet de selectionner les valeurs de la feuille "weight" qui ne figurent pas dans la liste de la feuille "list MSCI", et de les envoyer dans la feuille attribution totale.
cette macro pourtant ne fonctionne pas tres bien: elle "range" bien les valeurs que je recherche dans la feuille "attribution total" mais continue apres en faisant n importe quoi!
que se passe t il?
merci beaucoup pour votre aide
Sub sele()
For Each cel In Sheets("weight").Range("a7:a91")
Set absent = Sheets("list msci").Range("a6:a379").Find(cel, LookIn:=xlValue)
'Cellule = Cel.Address(RowAbsolute:=False, ColumnAbsolute:=False)
If absent Is Nothing Then
Sheets("attribution total").Range("N6").Offset(i, 0).Value = cel
i = i + 1
End If
Next
End Sub