Notice
Recent Posts
Recent Comments
목록RANGE (1)
rand(life)
[vba] 셀범위를 html형식으로 변환하여 이메일보내기
출처는 아래에. Option Explicit Sub SendEmailWithrRange() Const olMailItem = 0 Dim rngToSend As Range, r As Range Dim FileName As String, FileName2 As String Dim strHtml As String Set rngToSend = Selection strHtml = RangeToHTML(rngToSend) With Sheets("address") For Each r In .Range("a1", .Cells(Rows.Count, "a").End(xlUp)) With CreateObject("Outlook.Application").CreateItem(olMailItem) .To = r.Value .Su..
컴퓨터/엑셀
2019. 8. 2. 15:42