Excel 中 判断单元格中有没有值，其后把有值的单元格复制为图片

Excel 中 判断单元格中有没有值，然后把有值的单元格复制为图片
如题 ， 下面的那个数字9 是我人为设置的，到第10行是没有值的，如何要让电脑来自己判读到哪行有值，然后这再执行复制为图片格式 ，是不是应该写个 
Sheets("Master Mix").Select
    Range("A1:J9").Select
    Selection.Copy
    Sheets("Sheet3").Select
    ActiveWindow.SmallScroll Down:=-3
    Range("A1").Select
    ActiveSheet.Pictures.Paste.Select
    
    ActiveWorkbook.Save
[解决办法]
如果仅仅是判断A10没值的话就这样
range("A10").value=""
[解决办法]
range(cells(1,1),cells(1,1).end(xldown))