hücre renklendirme

[yuksel kay]

meraba,
aşağıdaki kodda hücrenin boyanmasına x,y hücresinden başlayıp Cells(k + 10, j) hücresindeki değer kadar artırarak Cells(x, y - 1 + Cells(k + 10, j)) hücresine kadar boyamasını istyoruz. fakat hata veriyor.
For k = 1 To is_sayisi
For j = 1 To makine_sayisi
Range(Cells(x, y), Cells(x, y - 1 + Cells(k + 10, j))).Interior.ColorIndex = 5


y = y + Cells(k + 10, j + 1)
x = x + 1
Next j
b = b + 1
Next k

 

[Korhan Ayhan]

Selamlar,

Oluşturduğunuz döngüde x ve y değişkenlerini kullanmışsınız ama bu değişkenlere değer atamamışsınız. Sanırım hatayı bu sebeple alıyorsunuz. Eğer örnek dosya ekleyip nasıl bir işlem yapmak istediğinizi açıklarsanız mutlaka yardımcı olacak arkadaşlarımız çıkacaktır.