Bonjour a vous toutes et tous
je suis en train de transformer ce petit programme
plage de cellule D4:E1000 dedans des P ou NP
En C4 :
=SI(D4=E4;"";(SI(D4="p";$A$3;(SI(E4="P";$A$3;(SI(D4="np";"NP";(SI(E4="NP";"NP";"
"))))))))) "paiement D4 chq E4 espc ou non payé"
en A3 xx¤
en C2 :=NB.SI(D4:E1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"P");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(EE4:E1000;"P");$A$3) "compte les espc"
quel est la methode pour empecher (par formule ou VBA) de ne pas ecrire
la meme chose dans D4 ou E4
en VBA on peut avoir un msgbox mais par formule !
d'autre part j'ai mis ce code dans feuille1 pour alerter si C2 >49
par clignotement
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([C2], Target) Is Nothing And Target.Count = 1 Then
If [C2] > 49 Then Clignote "C2", 10
End If
End Sub
Sub Clignote(c, nb)
couleuractuelle = Range(c).Interior.ColorIndex
For n = 1 To nb
ActiveSheet.Range(c).Interior.ColorIndex = 1
Fin = Timer + 0.5
Do While Timer < Fin: DoEvents: Loop
ActiveSheet.Range(c).Interior.ColorIndex = couleuractuelle
Fin = Timer + 0.5
Do While Timer < Fin: DoEvents: Loop
Next n
End Sub
et il ne fonctionne pas
merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
h2so4
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
"eneric" wrote in message news:
Bonjour a vous toutes et tous je suis en train de transformer ce petit programme plage de cellule D4:E1000 dedans des P ou NP En C4 : =SI(D4ä;"";(SI(D4="p";$A$3;(SI(E4="P";$A$3;(SI(D4="np";"NP";(SI(E4="NP";"NP";" "))))))))) "paiement D4 chq E4 espc ou non payé" en A3 xx¤ en C2 :=NB.SI(D4:E1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"P");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(EE4:E1000;"P");$A$3) "compte les espc" quel est la methode pour empecher (par formule ou VBA) de ne pas ecrire la meme chose dans D4 ou E4 en VBA on peut avoir un msgbox mais par formule ! d'autre part j'ai mis ce code dans feuille1 pour alerter si C2 >49 par clignotement Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect([C2], Target) Is Nothing And Target.Count = 1 Then If [C2] > 49 Then Clignote "C2", 10 End If End Sub Sub Clignote(c, nb) couleuractuelle = Range(c).Interior.ColorIndex For n = 1 To nb ActiveSheet.Range(c).Interior.ColorIndex = 1 Fin = Timer + 0.5 Do While Timer < Fin: DoEvents: Loop ActiveSheet.Range(c).Interior.ColorIndex = couleuractuelle Fin = Timer + 0.5 Do While Timer < Fin: DoEvents: Loop Next n End Sub et il ne fonctionne pas merci
-- eneric
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3
codes ?
PE : payé en espèces
PC : payé par chèque
NP : non payé
"eneric" <eneric.v@cegetel.net> wrote in message
news:mn.1aa67d725c3403c8.51150@cegetel.net...
Bonjour a vous toutes et tous
je suis en train de transformer ce petit programme
plage de cellule D4:E1000 dedans des P ou NP
En C4 :
=SI(D4ä;"";(SI(D4="p";$A$3;(SI(E4="P";$A$3;(SI(D4="np";"NP";(SI(E4="NP";"NP";"
"))))))))) "paiement D4 chq E4 espc ou non payé"
en A3 xx¤
en C2 :=NB.SI(D4:E1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"P");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(EE4:E1000;"P");$A$3) "compte les espc"
quel est la methode pour empecher (par formule ou VBA) de ne pas ecrire la
meme chose dans D4 ou E4
en VBA on peut avoir un msgbox mais par formule !
d'autre part j'ai mis ce code dans feuille1 pour alerter si C2 >49
par clignotement
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([C2], Target) Is Nothing And Target.Count = 1 Then
If [C2] > 49 Then Clignote "C2", 10
End If
End Sub
Sub Clignote(c, nb)
couleuractuelle = Range(c).Interior.ColorIndex
For n = 1 To nb
ActiveSheet.Range(c).Interior.ColorIndex = 1
Fin = Timer + 0.5
Do While Timer < Fin: DoEvents: Loop
ActiveSheet.Range(c).Interior.ColorIndex = couleuractuelle
Fin = Timer + 0.5
Do While Timer < Fin: DoEvents: Loop
Next n
End Sub
et il ne fonctionne pas
merci
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
"eneric" wrote in message news:
Bonjour a vous toutes et tous je suis en train de transformer ce petit programme plage de cellule D4:E1000 dedans des P ou NP En C4 : =SI(D4ä;"";(SI(D4="p";$A$3;(SI(E4="P";$A$3;(SI(D4="np";"NP";(SI(E4="NP";"NP";" "))))))))) "paiement D4 chq E4 espc ou non payé" en A3 xx¤ en C2 :=NB.SI(D4:E1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"P");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(EE4:E1000;"P");$A$3) "compte les espc" quel est la methode pour empecher (par formule ou VBA) de ne pas ecrire la meme chose dans D4 ou E4 en VBA on peut avoir un msgbox mais par formule ! d'autre part j'ai mis ce code dans feuille1 pour alerter si C2 >49 par clignotement Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect([C2], Target) Is Nothing And Target.Count = 1 Then If [C2] > 49 Then Clignote "C2", 10 End If End Sub Sub Clignote(c, nb) couleuractuelle = Range(c).Interior.ColorIndex For n = 1 To nb ActiveSheet.Range(c).Interior.ColorIndex = 1 Fin = Timer + 0.5 Do While Timer < Fin: DoEvents: Loop ActiveSheet.Range(c).Interior.ColorIndex = couleuractuelle Fin = Timer + 0.5 Do While Timer < Fin: DoEvents: Loop Next n End Sub et il ne fonctionne pas merci
-- eneric
eneric
eneric à dit
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp et trouver ce nbre
-- eneric
eneric à dit
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3
codes ?
PE : payé en espèces
PC : payé par chèque
NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp
et trouver ce nbre
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp et trouver ce nbre
-- eneric
eneric
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
je vais m'ymettre
merci
-- eneric
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification,
par exemple
PE : payé en espèces
PC : payé par chèque
NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
je vais m'ymettre
merci
-- eneric
eneric
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification,
par exemple
PE : payé en espèces
PC : payé par chèque
NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000
car je ne peux pas supp une des 2 colonnes
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
h2so4
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
"eneric" wrote in message news:
eneric à dit
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp et trouver ce nbre
-- eneric
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification,
par exemple
PE : payé en espèces
PC : payé par chèque
NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
"eneric" <eneric.v@cegetel.net> wrote in message
news:mn.1bef7d72ac1ba76b.51150@cegetel.net...
eneric à dit
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec
3 codes ?
PE : payé en espèces
PC : payé par chèque
NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp
et trouver ce nbre
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
Comme il n'y a qu'une seule colonne, plus besoin de prévoir une vérification
"eneric" wrote in message news:
eneric à dit
bonjour,
ne serait-ce pas plus simple si tu n'avais qu'une seule colonne mais avec 3 codes ?
PE : payé en espèces PC : payé par chèque NP : non payé
je ne pense pas
je dois recuperer uniquement les totaux chq et esp et trouver ce nbre
-- eneric
h2so4
bonsoir,
c'est sans doute une réponse à ta question initiale : tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" wrote in message news:
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
bonsoir,
c'est sans doute une réponse à ta question initiale :
tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" <eneric.v@cegetel.net> wrote in message
news:mn.1c327d72b5b5df63.51150@cegetel.net...
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle
codification, par exemple
PE : payé en espèces
PC : payé par chèque
NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000
car je ne peux pas supp une des 2 colonnes
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" wrote in message news:
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
eneric
eneric à dit
bonsoir,
c'est sans doute une réponse à ta question initiale : tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" wrote in message news:
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
merci je viens de reprendre le fil j'etudie tout cela demain je prefererais faire une macro qui me fusionne les 2 cell adjacentes sur les 1000 lignes et avec une codification sur 3 criteres merci
-- eneric
eneric à dit
bonsoir,
c'est sans doute une réponse à ta question initiale :
tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" <eneric.v@cegetel.net> wrote in message
news:mn.1c327d72b5b5df63.51150@cegetel.net...
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle
codification, par exemple
PE : payé en espèces
PC : payé par chèque
NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit"
en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq"
en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000
car je ne peux pas supp une des 2 colonnes
-- eneric
merci je viens de reprendre le fil
j'etudie tout cela demain
je prefererais faire une macro qui me fusionne les 2 cell adjacentes
sur les 1000 lignes et avec une codification sur 3 criteres
merci
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
"eneric" wrote in message news:
eneric à dit
Je me suis sans doute mal exprimé.
Tu fais de D et E un seule colonne, et tu définis une nouvelle codification, par exemple
PE : payé en espèces PC : payé par chèque NP : non payé
en C2 :=NB.SI(D4:D1000;"<>") "compte le nbre d'inscrit" en D3 =PRODUIT(NB.SI(D4:D1000;"PC");$A$3) "compte les chq" en E3 =PRODUIT(NB.SI(D4:D1000;"PE");$A$3) "compte les espc"
il faut que je monte une macro pour fusionner les cellules
D4 E4 jusqu'a D1000 E1000 car je ne peux pas supp une des 2 colonnes
-- eneric
merci je viens de reprendre le fil j'etudie tout cela demain je prefererais faire une macro qui me fusionne les 2 cell adjacentes sur les 1000 lignes et avec une codification sur 3 criteres merci
-- eneric
h2so4
"eneric" wrote in message news:
eneric à dit
bonsoir,
c'est sans doute une réponse à ta question initiale : tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
merci je viens de reprendre le fil
j'etudie tout cela demain je prefererais faire une macro qui me fusionne les 2 cell adjacentes sur les 1000 lignes et avec une codification sur 3 criteres merci
bonsoir,
en F tu auras la fusion des 2 colonnes, avec la détection d'erreur. Tu corriges les erreurs, puis tu peux copier/coller F4:F1000 (valeur, collage special) en D4 par exemple.
"eneric" <eneric.v@cegetel.net> wrote in message
news:mn.24be7d7206bf885a.51150@cegetel.net...
eneric à dit
bonsoir,
c'est sans doute une réponse à ta question initiale :
tu crées une nouvelle colonne F àmettre en F4 et à recopier jusqu'en
F1000
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
merci je viens de reprendre le fil
j'etudie tout cela demain
je prefererais faire une macro qui me fusionne les 2 cell adjacentes
sur les 1000 lignes et avec une codification sur 3 criteres
merci
bonsoir,
en F tu auras la fusion des 2 colonnes, avec la détection d'erreur. Tu
corriges les erreurs, puis tu peux copier/coller F4:F1000 (valeur, collage
special) en D4 par exemple.
Le message #NON VALABLE# est affiché en F si Det E sont remplis.
merci je viens de reprendre le fil
j'etudie tout cela demain je prefererais faire une macro qui me fusionne les 2 cell adjacentes sur les 1000 lignes et avec une codification sur 3 criteres merci
bonsoir,
en F tu auras la fusion des 2 colonnes, avec la détection d'erreur. Tu corriges les erreurs, puis tu peux copier/coller F4:F1000 (valeur, collage special) en D4 par exemple.
