Listelemede "User defined type not defined" hatası

[meleklerim]

TABLO sayfasına bağlı AnaListe adında bir listwiev var. Kodu çalıştırdığımda koyu renkli alan sarı zeminde "User defined type not defined" hatası alıyorum.
nerede hata yapıyor olabilirim? LISTE adı yerine başka isimler de denedim. İlk satırı Dim X, LISTE As Integer olarak da değiştirdim. Çare olmadı

Private Sub ANALISTELE()
Dim X As Integer
Dim LISTE As ListItem
SS = WorksheetFunction.CountA(Worksheets("TABLO").Range("A:A"))
AnaListe.ListItems.Clear
For i = 2 To SS
X = X + 1
Set LISTE = AnaListe.ListItems.Add(, , Worksheets("TABLO").Cells(i, 1).Value)
LISTE.SubItems(1) = Worksheets("TABLO").Cells(i, 2).Value
Next i
Set LISTE = Nothing
End Sub

 

[cems]

deneyin , oyle sanıyorum ki listwiew kullanıyor ama değişken tanımlamıyorsunuz.


Private Sub ANALISTELE()
Dim X As Integer
Dim LISTE As MSComctlLib.ListItem
Dim SS As Long
Dim i As Long

SS = WorksheetFunction.CountA(Worksheets("TABLO").Range("A:A"))
AnaListe.ListItems.Clear

For i = 2 To SS
X = X + 1
Set LISTE = AnaListe.ListItems.Add(, , Worksheets("TABLO").Cells(i, 1).Value)
LISTE.SubItems(1) = Worksheets("TABLO").Cells(i, 2).Value
Next i

Set LISTE = Nothing
End Sub

ListView Kontrolünü Ekleme: Eğer ListView kontrolü formunuza eklenmemişse, Toys menüsünden veya araç kutusundan ListView kontrolünü formunuza eklemeyi unutmayın.

 

[meleklerim]

yine aynı satırda aynı hatayı verdi. Kontrollerle ilgili sanırım. ancak araç kutusuna sağ tıkladıyıp kontrol ekle dediğimde herhangi bir şey çıkmıyor. Hiç hareket yok. araçlar menüsünden referanslar dedğimde de ekli ressimdekiler var. aşağıda listwiev ile ilgili birşey bulamadım.

 

[cems]

Bir fikir oneremiyorum zira sisteminizde MSComct2.ocx olmayabilir yada çalışmıyor olabilir. Bu eski tip bir kütüphane ve Microsof sitesinde bulmak zor olabilir, ucuncu taraf yerlerde de buldugunuz uyum sorunu da yapabilir ve kaş yaparken göz hasarı gelişebilir. Bu dosyayı bulsanız da register etme doğru yapılmalı.
Bu yuzden olmayan dosyanın verdiği sorun hakkında daha fazla fikir vermek yerine konuyu cok iyi blen ustalara ve hocalara kalemi bırakmak benim için en doğru seçenek olacak.

Bu arada dosyanızı incelemek de istenebilir, ozel bilgi olmayan bir kopya, sorunu anlamak için ideal olacaktır