2016-03-28 18 views
2

SelectManyFiles işlevinde seçtiğim bir dosya koleksiyonum var ve koleksiyon işlevinde her bir Çizim üzerinde birden çok özel alt çalıştırmak istiyorum. İşte benim kodum:VBA Koleksiyonla Döngü

Döngüde bir sorun var ama tam olarak emin değilim! Herhangi bir yardım takdir edilir.

+0

Yani bunun işe yarayıp yaramadığını bilmiyor musunuz? Denediğiniz ve bilmediğiniz başka bir kodunuz var mı? –

+0

Bu işe yaramıyor. Gerekli nesne hatası veriyor. – GhostTiger

+0

"Çizimler" in türü nedir? "Koleksiyon" sınıfı sayılabilir mi? –

cevap

2

SelectManyFiles tarafından döndürülen koleksiyon, bir nesne koleksiyonunu döndürmüyor. Muhtemelen Dizgilerden oluşan bir koleksiyona dönüyor, ama bu sadece bir tahmin. Altınızı bu değere değiştirin. Debug.Print'in size ne verdiğini görün. Eğer herhangi bir skaler (string, long, double, Boole, vb.) Ise, Drawing Variant olarak bildirmeniz gerekir. Sadece tüm koleksiyon öğeleri nesne ise Nesne kullanabilirsiniz.