[VBA-E] objet specifique introuvable

Version imprimable

Voir 40 message(s) de cette discussion en une page

22/01/2007, 10h44
Pierre Fauconnier

Citation:

Envoyé par CIBOOX

EN FAIT G RENOMMER TOUTE MES COMBOBOX EN COMMENACANT PAR CBOX
EX CBOX1,CBOX2,CBOX3,ETC....
et ça marche toujours pas :help:

Si tu veux que l'on t'aide... pourrais-tu:
1. arrêter de renommer continuellement tes objets, car il est malaisé de comprendre ton code au vu des différentes versions proposées?
2. expliquer EN FRANCAIS ce que tu souhaites réaliser?

Il est souvent plus aisé de tester un code sur un petit fichier de test (une ou deux feuilles, deux ou trois combos,...) pour bien comprendre le fonctionnement d'une procédure. Après, une fois que tu as intégré la technique, tu reportes sur ton fichier de travail et tu étends à l'ensemble de tes contrôles...

VBA est d'un abord assez simple, mais il y a quand même quelques bases à bien posséder avant de quitter le port et de naviguer vers des codes plus complexes...
22/01/2007, 12h11
Pierre Fauconnier

Citation:

Envoyé par ouskel'n'or

J'ai jeté un oeil : Les noms de tes combos sont en minuscules, la première lettre en majuscule
Dans ta lignetu dois respecter la casse. Je pense que le marsupial avait raison
...

VBA ne différencie pas la casse pour les noms des contrôles. Il n'y a donc pas de problème à nommer un contrôle CoMbObOx1 et à utiliser ensuite

Code:

controls("combobox1")=...

Je pense pour ma part que le problème vient du fait que notre "ami" modifie les noms de ses contrôles "au petit bonheur" sans adapter tout son code (cfr mon dernier message).
22/01/2007, 12h18
AlainTech

Mais qu'est ce que c'est que ce chipotage sur la casse des contrôles???

Si un contrôle existe, il peut être tapé avec n'importe quelle casse et VBE adaptera le "texte" en fonction du nom réel du contrôle.

De grâce, utilisez les facilités de l'intellisense. Je me force à toujours taper en minuscule dans VBE alors que tous mes contôles et variables contiennent au moins une majuscule. De cette façon, je vois immédiatement si un nom est mal orthographié (les majuscules ne sont pas corrigées).
22/01/2007, 12h23
ouskel'n'or

:oops:

Citation:

Envoyé par Mais oui, Alain,

Je me force à toujours taper en minuscule dans VBE alors que tous mes contôles et variables contiennent au moins une majuscule. De cette façon, je vois immédiatement si un nom est mal orthographié.

C'est sans doute pourquoi je n'ai jamais eu ce problème et que j' mé fourvoyé :cry:
Je suis qu'un pauv' gars donc faillible, faut pas tout me casser, je suis assez fragile :mouarf:
22/01/2007, 12h26
Pierre Fauconnier

Bonjour Alain,

Merci de venir à mon secours.

Tu utilises la même technique que moi. Tous mes controles et toutes mes variables sont nommées avec au moins une majuscule et je les saisis toujours en minuscules pour une vérification visuelle immédiate...

Le problème se trouve ailleurs, mais tant que notre questionneur modifiera le nom de ses contrôles "sans raison apparente", il aura un code brouillon qui plantera inévitablement à un moment ou à un autre.

Il y a ici un exposé sur les conventions de nommage, pour ceux que cela intéresse.

Bonne journée
22/01/2007, 12h27
Pierre Fauconnier

Citation:

Envoyé par Ouskel'n'or

Je suis qu'un pauv' gars donc faillible, faut pas tout me casser, je suis assez fragile

On a pitié... On ne tapera pas :aie: :aie: :aie: Promis :D
22/01/2007, 12h35
Pierre Fauconnier

Citation:

Envoyé par CIBOOX

EN FAIT G RENOMMER TOUTE MES COMBOBOX EN COMMENACANT PAR CBOX
EX CBOX1,CBOX2,CBOX3,ETC....
et ça marche toujours pas :help:

Dans le fichier que tu as donné sur le site, il n'y a pas de contrôle nommé combobox4, donc il y a forcément plantage.

Tu dois absolument vérifier les noms de tous tes contrôles et t'assurer que la suite n'est pas interrompue comme c'est le cas ici. Alors, tu pourras itérer sur les contrôles sans avoir de problèmes.

C'est à toi de jouer...

bonsoir
apres avoir verifie tout mes codes et autre libelles voici ou je bug

Code:

1
2
3
4
5
6
7
8
9
10
11
12
    
Sub InitCombo(NoLigne, NoColonne)
Dim NomCombo As String
Dim Plage As String
Sheets("bd").Activate
    Plage = Range(Cells(3, NoColonne), Cells(NoLigne, NoColonne)).Address
    NomCombo = "Cbox" & NoColonne
    With GRILLE.Controls(NomCombo)
        .Text = Cells(1, NoColonne) ici en mode f8 
        .RowSource = Plage
    End With
End Sub

QUE FAIRE ?

22/01/2007, 20h05
SilkyRoad

bonsoir

Citation:

QUE FAIRE ?

Si tu as toujours le message d'erreur:

Citation:

erreur d' execution -2147024809( 80070057)
objet specifique introuvable

Vérifie de nouveau le nom des ComboBox ... (Cbox1 ...)

bonne soirée
michel
22/01/2007, 20h18
CIBOOX

OUI faisant F8 avec le curseur de la souris

Code:

With GRILLE.Controls(NomCombo)

alors nomcombo=cbox1 :P en fin il prend la bonne appelation mais j'ai encore le meme message d'erreur.:aie:
22/01/2007, 20h31
ouskel'n'or
Essaie ça
Code:

1 2 3 4 5 Set LeCombo = GRILLE.Controls(NomCombo) With LeCombo .Text = Cells(1, NoColonne).value 'j'ai ajouté ça .RowSource = Plage End With
Tu dis
A+

PS - Il me semble que j'ai déjà eu ce pb dans l'utilisation directe de Controls(...) Tu es dans quelle version (scuse si tu l'a déjà dit)
23/01/2007, 11h07
CIBOOX

merci mais avec le nouveau code ça deconne je revois tous mes codes.....;)
24/01/2007, 12h26
CIBOOX

Desole Pour La Faute D Ecriture

MERCI A TOUS POUR VOTRE AIDE

mon probleme est résolu !!!!!!!
la faille c'etait que j' avais ecris cbox01 au lieu de cbox1 dans ma formule :oops: :oops:

maintenante je tape que en minuscule :mouarf: :mouarf: :mouarf:
24/01/2007, 12h53
AlainTech

Citation:

Envoyé par CIBOOX

maintenante je tape que en minuscule :mouarf: :mouarf: :mouarf:

J'espère que tu as compris qu'il faut nommer tes variables (Dim) et contrôles avec, au moins, une majuscule pour "voir" si ce que tu tapes est correct quand tu y fais appel.

Voir 40 message(s) de cette discussion en une page