|
|
|
 |
|
|
 |
 |
Soru-Cevap: 45 - M. Temel Korkmaz - 28.04.2004
Belirlediğim sütunda, ıstediğim aralıktaki sadece boş olan hücreler seçilsin. |
|
|
|
|
 |
Soru - 45:
Sayın Excel Ustaları,
Benim belirlediğim (Mesela "J" Sütununda) x.
satırdan (aynı "J" sütununda) y. satıra kadar ki Range(Jx:Jk)'yı
InputBox' ı kullanarak (x. ve y. satır numaralarını kullanıcının girmesini
sağlamak için InputBox' ı kullanmak istiyorum) nasıl seçili alanda boş
hücreleri seçme işini yaptırabilirim. Ayrıca Yanlış satır no (x) girildiğinde
cancel yaptığımda program kırılmaması için ne yazmalıyım. Soruma cevap
verirseniz çok teşekkür ederim.
Cevap - 45:
Sormuş olduğunuz soruyu inanın anlayabilmek için epey
uğraştım. Belki size çok anlaşılabilir gelebilir ama, biz tabloyu görmeden sizi
gibi düşünemiyoruz. Ama yinede sanırım istediğiniz sonucu verecek olan bir
makro yazmayı başardım. İki sorunuzun cevabını aşağıdaki makroda
bulabileceksiniz.
Makronun en başında bulunan On Error Resume Next ikinci
sorunuzun cevabıdır.
Sub BoslariSec()
On Error Resume
Next
Dim x, y As Integer
x =
InputBox("x değerini gir")
y =
InputBox("y değerini de gir")
Range("A1").Clear
For Each sec In
Range("J" & x & ":J" & y)
If sec.Value =
"" Then
k = k +
sec.Address & ","
End If
Next sec
k = Mid(k, 1,
Len(k) - 1)
Range(k).Select
End Sub
|
|
|
 |
|
|
|
