Range içine değişken koyma

[ik100]

Arkadaşlar Merhaba,

Daha yeni makro yazmaya başladım, bir yerde tıkandım tecrübeli arkadaşlardan yardım bekliyorum.

Problem şu:

Dim s As Integer

s = Sheets("sheet2").Range("A65536").End(xlUp).Row

Range("A1:B100,F1:F100").select

s değerine göre B100 ve F100 aralığı değişsin istiyorum.

s=30 ise aralık;

Range("A1:B30,F1:F30").select

olsun. Range içine s değişkenini nasıl koyabilirim. Program daha sonrasında grafik çizdiğinden tam istediğim aralığın seçilmesi gerekiyor.

Örnek dosya eklemeye sanırım gerek yok. Gerekirse de eklerim.

İlgilenen arkadaşlara şimdiden teşekkür ederim.

 

[omerceri]

Kod aşağıda

Range("A1:B" & s & ",F1:F" & s).Select

 

[ik100]

Çok teşekkür ederim.
Bu şekilde denemek aklıma gelmemişti.
Sağolun.