VBA Tanımlanan Hücre aralığının KTF lerde kullanımı?

[hsayar]

Esenlikler;

Private Sub Tabloya_Gecir_Hsr()
...............
Dim Aralik_BütçeYillari, Aralik_MaliyetYillari, Aralik_MaliPozisyonu As Range: 'Son hücre kod içinde belli olacak.

Set shT = ThisWorkbook.Sheets("TABLOM")
Set shR = ThisWorkbook.Sheets("Yil_Biloncosu")
Set AranacakAralik = shR.Range("n1:n1000")
TablomYillarSonSat = shT.Cells(65536, "b").End(3).Row '||

Set Aralik_BütçeYillari = shT.Range("A2:A" & TablomYillarSonSat)
Set Aralik_MaliyetYillari = shT.Range("b2:b" & TablomYillarSonSat)
Set Aralik_MaliPozisyonu = shR.Range("n1:n1000") 'içi/dışı?
................

BY_Sayisi = Benzersiz_Kayıtlar(Aralik_BütçeYillari, 1, False)
MsgBox BY_Sayisi

Benzersiz Kayıtlar KTF sinde ilgili Aralik_xxxx değişkenlerinin nasıl kullanabilirim?

 

[hamitcan]

Anladığım kadarıyla değişken tipini soruyorsunuz. "String" olarak tanımlayabilirsiniz diye düşünüyorum.

 

[hsayar]

hocam alakanıza teşekkür ederim kodları başka sisteme göre düzenlediğim için test edemedim ama mutlak doğrudur. saygılarımla