Gửi email tự động trong excel

Liên hệ QC

NguyenVietThinh08

Thành viên chính thức
Tham gia
12/5/20
Bài viết
86
Được thích
4
Xin chào cả nhà, mình lên mạng và có hướng dẫn gửi mail tự động bằng excel thông qua outlook.
Phương pháp rất hay nhưng mình muốn mở rộng tính năng 1 chút nhưng chưa biết cách làm mong các anh em bớt chút thời gian chỉ giáo
Mình muốn nhấn vào nút gửi email thì trong emal gửi đi đính kèm 1 ảnh là phần mình đã tô vuông đó hoặc 1 sheet mới chỉ có dữ liệu phần mình đã đóng khung
Không biết có cao nhân nào làm được không ạ, giúp mình với
 

File đính kèm

  • ảnh.PNG
    ảnh.PNG
    228.1 KB · Đọc: 59
Gửi email của bạn sao không phải gửi nội dung + format như hình được à mà phải gửi kiểu dạng ảnh để làm gì nhỉ?
Nguyên nhân là nhiều người khi nhân được file ảnh sẽ dễ dàng hơn là nhận file excel, không phải công nhân viên nào cũng có máy tính để mở ra, việc mở ảnh cũng đơn giản hơn, Nhưng mà thực sự đau đầu quá, mình từ sáng cũng thử hết cách rồi,
 
Upvote 0
Nguyên nhân là nhiều người khi nhân được file ảnh sẽ dễ dàng hơn là nhận file excel, không phải công nhân viên nào cũng có máy tính để mở ra, việc mở ảnh cũng đơn giản hơn, Nhưng mà thực sự đau đầu quá, mình từ sáng cũng thử hết cách rồi,
muốn hết đau đầu không? .... quay về bài #39
 
Upvote 0
Nguyên nhân là nhiều người khi nhân được file ảnh sẽ dễ dàng hơn là nhận file excel, không phải công nhân viên nào cũng có máy tính để mở ra, việc mở ảnh cũng đơn giản hơn, Nhưng mà thực sự đau đầu quá, mình từ sáng cũng thử hết cách rồi,
Không bạn ơi,Ý của mình là gửi cái nội dung đó như 1 phần nội dung của email
Chứ k phải đính kèm ảnh hay file (vì nhiều lúc mạng kém load nội dung email nhanh hơn là load 1 cái ảnh)
 
Upvote 0
Xin chào cả nhà, mình lên mạng và có hướng dẫn gửi mail tự động bằng excel thông qua outlook.
Phương pháp rất hay nhưng mình muốn mở rộng tính năng 1 chút nhưng chưa biết cách làm mong các anh em bớt chút thời gian chỉ giáo
Mình muốn nhấn vào nút gửi email thì trong emal gửi đi đính kèm 1 ảnh là phần mình đã tô vuông đó hoặc 1 sheet mới chỉ có dữ liệu phần mình đã đóng khung
Không biết có cao nhân nào làm được không ạ, giúp mình với
Bài toán cũng đơn giản mà. Thử đơn giản vầy đi. Nếu Ok thì tự edit lại nhé.
Mã:
Sub ExcelRangeToMailBody()
Range("A5:F17").CopyPicture
With CreateObject("Outlook.Application")
   With .CreateItem(0)
      .To = "A"
      .Subject = "B"
      .Display
   End With
   .ActiveInspector.WordEditor.Application.Selection.Paste
End With
End Sub
PS: File của bạn chẳng khoa học tí nào
 
Upvote 0
Web KT
Back
Top Bottom