range içerisinde değişken kullanımı

[öğrtm]

Selection.Range("A3:L" & Sheets(ad).Range("c1048576").End(3).Row).Borders.LineStyle = xlContinuous

iyi akşamlar yukarıdaki kodla tablomun adreslerini belirliyorum ve çizimi gerçekleştiriyorum.çalışmamın daha esnek olmasını sağlamakiçin L sütunu sayac+3 değişkenime atamak istiyorum fakat yukarıdaki adrese bir türlü uyarlayamadım.acaba mümkünmü değil yoksa birleştirme ve tırnak işaretlerinimi yanlış yerde kullanıyorum.mesela ben şöyle yaptım olmadı:

Selection.Range("A3:sayac+3" & Sheets(ad).Range("c1048576").End(3).Row).Borders.LineStyle = xlContinuous

yardımcı olursanız teşekkür ederim

 

[Orion1]

Range(Cells(3, "A"), Cells(Sheets(ad).Range("c65536").End(3).Row, sayac + 3)).Borders.LineStyle = xlContinuous

 

[öğrtm]

teşekkürler

evren bey ilgi ve alakanız için teşekkür ederim.iyi akşamlar

 

[Orion1]

evren bey ilgi ve alakanız için teşekkür ederim.iyi akşamlar

Rica ederim.
İyi geceler.

 

[öğrtm]

adres ve değiken

Range("A4:B53,D4:L53") arkadaşlar bu kod bir çalışmamın içerisinde ve şuan iş görüyor.benim yapmak istediğim sonsat değişkeni 53 (b53 ile l53 teki) satır no yerine,sayac+6 değikenide de L sütunu yerine gelecek .bu konuya benzer bir sorunum dün evren bey tarafından çözüldü.dün ki örnekten yola çıkarak birşeyler denedim ama olmadı yardımlarınızı bekliyorum.

 

[Orion1]

Aşağıdaki kod işiniz görür.

adr1 = Range(Cells(4, "A"), Cells(sonsat, "B")).Address
adr2 = Range(Cells(4, "D"), Cells(sonsat, sayac + 6)).Address
Range(adr1 & "," & adr2).Value

 

[öğrtm]

evren bey birkez daha çok teşekkür ediyorum.kod işimi gördü.address kalıbınıda bundan sonraki çalışmalarımda kullanabileceğim galiba.iyiki varsınız....iyi akşamlar

 

[Orion1]

evren bey birkez daha çok teşekkür ediyorum.kod işimi gördü.address kalıbınıda bundan sonraki çalışmalarımda kullanabileceğim galiba.iyiki varsınız....iyi akşamlar

Rica ederim.
İyi çalışmalar.

 

[öğrtm]

iyi günler;

Cells(i, sayac + 5).Formula = "= product(sayac*5) "
sayac değişkeni ile 5 rakamının çarpımı #AD? hatası veriyor neden olabilir .yardım ederseniz sevinirim.

 

[hsayar]

iyi günler;

Cells(i, sayac + 5).Formula = "= product(sayac*5) "
sayac değişkeni ile 5 rakamının çarpımı #AD? hatası veriyor neden olabilir .yardım ederseniz sevinirim.

Cells(i, sayac + 5).Formula = "= product(Cells(i, sayac)*5) "
HERHALDE BÖYULE BİR ŞEY OLMALI

 

[öğrtm]

Cells(i, sayac + 5).Value = sayac * 5 şeklinde hallettim

sayın hsayar yazdığınız kod hata verdi.problemi Cells(i, sayac + 5).Value = sayac * 5şeklinde hallettim.ilgi ve alakanız için teşekkürler.