Gitiho contest

Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.

Lộ trình học tập

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."

Chương trình hội viên Gitiho

Gói Hội viên Gitiho: Trọn bộ khoá học theo Khung năng lực

480+ khóa học

15 Danh mục theo kỹ năng, ngành nghề

Năng lực Lõi, Năng lực Chuyên môn, Năng lực Bổ trợ, Năng lực Quản lý

Khám phá ngay

2000+ đã đăng ký

Gói Hội viên G-Skills: 03 kỹ năng bổ trợ thiết yếu

83 khóa học Tin học văn phòng

85 khóa học Kỹ năng mềm

29 khóa học Ngoại ngữ

Khám phá ngay

500+ đã đăng ký

Gitiho for leading business

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.

Đã được tin tưởng sử dụng bởi các doanh nghiệp

  1. Trang chủ
  2. Hỏi đáp
  3. Trang chủ
  4. Hỏi đáp
Nguyễn thị thu hà
Nguyễn thị thu hà
Thảo luận 8 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 176 lượt xem

khi tham gia lớp học có nhsóm z hoặc kênh nào tương tác giải đáp những vấn

khi tham gia lớp học có nhsóm zalo hoặc kênh nào tương tác giải đáp những vấn đề về VBA không ạ


Thảo luận 8 câu trả lời
Lượt xem 176 lượt xem
Vỗ tay vỗ tay
Chia sẻ
Nguyễn thị thu hà 09:07 - Jul 28, 2021

Chào bạn sẽ có nhóm facebook bạn nhé, nhóm zalo hiện tại gitiho không triển khai bạn nhé.

Vỗ tay vỗ tay
Nguyễn thị thu hà 23:08 - Aug 03, 2021

chào thầy, cho mình hỏi vậy tìm cột cuối như thế nào ạ?

Vỗ tay vỗ tay
Nguyễn thị thu hà 09:08 - Aug 04, 2021

Chào bạn bạn xem bài viết sau nhé

https://gitiho.com/blog/vba-8211-huon...

Vỗ tay vỗ tay
Nguyễn thị thu hà 17:08 - Aug 26, 2021

Em đang có phần code mà bình thường chạy không sao nhưng chạy ở máy khác thì không được cũng chưa hiểu vì sao vậy chuyên gia có thể giải đáp giúp em hoặc có nhóm nào để hỏi được không ạ

Vỗ tay vỗ tay
Nguyễn thị thu hà 17:08 - Aug 26, 2021
Sub Sendemail()
Dim OL As Object 'Outlook.Application 'ung dung outlook
Dim OLmail As Object
Dim body_mesage As String
Dim i, so_nguoi_nhan As Integer   'la bien chay de gui email cho tung nguoi

    Set OL = CreateObject("Outlook.Application")
    so_nguoi_nhan = Excel.WorksheetFunction.CountA(ThisWorkbook.Sheets(1).Range("B:B"))
    
    For i = 3 To so_nguoi_nhan

        Set OLmail = OL.CreateItem(olMailItem) 'goi ung dung email
        With Excel.WorksheetFunction
             body_mesage = ThisWorkbook.Sheets(1).Cells(3, 10)
             body_mesage = .Substitute(body_mesage, "Ten_CT", ThisWorkbook.Sheets(1).Cells(i, 2))
        End With
'gui mail
        With OLmail
             .To = ThisWorkbook.Sheets(1).Cells(i, 4)   '2 nguoi, neu can nhieu hon bao e fix thanh join array
             .Subject = ThisWorkbook.Sheets(1).Cells(4, 10)
             .BodyFormat = olFormatHTML
             .HTMLBody = body_mesage
             .Attachments.Add ThisWorkbook.Path & "\GUI MAIL\" & ThisWorkbook.Sheets(1).Cells(i, 8)
             .Send
        End With
        
    Next
End Sub






Vỗ tay vỗ tay
Nguyễn thị thu hà 17:08 - Aug 26, 2021
đoạn code trên em không hiểu lõi ở đâu mà không thể fix được ạ'
Vỗ tay vỗ tay
Nguyễn thị thu hà 14:08 - Aug 27, 2021

Có 2 vấn đề bạn cần kiểm tra:

1. Kiểm tra xem outlook trên máy tính hoạt động bình thường không. Vì code liên quan tới việc gửi mail thông qua outlook là 1 ứng dụng bên ngoài.

2. Kiểm tra đường dẫn ThisWorkbook.Path & "\GUI MAIL\" và tên file ở vị trí ô ThisWorkbook.Sheets(1).Cells(i, 8) => xem có chính xác không (đưa sang máy tính khác có thể đường dẫn đã thay đổi.

Vỗ tay vỗ tay
Nguyễn thị thu hà 10:08 - Aug 28, 2021

2 nội dung trên thì em kiểm tra vẫn bình thường ạ. 

Vỗ tay vỗ tay
Câu hỏi liên quan
Thầy cho hỏi cú pháp để đếm dòng đầu thì như thế nào ạ?
Thầy giáo có thể giúp mình viết code tìm ngày cuối tháng của tháng đã nhập trong 1 ô ( ví dụ trong ô A1 ghi là 5) thì mình muốn viết code cho biến ngày cuối của tháng 5?
Thầy có thể hướng dẫn cách thêm dòng vào dưới dòng cuối với đầy đủ các tính năng (ví dụ như checkbox và các công thức liên quan đến checkbox này) như tại dòng cuối?
Em chào thầy ạ ! Thầy cho em hỏi Code để Select một vùng ô ngẫu nhiên có chứa dữ liệu của một sheet bất kỳ với ạ. Em đã có xem qua Bài giảng về Code tìm Dòng cuối, cũng như có tham khảo thêm về Code tìm Cột cuối (như bên dưới) ạ,...
thầy ơi sao của em bị báo lỗi thê này ạ
e muố tìm dòng cuối của 1 cell ma k đc, thầy giúp e coi sai ở đâu ạ?
Hi thầy em ví dụ trong trường hợp Ô neu C7 chưa nhập giá trị thì Vba sẽ báo lỗi . Mình viết code thế nào thầy . Cảm ơn thầy
em muốn giấu code để ng khác k làm hỏng code hoặc có cách nào đặt pass để mở code k ạ?
Cho mình hỏi nếu muốn Excel tìm dòng cuối theo chiều từ trên xuống thì viết code như nào ạ
Scroll Top Top

Hỗ trợ khách hàng

VỀ GITIHO

hợp tác và liên kết

Tải App Gitiho

Kết nối với chúng tôi

Địa chỉ văn phòng: Phòng 302, Tầng 3, Tòa nhà Tây Hà, KĐT mới Phùng Khoang, Phường Thanh Xuân, Thành phố Hà Nội
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông