besoin d'un coup de main pour excel

besoin d'un coup de main pour excel - Logiciels - Windows & Software

Marsh Posté le 06-04-2006 à 13:54:02    

bonjour,
 
je ne sais pas programmer sous excel, alors je vous fait un appel au secours.
 
voila ce que j'aimerai realiser :
un tableau avec 2 colonnes qui listent des numéros,  
et lorsqu'il y a un doublon de numéros entre les 2 colonnes,
que la case du numero concerné change de couleur de fond sur l'une des 2 colonnes.
 
merci de me dire si c'est possible, et si oui, comment svp
 
merci d'avance

Reply

Marsh Posté le 06-04-2006 à 13:54:02   

Reply

Marsh Posté le 06-04-2006 à 13:56:26    

Tu veux dire : quand les 2 cellules l'une à côté de l'autre sont égales, mettre un fond spécial ?


---------------
Filmstory : gardez trace des films que vous avez vu ! :D
Reply

Marsh Posté le 06-04-2006 à 16:22:47    

freds45 a écrit :

Tu veux dire : quand les 2 cellules l'une à côté de l'autre sont égales, mettre un fond spécial ?


 
plus exactement si le contenu d'une cellule dans la colonne 2 est deja renseigné à l'identique dans la colonne 1.
apres c'est pas forcement sur la meme ligne vu que la colonne 2 pourra contenir plus de ligne que la colonne 1.
par exemple si j'ai colonne 1 ligne 1 le chiffre "1" et ligne 2 le chiffre "4"
je pourrai avoir "1", "2", "3", "4" dans la colonne 2 => donc 2 lignes de +
j'espere que je suis clair ...

Reply

Marsh Posté le 06-04-2006 à 16:29:06    

sur un excel en anglais (désolé) menu format, conditional formating


---------------
Des trucs - flickr - Instagram
Reply

Marsh Posté le 06-04-2006 à 22:53:28    

l'idée que je cherche "en gros" : pour toutes les cellules de la colonne 2  
 
"si le contenu de la cellule de la colonne 2 est = au contenu d'une des cellule de la 1ere colonne (verif sur toute la colonne 1, pas seulement sur la cellule de la meme ligne), alors cette cellule devient rouge"
 
mais je sais pas le retranscrire en fonction excel...
si quelqu'un maitrise... help

Reply

Marsh Posté le 06-04-2006 à 23:28:37    

http://www.image-dream.com/membre/up/anonym/2e32dc9da0c2942b79fb6505d7c54b79.png
 
Voici le principe :
avec la fonction RECHERCHEV, je regarde si, dans ma colonne A, j'ai la valeur de la cellule de la colonne B (B3 dans l'exemple). Cette fonction me renvoie la valeur en question si elle trouve, une erreur sinon.
Ensuite, suffit de voit avec la fonction ESTNA si on a une erreur. Si oui (grâce à la conditionnelle SI), on affiche 0, sinon on affiche 1.
Dans l'exemple, 4 est présent dans la colonne A, alors on affiche un 1. 6 n'est pas présent, donc on affiche 0 :)
Enfin, tu n'a plus qu'à jouer avec les formats conditionnels comme expliqué par darxmurf pour arriver à ce que tu souhaites :jap:

Message cité 1 fois
Message édité par freds45 le 06-04-2006 à 23:29:57

---------------
Filmstory : gardez trace des films que vous avez vu ! :D
Reply

Marsh Posté le 07-04-2006 à 13:08:26    

freds45 a écrit :

http://www.image-dream.com/membre/ [...] c54b79.png
 
Voici le principe :
avec la fonction RECHERCHEV, je regarde si, dans ma colonne A, j'ai la valeur de la cellule de la colonne B (B3 dans l'exemple). Cette fonction me renvoie la valeur en question si elle trouve, une erreur sinon.
Ensuite, suffit de voit avec la fonction ESTNA si on a une erreur. Si oui (grâce à la conditionnelle SI), on affiche 0, sinon on affiche 1.
Dans l'exemple, 4 est présent dans la colonne A, alors on affiche un 1. 6 n'est pas présent, donc on affiche 0 :)
Enfin, tu n'a plus qu'à jouer avec les formats conditionnels comme expliqué par darxmurf pour arriver à ce que tu souhaites :jap:


 
 
chapeau pour l'explication et l'exemple  :jap:  
merci et bon we à tous !

Reply

Marsh Posté le 07-04-2006 à 14:23:27    

bon allez, j'ai envie d'etre tatillon...  :D  
 
le coup du 0 et du 1 ça marche bien,
mais pour voir encore mieux les points commun on peut rajouter une option qui fasse changer la couleur de la ligne en doublon de l'une des colonnes svp ?
 
sinon merci quand meme  :hello:  

Reply

Marsh Posté le 07-04-2006 à 14:35:59    

Oui, il faut utiliser les formats conditionnels (de tête, j'ai pas d'Excel ici) : tu demandes le formatage conditionnel d'une premiere cellule, mettons B3 dans l'exemple. Tu définis que si la cellule voisine (C3) vaut 1 (donc doublon), tu souhaites afficher un fond rouge à la cellule. Ensuite, suffit de recopier le format conditionnel jusqu'à ta dernière ligne. Et zou :D
 
Pour le coup du 1 et du 0, tu peux afficher autre chose :p Suffit de remplacer 1 et 0 dans la formule par une chaîne de caractères, par exemple ;) Dans ce cas, oublie pas de la mettre entre "".


