كود vba دالة for next لتلوين خلال في رينج معين

 

كود vba  دالة for next لتلوين خلال في رينج معين

 dim x as integer 

For x = 1 to 20
If cells (x, 1) = "" then
cells(x,1).interior.color = 65535
end if
next x