Mise en couleur cellule sur autre feuille

Re,

Une autre approche :

Ça marche quelque soit la taille et le nombre de tableaux. Il faut juste que ça commence à partir de la cellule C5 (modifiable dans la macro).

Attention, dans ton fichier, il y a des chiffres doublons (notamment les couples 41.50, 26.50...), est-ce normal ? Que faire dans ce cas-là ?

Merci

juste des erreurs de frappe dans mon tableau

ça fonctionne impeccable.

Bravo , vous êtes un Chef du vba

ça ne serais que moi je vous passe Modérateur.

Bonjour

ça ne serais que moi je vous passe Modérateur

Et pourquoi pas? Sébastien...?

Gabinos, tu as raison, parce que moi, je suis notoirement inacceptable en VBA, mais, je dois pouvoir faire autrement (juste par curiosité car Myta va encore lever les bras au ciel)

Cordialement

21couleur-cellule.zip (39.02 Ko)

Bonsoir le Forum

Bonsoir Amadéus .

Vous êtes déjà au top, à voir vos posts,

et la vous avez mis la cerise sur le gâteau.

avec ce nouveau fichier...

Mais un coup de pouce sur une personne avec de grandes connaissances comme vba-new

moi je suis pour une promo , " c'est quand même un service Gratis " et qui prend du temps.

SEBASTIEN aller un effort , des bons éléments ont n'en trouve pas tout les jours, il a le droit de passer derrière le rideau , une expression connu sur d'autre site

Myta ma bien aider dans divers demande.

Alors je vote pour le deux

Bonne soirée le forum

-- Sam Aoû 06, 2011 7:31 am --

Bonjour à tous

Avec le fichier fournis par vba-new

pour modifier les données

val1 c8 c'est ok je peux les modifier

val2 d8 c'est ok je peux les modifier

la valeur NB case e8 la ça bloque si je la modifie ?

avez vous une solution ?

merci d'avance

Bonjour à tous !

Merci pour toutes ces fleurs

Mais passer Modérateur n'est pas du tout mon objectif. Pas pour l'instant en tout cas...je suis encore trop jeune

gabinos a écrit :

la valeur NB case e8 la ça bloque si je la modifie ?

qu'est-ce qui bloque ? Peux-tu expliciter gabinos ?

Bonjour;

voila si je veux transformer la donner Nb case [E8] en par exemple cellule ab300

pour l'adapter a mes donner d'une autre feuille ça ne répond pas

Ah ok.

Il faut également modifier le code de la feuil2. Remplace la procédure Worksheet_Change par celle-ci :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, [AB300]) Is Nothing Then
        Call colorie
    End If
End Sub

Ce code signifie qu'on lance la macro colorie que si la cellule [AB300] est modifiée.

Bonjour

Pas pour l'instant en tout cas...je suis encore trop jeune

Eh! le jeunot! Merci de me rappeler que je ne le suis plus...

Je plaisante bien sur.

Bonne journée

Salut Amadéus !

C'est toi qui tourne ma phrase en ta défaveur

Une phrase équivalente alors :

Pas pour l'instant en tout cas...je ne suis pas assez mature

C'est peut-être moins violent ?

Edit Amadéus: Mais non, je n'y ai vu aucun sens négatif..c'est juste pour plaisanter et nous changer de la morosité des infos que me distille la radio en ce moment

me revoila

je te joint le fichier modifier

je n'est pas réussi , je suis un vrais novice en vba

50couleur-cellule.zip (41.98 Ko)

Fais un clic droit sur l'onglet de la feuil2 et clique sur visualiser le code et fais le remplacement préconisé plus haut.

Dans le module1, enlève la procédure Worksheet_Change. Ça devrait le faire.

réponse

c'est ok ça fonctionne

Merci une fois de plus " le vba c'est rapide parfait mais quelle galère quand on si connais pas"

-- Sam Aoû 06, 2011 10:22 am --

je reviens a la charge

sur la dernière version tout fonctionne parfaitement

une option en demande

si la cellule réponse qui est manuel E20 , je la passe en résultat automatique des cellules C20:D20

E20 serais un résultat des 2 cellules demandées.

que faut 'il faire.

Merci d'avance

J'avais pas vu ta nouvelle demande.

gabinos a écrit :

si la cellule réponse qui est manuel E20 , je la passe en résultat automatique des cellules C20:D20

E20 serais un résultat des 2 cellules demandées.

Cela signifie que si tu modifies une des 2 cellules C20, D20, cela te lance la macro colorie.

Dans ce cas, tu remplaces la procédure Worksheet_Change par celle-ci :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, [C20:D20]) Is Nothing Then
        Call colorie
    End If
End Sub

Bonjour le Forum;

Alors malgrès que tu est encore Jeune

Je vais quand même dire Merci Grand Chef du VBA

Bonjour a tous

SVP:

Une modification à faire sur précèdent fichier joint de VBA-NEW

dans cette dernière modification du fichier joint , qui fonctionne très bien

a modifier;

si valeur est supérieur à 8 changer la couleur en bleu clair qui remplace la couleur rouge

Merci d'avance

Bonjour,

Je cherche sur le forum une solution quasi similaire. Mais je n'arrive pas à faire fonctionner celle-ci?

Je veux faire la même chose mais avec plusieurs valeurs sur deux colonnes mais plusieurs lignes

donc les traiter les unes après les autres.

Si vous recevez un avis de suivi, je suis prêt à joindre un fichier exemple.

Cordialement et merci d'avance de votre retour

Rechercher des sujets similaires à "mise couleur feuille"