Range Ve Worksheets Kullanımları Hakkında

Range Ve Worksheets Kullanımları Hakkında - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Range Ve Worksheets Kullanımları Hakkında (/konu-range-ve-worksheets-kullanimlari-hakkinda.html)

Sayfalar: 1 2

Range Ve Worksheets Kullanımları Hakkında - Oğuz Türkyılmaz - 14/05/2021

Herkese iyi bayramlar.

Aşağıda 1.satırdaki kod ile aktif Excel sayfasında satır ve sütun koordinatlarını vererek belirli bir alanı seçebiliyorum. Fakat aynı işlemi aktif olmayan lokasyon sayfasında gerçekleştiremedim. Yani aktif olmayan Excel sayfasında belirli bir alanı nasıl seçebilirim. Kodu nasıl revize etmeliyim. Teşekkürler.

Kod:

Sub kordinat()



     Range(Cells(1, 8), Cells(3, 2)).Select



         'Worksheets("LOKASYON").Range("B3:D9").Select



         'Worksheets("LOKASYON").Cells(3, 9).Select



End Sub

RE: Range Ve Worksheets Kullanımları Hakkında - berduş - 14/05/2021

ThisWorkbook.Sheets("LOKASYON").Activate

ActiveSheet.Range(Cells(1, 8), Cells(3, 2)).Select

şeklinde dener misiniz?

RE: Range Ve Worksheets Kullanımları Hakkında - Oğuz Türkyılmaz - 14/05/2021

@berduş hocam teşekkür ederim bu konuda 2 sorum olacak.

1- Bu kodu tek satırda yazmanın yolu var mı?
2- Hücre aralıklarını değilde sadece 2 hücreyi nasıl seçtirebilirim. resimdeki c3 ve h1 gibi.

[Resim: do.php?img=11035]

RE: Range Ve Worksheets Kullanımları Hakkında - berduş - 14/05/2021

1 - tek satırlık kod
kesikli aralıklar için

Application.Goto ThisWorkbook.Sheets("LOKASYON").Range("B37,D9:f11,g7,s5:t7")

sürekli aralık için

Application.Goto ThisWorkbook.Sheets("LOKASYON").Range(Cells(1, 8), Cells(3, 2))

2 -

ThisWorkbook.Sheets("LOKASYON").Activate

ActiveSheet.Range("c3,h1").Select

hatta bir kaç farklı aralık yada bağımsız hücre seçmek için : ve , kombinasyonları kullanabilirsiniz

ActiveSheet.Range("B37,D9:f11,g7,s5:t7").Select

RE: Range Ve Worksheets Kullanımları Hakkında - feraz - 14/05/2021

Birde union var.
Union(range("a:a"),range("c:c").select gibi belki yanlışlık yapmış olabilirim , ve ; yerinde.

Re: Range Ve Worksheets Kullanımları Hakkında - Oğuz Türkyılmaz - 14/05/2021

@berduş ve @feraz hocalarım teşekkürler.
Aşağıdaki kodda hücrelere değer atamak nasıl mümkün olur.
.value = değer yazdığımda hata veriyor. (Tüm Hücrelere aynı değeri vereceğim)

Kod:

Application.Goto ThisWorkbook.Sheets("LOKASYON").Range("B3:D7,D9:f11,g7,s5:t7")