Probleme avec case

[marabane]

Slt les excelnautes !!!

voilà :

dans mon fichier joint, il ya une macro contenant des instruction case mais le problme est que je sais pas pourquoi cela ne marche pas quand il faut rendre un resultat. 🙁
Pourriez vous y jeter un coup d'oeil pour moi ? merci d'avance 🙂

 

[Cousinhub]

Re : Probleme avec case

Bonsoir,

A tout hasard

Déclare, en Public tes variables, comme ceci, en haut du module :

Public us, zone, prof, puis

Ensuite, essaie cette syntaxe :

Select Case us
    Case 1
        tour
End Select

PS, j'ai pas trop fouillé, mais je pense que tu pourrais déclarer tes variables numériques en Byte, comme ceci :

Public us As Byte, zone As Byte, prof As Byte, puis As Integer, mont As Long

 

[Catrice]

Re : Probleme avec case

Bonsoir,

Pas trop compris/regardé comment ça fonctionnait car il n'y pas de step by step pour reproduire le pb.
Mais il faut sans doute que tu rajoute :
Public puis As Integer
... au debut de ton module idem pour les autres variables

NB - tu peux ecrire :
Case 0 To 2
mont = 44560

plutot que

Case puis = 0 To 2
mont = 44560

Edit : Bonsoir bhbh

 

[marabane]

Re : Probleme avec case

Slt
merci pour vos reponses rapide.

j'ai essayer de déclarer mes variables comme vous me l'avez dit mais cela ne fonctionne toujours pas. l'affichage de la variable mont dans la feuille ne donne rien. Je suis un peu perdu je l'avoue. merci pour votre aide

 

[Catrice]

Re : Probleme avec case

Bonsoir,

Ci-joint une version relookée

 

[marabane]

Re : Probleme avec case

SLt Catrice !

Là je dois te dire : chapeau !!!

c'est super ! completement autre chose avec les tableaux. je vé relire et essayer de l'adapter pour le reste de l'opération. Je te tiens au courant.

Merci encore.

PS : le bouton pour voir le résultat ne fonctionne pas...
Oups... ça fonctionne, le bouton. Merci

 

[marabane]

Re : Probleme avec case - suite correction de Catrice

Slt les excelnautes, slt Catrice !

Je suis parti des corrections de Catrice pour etablir la suite de mon prog. J'ai beau faire cela ne marche pas. Pouvez vous SVP regarder et me dire ce qui selon vous fait que cela ne marche pas ? Merci pour votre coup de main car là je butte grave.

 

[jp14]

Re : Probleme avec case

Bonsoir

En H23 (profL = .Range("H23").Value) la cellule contient cette formule =RECHERCHE(F23;#REF!;#REF!).
Sans valeur il est difficile de trouver une erreur.

JP

 

[marabane]

Re : au secours !!! Probleme avec case, tableau completé

Slt les excelnautes, slt jp14,

C'est vrai, le tableau n'était pas complet et en le completant j'ai corrigé du coup le code. mais cela ne marche toujours pas.

Merci pour votre aide. Cela devient urgent.

 

[Catrice]

Re : Probleme avec case

Bonsoir,

si tu reviens à une solution d'execution de differents sous programmes ton code à besoin de :

Public prof, us, zone etc ....

 

[marabane]

Re : Probleme avec case

Slt CATRICE,

en fait je voulais continuer dans ta logique mais je ne savais pas comment faire avec les autres cas. Peux tu m'aider STP ?

 

[Catrice]

Re : Probleme avec case

Bonsoir,

Voilà un peu de boulot pour toi.

J'ai synthetisé.
En fait il y a une seule macro.

1) On définit les variables. Au passage quel est l'interet de gerer us et ProfL ? C'est la meme chose non ? Je crois qu'il faut supprimer ProfL

2) On définit des tableaux qui contiennent les données "montants en fonction des puissances" et selon les cas de figures. Là il faut que tu affines.

3) On calcul dans quelle catégorie on est. Ca donne i (pas la peine de le calculer 10 fois)

4) On execute le "Case" qui correspond à l'usage vehicule (anciennement "Us" que j'ai enlevé)

Il faudra voir ce qu'il faut mettre pour les Cyclomoteur, Vélomoteur, Scooter ...
A toi maintenant de remplir les Cases comme tu les veux. Je crois qu'il y a un bug aux cases 4 et 7.
Enfin, regarde (ou precise moi ce qu'il faut faire) pour supprimer ProfL

A+

 

[Roland_M]

Re : Probleme avec case

bonsoir à tous

je crois qu'il y a comme un problème car sur son fil
"Help!!! urgent SVP PB avec cet outil qui marche pas"
il y a déjà ce classeur mais un peu différent !?

je viens de lui envoyer une nouvelle version arrangée qui fonctionne !
et maintenant celle-ci !!!!!!!!!!!!!!????????????
je sais pas comment notre ami va s'y retouver !?

fichier que je lui remet ici au cas ou !?

maintenant je vais me coucher !
bonne nuit à tous !

 

[Catrice]

Re : Probleme avec case

Bonsoir Roland,

Merci pour l'info.

😕 Marabane, il ne faut pas changer de Fil si c'est la meme question !!
Quand tu rajoutes un Post, ça remonte dans la liste des Fil automatiquement ...
Tiens nous au courant de la suite ...

 

[marabane]

Re : Probleme avec case

Slt Catrice, Slt Roland M !

merci énormément pour vos réponses qui vont me permettre d'avancer considérablement !!

Excusez moi d'avoir dupliqué le fil... je me sentais un peu perdu. Excusez aussi du retard de ma reponse.

Comme j'aimerais comprendre ce que vous avez fait pour que cela marche (et compléter les cas qui manque) je vais regarder tout cela ligne par ligne. je vous dis ce sori ce qu'il en est et vous montrerai ce que j'ai fait. Merci pour votre aide si précieuse qui nous permet de mieux appréhender ces choses.

Bonne journée à vous

PS je garderai donc le fil Probleme avec case