Hücre seçmek

[emregunduz]

for x=1 to 10

range("B&x:C&x").Select

next


yazınca seçmiyor. Burada anlaşışdığı gibi x=1 için B1:C1 hücrelerini seçmesini istiyorum. Nerede hata yapıyorum.?

Teşekkürler.

 

[Emir Hüseyin Çoban]

. . .

for x = 1 to 10
range("b" & x & ":c" & x).select
next

. . .

 

[emregunduz]

Range("F" & x & ":G" & x).Select
With Selection
.MergeCells = True
.HorizontalAlignment = xlcentre
.VerticalAlignment = xlcentre
.Font.Bold = True
End With

Boyle bir düzenleme de Runtime error 1004
range sınıfının Horizontal Alignment özelliği kurulamıyor hatası veriyor. Burada hatam nedir?

 

[Korhan Ayhan]

Merhaba,

Amacınız nedir açıklarsanız daha hızlı yardım alabilirsiniz.

 

[emregunduz]

örneğin F1:G1 hücresini önce birleştirmek, birleşmiş yeni hücreyi yatay ve dikey ortalatmak ve font olarak bold olmasını sağlamak

 

[Korhan Ayhan]

Merhaba,

Aşağıdaki gibi deneyin.

Sub Makro1()
    With Range("F1:G1")
        .Font.Bold = True
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .Merge
    End With
End Sub

 

[emregunduz]

teşekkür ederim.