Khám phá đỉnh cao tri thức cùng Gitiho qua hành trình học tập được thiết kế tỉ mỉ và toàn diện. Với kho
tàng lộ trình đa dạng, chuyên sâu trên mọi lĩnh vực, chúng tôi sẽ đồng hành cùng bạn khai phá tiềm năng,
chinh phục thách thức và khẳng định giá trị bản thân. Mỗi hành trình đều được nghiên cứu công phu, tạo
nên bước đệm vững chắc để bạn tự tin bứt phá và tỏa sáng trên con đường phát triển sự nghiệp."
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất
cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Khi chèn vào và bấm chạy đoạn code, thì nó lại chạy luôn cả cột Tổng. XIn cho biết nguyên nhân. Đây là đoạn code của minh Sub SapXep_TenNV() ' ' SapXep_TenNV Macro ' ' ' Range("A2:I16").Select Dim DongCuoi As Long DongCuoi = Sheets("YeuCau1").Range("C"...
Chào a, nhờ a giúp với. Mình đang làm code Advanced Filter ở Sheet Filter. Tuy nhiên mãng dữ liệu để lọc lại đang định dạng "Table" nên Code không hiểu nên ko chạy được. Vinh gửi File, mong được hướng dẫn cách xử lý. Cảm ơn nhiều lắm ạ.
Thầy cho 2 hỏi là e muốn viết tiếp dòng code đưa wb 3 vao wb 4 nhưng kêt quả hiện lên bị mất dữ liệu đã đưa vào trc đó của wb 2. Dòng code này đang sai ở đâu ạ Sub LayDuLieu_03() Workbooks("Book4").Sheets("Data").Range("A2:C4").Value = _ Workbooks("Book1").Sheets("Sheet1").Range("A2:C4").Value...
Chào Thầy , Đoạn Code sau đây đã cho kết quả theo ý muốn của người dùng rồi. Nó linh hoạt theo tùy biến mỗi khi user thay đổi ngày của danh mục calendar Var End_CDKH_FN02 = Var Beg_CDKH_DB00 = CALCULATE(Sum(CDKH[du_no00]),DATESYTD(Our_Calendar[Date])) Var Beg_CDKH_CR00...
trong bài này cho em hỏi 2 câu ạ: 1) Phần tọa độ "dong_BD", "dong_KT" có code nào xác định luôn trong vba không ạ ? 2) Nếu in ra pdf có cách nào để đặt tên file tự động ko ạ, vì mỗi file mỗi đặt tên thủ công rất mất công?
Cho mình hỏi với ạ, mình có 2 file là file book 1 và book 2. Nếu tại ô A1 của sheet 1 book2 mình ghi tên của book 1. Mình viết code ở book 2 để đóng file book 1 như này thì lỗi ở đâu ạ? Dim tenfile As String tenfile = ThisWorkbook.Worksheets("Sheet1").Range("A1").Value...