Kiểm tra sự tồn tại của một Sheet() và viết công thức SUM trong VBA

[mr.hoang3365]

Chào các bạn!
Nhân dịp năm mới mình chúc GPE và các thành viên của GPE một năm mới an khang thịnh vượng, tràn ngập tiếng cười hạnh phúc và khám phá thật nhiều lý thú về khoa học, công nghệ!

Mình chỉ mới tham gia vào diễn đàn chỉ khoảng hơn 1 tháng nay nhưng mình thấy nhiều thông tin thật bổ ích từ diễn đàn. Đặc biệt các là việc ứng dụng chương trình Excel vào các công việc và quá trình học tập.

Mình lang thang trên diễn đàn và đã chỉnh sửa một đoạn code để tra định mức từ Sheet(DM24) và copy vào Sheet(PT) sau đó điền công thức tra đơn giá vào cột Đơn giá và cột Thành tiền. Trong quá trình lập có một số nội dung mình muốn tham khảo ý kiến của các bạn và nhờ các bạn giúp đỡ:
(1) Kiểm tra sự tồn tại của Sh(DM24) nếu không tồn tại thì chương trình thông báo để người dùng biết;
(2) Tại cột Đơn giá và Thành tiền trong Sh(PT) mình nhập công thức có code là "=sum(R1]C[0]:R[j]C[0])" (trường hợp này j thay đổi tùy theo loại định mức) nhưng chương trình báo lỗi.
file://D:\PTDG.xls