Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 =DECALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "=DECALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 =DECALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "=DECALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en reto ur le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se trouv er
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dérou lante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la for mule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1 ))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add xlValidateLis t,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante d éduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER (choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur Cells( j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pco l &
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en retour
le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel
il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de de finir choix1
en tant que nom de champs avec la formule DECALER à l'intérieur?????? ??
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas g érer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en re tour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dér oulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans exc el
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première li ste
déroulante qui contient les noms, qui se trouvent dans la feuil le
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la f ormule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z $1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECAL ER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & P col
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de de finir choix1
en tant que nom de champs avec la formule DECALER à l'intérieur?????? ??
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas g érer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180602452.250288.236...@h2g2000hsg.googlegroups.com...
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" <r...@freesurf.fr> wrote:
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en re tour
le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes dér oulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans exc el
il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 =DECALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première li ste
déroulante qui contient les noms, qui se trouvent dans la feuil le
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la f ormule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "=DECALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z $1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECAL ER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & P col
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de de finir choix1
en tant que nom de champs avec la formule DECALER à l'intérieur?????? ??
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas g érer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en re tour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes dér oulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans exc el
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première li ste
déroulante qui contient les noms, qui se trouvent dans la feuil le
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la f ormule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z $1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECAL ER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " & P col
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180602452.250288.236...@h2g2000hsg.googlegroups.com...
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" <r...@freesurf.fr> wrote:
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : > > > Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertSto p,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" a écrit dans le message de news:
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" wrote:Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux p as
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur???? ????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes d éroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feu ille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'! $Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulan te
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DEC ALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pco l & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertSto p,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180612826.888146.255...@o5g2000hsb.googlegroups.com...
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" <r...@freesurf.fr> wrote:
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux p as
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur???? ????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180602452.250288.236...@h2g2000hsg.googlegroups.com...
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" <r...@freesurf.fr> wrote:
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes d éroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 =DECALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feu ille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "=DECALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'! $Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulan te
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DEC ALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="=DECALER(choix2;1;EQUIV(Cells(" & j & ", " & Pco l & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertSto p,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" a écrit dans le message de news:
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" wrote:Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux p as
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur???? ????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne : =
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes d éroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première liste
déroulante qui contient les noms, qui se trouvent dans la feu ille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'! $Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulan te
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DEC ALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pco l & "-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast. com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.co m-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" a écrit dans le message de news:
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" wrote:Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux
pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne :Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes
déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première
liste
déroulante qui contient les noms, qui se trouvent dans la
feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la
formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol &
"-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180612826.888146.255...@o5g2000hsb.googlegroups.com...
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" <r...@freesurf.fr> wrote:
Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux
pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180602452.250288.236...@h2g2000hsg.googlegroups.com...
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" <r...@freesurf.fr> wrote:
Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180595658.324703.284...@k79g2000hse.googlegroups.com...
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" <r...@freesurf.fr> wrote:
je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne :
Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180547111.496568.238...@q69g2000hsb.googlegroups.com...
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" <r...@freesurf.fr> wrote:
Théoriquement c'est toute la ligne 1 de paramètres listes
déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1180544905.409924.62...@m36g2000hse.googlegroups.com...
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" <r...@freesurf.fr> wrote:
Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première
liste
déroulante qui contient les noms, qui se trouvent dans la
feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la
formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol &
"-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je suis allé un peu vite pour choix 1 ça marche mais pour :
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop,
Operator:=xlBetween, Formula1:=x
avec
x = "=offset(choix2,1,match(Cells(" & j & ", " & k &
"),choix1,0)-1,counta(offset(choix2,,match(Cells(" & j & ", " & k &
"),choix1,0)-1))-1)"
ça me fait une erreur de compil lors du Add
"JB" a écrit dans le message de news:
La seconde liste utilise le nom de champ 'Choix1'.
JB
On 31 mai, 12:57, "Thierry" wrote:Cela a l'air de marcher mais je ne m'explique pas pourquoi je ne peux
pas
définir choix1 en VBA. Pour que ça marche j'ai été obligé de definir
choix1
en tant que nom de champs avec la formule DECALER à l'intérieur????????
J'ai compris pourquoi il me mettait l'erreur valeur. Quand je mettais la
formule DECALER dans une cellule si j'ai plus de 1 nom il ne sait pas
gérer
car la cellule n'était pas en mode liste. Avec une seul nom a mettre il
n'y
a pas de problème.
En tout cas merci pour ta patience qui je l'avoue humblement est très
grande, devant mes erreurs de novice.
:) :) :)
"JB" a écrit dans le message de news:
http://cjoint.com/?fFlgDVah1V
JB
On 31 mai, 10:14, "Thierry" wrote:Je prefere tout coder en VBA.
Je dois avoir un problème sur mes feuilles cela m'arrive souvant et je
suis
obliger à chaque fois de tout recommencer.
La ce n'est pas qu'un problème VBA puisque meme en formule j'ai en
retour
le
problème de valeur
"JB" a écrit dans le message de news:
Bonjour,
Voici des listes en cascade sans VBA.
Pourquoi VBA?
http://cjoint.com/?fFjnb7Y6Vg
JB
On 31 mai, 08:22, "Thierry" wrote:je n'y arrive pas et je ne comprends rien
Si tu veux jeter un oeil :http://cjoint.com/?fFiszkD35O
les listes se trouvent dans la feuille liste, le resultat doit se
trouver
dans la feuille janvier. Le code VBA se trouve dans Modules BarreCRA
Sub
Majcollab() dans la donnée choix1.
Le mot de passe pour le classeur et le code vba = Roto
lorsque je veux faire la formule pas à pas avec excel il me donne :Decaler(Listes!A1;;;;NBVAL(Listes!1:1)) Mais j'ai toujours l'erreur
"JB" a écrit dans le message de news:
Ce que j'ai compris:
http://cjoint.com/?fEtSOzljws
JB
On 30 mai, 19:25, "Thierry" wrote:Théoriquement c'est toute la ligne 1 de paramètres listes
déroulante
(mais
actuellement je n'en ai que 2) . Quand je teste la formule dans
excel
il
me
retourne #Valeur!
"JB" a écrit dans le message de news:
La définition du nom me semble curieuse:
La liste est en A1:Z1?
Choix1 ÞCALER($A$1;;;;NBVAL($A$1:$H$1))
JB
On 30 mai, 17:52, "Thierry" wrote:Bonjour,
J'ai deux problèmes :
-Le premier est celui la : je dois initialiser ma première
liste
déroulante qui contient les noms, qui se trouvent dans la
feuille
'Paramètres Listes déroulantes'. Pour cela j'ai trouvé la
formule
suivante
que j'appelle choix1 (Pour l'instant je n'ai que 2 noms)
choix1 = "ÞCALER('Paramètres Listes
déroulantes'!$A$1;;NBVAL('Paramètres
Listes déroulantes'!$A$1:'Paramètres Listes déroulantes'!$Z$1))"
Puis je fais : Cells(j, (Pcol - 1)).Validation.Add
xlValidateList,
Formula1:=choix1
Le resultat dans la cellule est N/A, je ne comprends pas.
- Le second est celui qui correspond à la liste déroulante
déduite
de
la
première liste je dois mettre cette formule : Cells(j,
Col).Validation.Add
xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(B2;choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(B2;choix1;0)-1))-1)".
Pour que cela marche chez moi je dois remplacer B2 la valeur
Cells(j,
Pcol -
1). J'ai fait cela :
Cells(j, Col).Validation.Add xlValidateList,
Formula1:="ÞCALER(choix2;1;EQUIV(Cells(" & j & ", " & Pcol &
"-
1);choix1;0)-1;NBVAL(DECALER(choix2;;EQUIV(Cells(" & j & ", " &
Pcol
&
"-
1);choix1;0)-1))-1)"
ca ne marche pas non plus.
n'étant pas très fort de ce côté la ...........
:)
Merci
--
Ne pas répondre à l'adresse anti-spam.
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 17:52:35
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:18:03
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 30/05/2007 19:25:10
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 07:21:54
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 08:22:50
avast! - copyright (c) 1988-2007 ALWIL
Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:11:10
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 10:14:57
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:16:55
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 12:57:38
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:22:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000746-0, 30/05/2007
Analyse le : 31/05/2007 15:24:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -