Avec excel repporter un nombre d'une cellule

23Hans Messages postés 7 Statut Membre -  
g Messages postés 1285 Statut Membre -
Bonjour,

Dans un tableau Excel

J'aimerais reporter la valeur numérique d'une cellule dans une autre cellule si cette cellule n'a aucune couleur de remplissage!!!

Peut on mettre un formule??

Du genre si ma cellule (C21) n'est pas grisée le chiffre que contiens ma cellule (C21) se reporte dans la cellule (H21)

J'ai essayé cette formule mais ça ne fonctionne pas??

=SI(C28;(tabColors = "(Aucune)"));(Valeur H28=Valeur C28)

Quel qu'un aurait une idée?

Merci d'avance

A voir également:

3 réponses

g Messages postés 1285 Statut Membre 577
 
Bonjour,

Copie le code VBA suivant dans le module de page accessible par Alt+F11

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("C21").Interior.ColorIndex = xlNone Then
[H21] = [C21]
Else: [H21] = ""
End If
End Sub

Cordialement.
0
23Hans Messages postés 7 Statut Membre
 
Bonjours
Merci pour votre réponse ça fonctionne mais je voudrais appliquer ceci à toute mes cellules de C21 à C61 ??????????
Pour info j'ai Excel 2003 voir avant ???

Merci d'avance pour votre réponse

Cordialement
0
g Messages postés 1285 Statut Membre 577
 
Re,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For i = 21 To 61
If Range("C" & i).Interior.ColorIndex = xlNone Then
Range("H" & i) = Range("C" & i)
Else: Range("H" & i) = ""
End If
Next
End Sub


Cordialement.
0