localiser une cellule dont la couleur est rouge

localiser une cellule dont la couleur est rouge - VB/VBA/VBS - Programmation

Marsh Posté le 03-04-2006 à 14:44:32    

Salut
 
Tout est dit dans le titre du post, comment sur une page excel puis je localiser une cellule de couleur X parmi plein de cellules.
J'en suis arrivé à poser cette question car avec les formules d'excel on ne peut pas à traver deux onglets reporter le format mais seulement la valeur. Moi j'aimerais que si le type met une case dans l'onglet a en rouge que la copie de cette case dans un autre onglet le devienne aussi..
 
Merciiiiiiiiii
 
Louis

Reply

Marsh Posté le 03-04-2006 à 14:44:32   

Reply

Marsh Posté le 03-04-2006 à 22:20:29    

Bonsoir Iden
Bonsoir à tous
 
Je te propose ce code, j'espère que cela t'aidera :
 
Sub cel_rouge()
Dim maplage As Range
Set maplage = Range("h14:j16" )
dercel = maplage.Cells.Count
Range("h14" ).Select
For i = 1 To dercel
If maplage.Cells(i).Interior.ColorIndex = 3 Then
    maplage.Cells(i).Select
    adr_cellule = ActiveCell.Address
    Exit For
End If
Next i
End Sub
 
Cordialement

Reply

Marsh Posté le 11-04-2006 à 14:28:57    

je regarde ca dès que j'ai le tps.
merci eric
 
++

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed