ارور در اجرای ماکرو
با عرض سلام و خداقوت خدمت تمامی دوستان محترم
پس از اجرای ماکرو ، در فرآیند اجرا، خط های زیر بعنوان ارور زرد میشوند ، ممنون میشم اگر بزرگواری در خصوص احتمالات این ارورها راهنمایی بفرمایند:
k1 = Application.WorksheetFunction.CountA(Sheet1.Range( "1:1")) + 1
k2 = Application.WorksheetFunction.CountA(Sheet2.Range( "1:1")) + 1
Z1 = Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row + 1
Z2 = Sheet2.Cells(Sheet2.Rows.Count, "A").End(xlUp).Row
پس از اجرای ماکرو ، در فرآیند اجرا، خط های زیر بعنوان ارور زرد میشوند ، ممنون میشم اگر بزرگواری در خصوص احتمالات این ارورها راهنمایی بفرمایند:
k1 = Application.WorksheetFunction.CountA(Sheet1.Range( "1:1")) + 1
k2 = Application.WorksheetFunction.CountA(Sheet2.Range( "1:1")) + 1
Z1 = Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row + 1
Z2 = Sheet2.Cells(Sheet2.Rows.Count, "A").End(xlUp).Row
کامنت