Excel vba mid fonksiyonu çalışmıyor

[vterzioglu]

Merhaba Arkadaşlar.
Yazdığım kodu gönderiyorum. "mid" fonksiyonda

Compile error. can't find project or Library

Hatası veriyor.

Yardım lütfen
Kod:
adres = ekran3.foto_adres.Caption
index1 = Len(adres)
adres2 Mid(adres, 2, index1)

 

[veyselemre]

adres2= Mid(adres, 2, index1)

 

[Korhan Ayhan]

Merhaba,

Yazım hatası var gibi..

adres2 [COLOR="Red"]=[/COLOR] Mid(adres, 2, index1)

 

[vterzioglu]

Öncelikle teşekkür ediyorum. Bu sayfaya aktarırken "=" ifadesi çıkmamış. Ama "mid" fonksiyonuna hata veriyor.

 

[veyselemre]

Kodlarda başka bir sıkıntı vardır.

 

[Korhan Ayhan]

"adres" değişkeni bir değer alıyor mu? Onu kontrol ediniz.

 

[vterzioglu]

Merhabalar. Yardım için yzan arkadaşlarıma teşekkür ediyorum. Hata olarak "Compile error" veriyor. Verdiği mesaj " Can't find project or Library"
Teşekkür ederim

 

[Korhan Ayhan]

Hata veren dosyanızı paylaşırsanız kontrol etme şansımız olabilir.