Autres Erreur 438

[rdaniel]

bonjour, sur ce forum j'ai pu utiliser un fichier Excel concernant des données météo, fournie par Tapiack, qui génère une erreur 438 sous certaine version office; 2010 par exemple... Si vous connaisse la solution a cette erreur , je suis intéressé par une solution.
Cordialement
Daniel

 

[Calvus]

Bonjour,

Et ça la génère où cette erreur... ?
C'est un peu comme si tu nous disais : "il pleut ici..."
On a envie de te répondre : "oui ? où ça ?"

A+

 

[rdaniel]

Bonjour Calvus , c'est vrai, d'autant qu'il faut très beau en ce moment, .... bêtement je croyais que toute la discussion concernant cette erreur était jointe a ma question... dans un premier temps voici le lien du fichier Excel Téléchargement de Météo_Json.xlsm fournis par Tapiack .

Sous office 2010 (que je n'ai plus en ce moment et que je regrette souvent... ) l'erreur 438 arrive a cet endroit:

Au passage j'ai vu qu'il y avait d'autres discussions sur cette erreur 438 qui semble liée à Excel 2010, après je n'ai pas assez de compétence en vba pour les exploiter. Pour contourner cette erreur j'utilise office 2016 mais son interface ne me convient pas et je regrette 2010.
Merci de t’intéresser à ce problème.
cordialement
Daniel

 

[Calvus]

Bonjour,

Désolé, je ne peux pas t'aider car pas de problème chez moi.

Quelqu'un d'autre va probablement le faire.

A+

 

[rdaniel]

Bonjour,

Désolé, je ne peux pas t'aider car pas de problème chez moi.

Quelqu'un d'autre va probablement le faire.

A+

Merci pour ta réponse, quelle est ta version d'office et ta version de operating system ?
Cordialement Daniel

 

[Calvus]

Bonjour,

Oh ! moi je suis né en 1767, ma version est Excel 1807, appelée communément 2007 chez vous..

 

[rdaniel]

Bonjour,

Oh ! moi je suis né en 1767, ma version est Excel 1807, appelée communément 2007 chez vous..

1767 , tu as connu louis 16 !! 😀 sinon la version 2007 ne pose pas de pb avec ce fichier , juste 2010

 

[Calvus]

Bonjour,

1767 , tu as connu louis 16 !! 😀

Oui, il ne m'a pas écouté, il en a perdu la tête... 😉

 

[Hasco]

Bonjour,

J'ai 2010 et en mettant ThisWorkBook.Sheets(1) cela ne l'a pas fait à la seconde ouverture du classeur.
Au pire si ça ne marche toujours pas remplacer 1 par le nom de la feuille entre guillemets.

Sub Init_Combo(Optional x As Byte)
    With ThisWorkbook.Sheets(1).ComboBox1
        .List = Array(1, 2, 3, 6, 12)
        .ListIndex = 0
    End With
End Sub

P.S. Brest où il fait toujours beau est la ville de mon enfance.

A+

 

[rdaniel]

merci, je vais essayer cela... des que je vais avoir le temps de deinstaller 2016 et remettre 2010...

 

[rdaniel]

Et sinon l'origine de cette erreur; un bug spécial Office 2010 ?
cordialement
Daniel
(Brest où il fait toujours beau ? Hummmm ?)

 

[Calvus]

(Brest où il fait toujours beau ? Hummmm ?)

La pluie fait des ravages sur les bretons ! Ils en perdent tout sens de la réalité ! 😀 😀 😉

 

[Hasco]

Re,

La pluie fait des ravages sur les bretons ! Ils en perdent tout sens de la réalité ! 😀 😀 😉

Il fait toujours beau, même quand il pleut. Mais çà faut être breton pour le comprendre🙂🙂😉

 

[Calvus]

Re,

Merci de ne pas avoir dit qu'en Bretagne il ne pleut que sur les cons...
Pour les autres, hein ! Car moi je n'ai jamais vu de pluie en Bretagne 😉

 

[Dranreb]

Bonsoir.
Essayez With ThisWorkbook.Sheets(1).OLEObjects("ComboBox1").Object juste pour voir si ça marcherait, si vous tenez absolument à chercher cette feuille dans la collection Sheets, mais c'est sûr que ce serait plus simple d'utiliser l'objet Worksheet de la rubrique Microsoft Excel Objet qui assume directement dans VBA le représentation de cette entité de l'application hôte, les éléments ActiveX implantés dedans y étant directement connus aussi.