Probleme de Private Sub Worksheet_Change

bONJOUR

Effectivement, les calculs ne doivent se faire que si un "X" ou "A" se présentent en colonne K

ainsi; les colonnes où il doit y avoir une formule, / N S T V W Y/ on doit avoir ""

Pour le Np/ab = non estnum dans les colonnes Pqr : ça marche => "" stvwy

merci

Zbig

Bonsoir BAnzai64.

Pourquoi ma formule en V ne fonctionne-t-elle pas?

Si "X" en K alors ""en V

idem en S

Merci

Zbig

Salut le forum

Et si tu nous montrait la fameuse formule.

Mytå

Bonjour

A voir

Bonjour Banzai64, Myta

Utilisation du dernier fichier de Banzai64

feuille bep

Maintenant en colonne K, la valeur IN ne renvoie plus "" en Y

En fait si valeur "A"en K => 0 (zero) en Y

Si "IN" ou "" => "" en Y

Si X =calcul de toutes les formules en N S T V W Y.

si valeur non estum en P/Q/R alors "" en s t v w et Y=valeur de N

merci

Zbig

Bonjour

Tout ce que tu expliques ce n'est qu'un problème de formule et pas de macro

Modifies les formules

zbig a écrit :

Si "IN" ou "" => "" en Y

Testes si K = "IN" ou K = ""

zbig a écrit :

Si X =calcul de toutes les formules en N S T V W Y.

Testes si K = "X" alors ""

zbig a écrit :

si valeur non estum en P/Q/R alors "" en s t v w et Y=valeur de N

Teste si P/Q/R est numérique alors S/T/V/W = "" et Y=N

Bonjour

j'ai réussi. la 1ere feuille est ok maintenant

merci

Zbig

Bonjour BAnzai64, forum

j'ai réussi mes 3 feuilles résults

1/Quelle macro permettrait de mettre les écritures dans les lignes en couleur rose si "F" est dans colonne Sexe et couleur bleu si sexe=G ?

pour les 3 feuilles

2/ dans la feuille stats, il y a un problème de #valeur que je n'arrive pas résoudre.

j'ai vérifié les noms, le nombres de cellules sans résultat pour l'instant.

Merci

Zbig

Bonjour

A voir

Bonsoir

les couleurs de textes (selon condition) n'apparaissent pas sur aucune des feuilles.

merci

Zbig

Bonsoir

zbig a écrit :

les couleurs de textes (selon condition) n'apparaissent pas sur aucune des feuilles.

Le rose et le bleu apparaissent bien

Ou alors je n'ai pas compris ce qu tu veux dire

Bonjour

ils n'apparaissaient pas sur ma version (excel 2003?)

tout restait en noir.

Cependant si je crée une ligne ou si je refrappe la lettre du sexe, la couleur se met correctement

merci

Zbig


Bonjour

si je supprime les valeurs g et f, (en les sélectionnant toutes)

j'ai un message d'erreur qui apparait : erreur execution 13

si je le fais une par une :ras

merci

Zbig

Bonjour

zbig a écrit :

Cependant si je crée une ligne ou si je refrappe la lettre du sexe, la couleur se met correctement

C'est lors de la modification de cette case que la couleur d'écriture est mise en place

zbig a écrit :

si je supprime les valeurs g et f, (en les sélectionnant toutes)

j'ai un message d'erreur qui apparait : erreur execution 13

Rajoutes en début de macro

Private Sub Worksheet_Change(ByVal Target As Range)
Dim HeurNum As String
Dim HeurHeur As String
Dim LongSaisie As Integer

'les colonnes avec du vert clair en fond
 If Target.Count > 1 Then Exit Sub
    If Not Intersect(Range("C:C,G:G,H:H,K:K,M:M"), Target) Is Nothing And Target.Interior.ColorIndex = 35 Then

Bonjour

ça fonctionne bien.

merci

Zbig

Bonsoir

merci

Zbig

Bonsoir

zbig a écrit :

le problème c'est que les chronos ne se mettent plus en mm:ss quand on tape 000.

Pas ce problème

Si je tapes 000 dans une colonne Infos Chronos j'ai comme résultat 00:00 dans l'affichage de la cellule et 00:00:00 dans la barre de formule

Bonsoir

cela m'a fait ça à un moment (!) et puis après avoir cliqué sur le bouton ,

j'ai remis les chronos et ça a fonctionné!

bizarre

merci

Zbig

Rechercher des sujets similaires à "probleme private sub worksheet change"