Incompatibilité de type erreur 13 ?

[Cougar]

Bonjour,

J'ai cette erreur et je ne sais pas comment la corriger.

Pouvez-vous m'aider ?

Voir fichier joint.

Merci

 

[Efgé]

Re : Incompatibilité de type erreur 13 ?

Bonjour Cougar

Dans la Private Sub ComboBox1_Change()
change ta déclaration:
Dim tablo As Variant

Cordialement

 

[ROGER2327]

Re : Incompatibilité de type erreur 13 ?

Bonjour Cougar

Dans la procédure ComboBox1_Change, tablo ne doit pas être déclaré comme entier.
Déclarez

Dim tablo As Variant

ou simplement

Dim tablo

Bonne journée.


ℝOGER2327
#7583

Mardi 24 Absolu 142 (Saints Rakirs et Rastrons, porte-côtelettes - fête Suprême Quarte)
10 Vendémiaire An CCXXIII, 5,1917h - cuve
2014-W40-3T12:27:36Z


Bonjour Efgé.

 

[Dranreb]

Re : Incompatibilité de type erreur 13 ?

Bonjour.

Normal : tablo est déclaré comme variable élémentaire As Integer, or vous cherchez à lui affecter un tableau Variant retourné par la fonction ChercheVan. J'ajoute que même en déclarant, toujours localement, tablo() As Variant dans ComboBox1_Change, je ne vois pas bien ce que ça pourrait donner, vu que la procédure se termine aussitôt après…

 

[Cougar]

Re : Incompatibilité de type erreur 13 ?

Bonjour à tous,

Fonctionne très bien

Merci