---------------
Filmstory : gardez trace des films que vous avez vu ! :D
Reply

Marsh Posté le 07-04-2006 à 20:34:20    

c'est ce que j'ai dis plus haut... :)

Reply

Marsh Posté le 07-04-2006 à 20:34:20   

Reply

Marsh Posté le 07-04-2006 à 22:17:49    

darxmurf a écrit :

c'est ce que j'ai dis plus haut... :)


 
avec 3 fois moins de détails! :p

Reply

Marsh Posté le 08-04-2006 à 11:36:10    

:hello:  
Bonjour,
suggestion de macro
prend les valeurs de la colonne B
regarde dans A s'il y a un doublon
fond vert sur doublons de A
Cordialement
 
 
 
 
Sub cherche()
'
' cherche Macro
 
'
 
'
     
    Range("A1" ).Activate
    ActiveCell.CurrentRegion.Select
    MsgBox ActiveCell.CurrentRegion.Rows.Count
    nombrel = ActiveCell.CurrentRegion.Rows.Count
   For n = 0 To nombrel - 1
    Range("B1" ).Offset(n, 0).Select
     
    nbachercher = Selection.Value
    If (Not IsNull(nbachercher)) And (Not IsEmpty(nbachercher)) Then
    Range("a:a" ).Select
    With Selection
    Set c = .Find(nbachercher, LookIn:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.Interior.ColorIndex = 4
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
    End With
    End If
    Next n
   
   
End Sub

Message cité 1 fois
Message édité par seniorpapou le 08-04-2006 à 11:40:14
Reply

Marsh Posté le 10-04-2006 à 10:04:13    

freds45 a écrit :

avec 3 fois moins de détails! :p


 
 
oué mais je l'ai quand même dit :D [:poussahpensif]


---------------
Des trucs - flickr - Instagram
Reply

Marsh Posté le 13-04-2006 à 21:54:04    

seniorpapou a écrit :

:hello:  
Bonjour,
suggestion de macro
prend les valeurs de la colonne B
regarde dans A s'il y a un doublon
fond vert sur doublons de A
Cordialement
 
 
 
 
Sub cherche()
'
' cherche Macro
 
'
 
'
     
    Range("A1" ).Activate
    ActiveCell.CurrentRegion.Select
    MsgBox ActiveCell.CurrentRegion.Rows.Count
    nombrel = ActiveCell.CurrentRegion.Rows.Count
   For n = 0 To nombrel - 1
    Range("B1" ).Offset(n, 0).Select
     
    nbachercher = Selection.Value
    If (Not IsNull(nbachercher)) And (Not IsEmpty(nbachercher)) Then
    Range("a:a" ).Select
    With Selection
    Set c = .Find(nbachercher, LookIn:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.Interior.ColorIndex = 4
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
    End With
    End If
    Next n
   
   
End Sub


 
 
bonsoir,  
merci pour le coup de main , mais j'ai rien compris à la macro  :whistle:  
'est pourquoi les smileys dedans ? parce que moi j'ai fait betement un copier  coller du texte
dans l'editeur de macros sous excel, et bien sur ça marche pas... :D  

Reply

Marsh Posté le 14-04-2006 à 07:40:24    

 

Reply

Marsh Posté le 14-04-2006 à 11:13:24    


 
un bug dans la gestion des smileys. Si tu veux récupérer simplement sa macro, clique sur le bouton pour éditer le post de seniorpapou pour voir la source et là, roule


---------------
La ligne droite n'est en aucun cas le plus court chemin entre deux points. Sauf, bien sûr, si les deux points sont bien alignés l'un en face de l'autre
Reply

Marsh Posté le 14-04-2006 à 11:35:04    

En désactivant les smilies:
 
 
Sub cherche()
'
' cherche Macro
 
'
 
'
     
    Range("A1" ).Activate
    ActiveCell.CurrentRegion.Select
    MsgBox ActiveCell.CurrentRegion.Rows.Count
    nombrel = ActiveCell.CurrentRegion.Rows.Count
   For n = 0 To nombrel - 1
    Range("B1" ).Offset(n, 0).Select
     
    nbachercher = Selection.Value
    If (Not IsNull(nbachercher)) And (Not IsEmpty(nbachercher)) Then
    Range("a:a" ).Select
    With Selection
    Set c = .Find(nbachercher, LookIn:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.Interior.ColorIndex = 4
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
    End With
    End If
    Next n
   
   
End Sub

Reply

Marsh Posté le 14-04-2006 à 15:55:51    

Bonsoir,
il va falloir que j'apprenne à maîtriser les conversations dans ce forum!!!!
'avais répondu au sujet des smileys mais ma réponse est partie dans l'atmosphère. Au fait comment les désactiver  dans les réponses?
Merci

Reply

Marsh Posté le 22-04-2006 à 17:44:32    

seniorpapou a écrit :

Bonsoir,
il va falloir que j'apprenne à maîtriser les conversations dans ce forum!!!!
'avais répondu au sujet des smileys mais ma réponse est partie dans l'atmosphère. Au fait comment les désactiver dans les réponses?
Merci

 

Pour les smilies je viens de trouver en bas de la page d'envoi d'une réponse : case à cocher désactiver les smilies.

Reply

Sujets relatifs:

Leave a Replay

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