Giải Pháp Excel

Liên hệ QC

Gửi email tính lương cho từng người bằng Outlook

  • 9,521
  • 19

Gửi email tính lương cho từng người bằng Outlook​


Gửi các bạn file và đoạn code để gửi email bảng lương (có đính kèm file) qua Outlook bằng Excel, rất tiện lợi cho những ai làm việc trong lĩnh vực nhân sự cũng như những ai muốn học hỏi về cách gửi mail hàng loạt từ Excel thông qua Outlook.

Ngoài ra, bạn có thể tham khảo thêm bài viết này nếu bạn dùng Lotus Note thay vì Outlook.

Mã:
Option Explicit

Sub GuiMail()
    Dim OutApp As Object, OutMail As Object
    Dim WB As Workbook, Ash As Worksheet, mailAddress As String, i As Integer, ir As Integer
    Dim Rcount As Long, FileName As String, Rnum As Long, strHeader As String, strRow As String
    On Error GoTo cleanup
    Set OutApp = CreateObject("Outlook.Application")
    Set Ash = Sheet1
    Rcount = Application.WorksheetFunction.CountA(Ash.Columns(1))
    For i = 1 To...

Cách chạy macro trong sheet bị protect

  • 9,462
  • 4
Cách chạy macro trong sheet bị protect


Khi cần chia sẻ file cho nhiều người, bạn sẽ muốn protect sheet để tránh cho các thao tác không mong muốn từ người sử dụng. Tuy nhiên, việc này cũng kéo theo macro của bạn không thể chạy được, nếu nó cần tương tác với các ô đã bị khóa. Giả sử, bạn khóa ô A1, nhưng macro của bạn cần ghi giá trị vào ô A1, do đó nó sẽ báo lỗi ngay lập tức.


36813262086_534d2f8465_b.jpg


Vậy làm cách nào để chạy macro này?


Cách thứ nhất

Một cách logic, chúng ta có thể dùng code để unprotect sheet trước, sau đó khi đoạn code bạn cần được thực hiện xong, chúng ta sẽ protect trở ngược lại.


37001268475_c358b11689_b.jpg


Như bạn thấy, cách này lập tức phát huy hiệu quả, chữ "Giaiphapexcel.com" đã được ghi vào ô A1. Tuy nhiên, cách này tiềm ẩn một rủi ro cao. Giả sử, nếu đoạn...

Ctrl + Enter và ứng dụng trong việc loại bỏ dòng trống

  • 10,035
  • 12
Ctrl + Enter và ứng dụng trong việc loại bỏ dòng trống


Bạn đã bao giờ nghe nói tới Ctrl + Enter chưa? Nếu chưa, bạn nên thử nó. Giả sử như, khi bạn nhấn Enter tại A1, thì bạn sẽ được đưa xuống dòng A2 ngay lập tức.

36805182186_f6882f57ac_o.png


Tuy nhiên, với Ctrl + Enter, bạn sẽ vẫn ở yên tại chỗ mà bạn vừa nhập giá trị, nghĩa là, nếu bạn đang ở A1, thì bạn sẽ ở yên tại đấy.

36805182036_7d075b6926_o.png


Nhưng nếu chỉ nói đến đó thì đó vẫn chưa phải tất cả sức mạnh của Ctrl + Enter. Thật sự phím tắt này thật sự hữu ích hơn những gì bạn nghĩ. Nó sẽ giúp bạn có khả năng nhập dữ liệu vào tất cả các ô mà bạn đã chọn ngay lập tức mà nếu bạn dùng Enter, bạn sẽ phải nhập từng ô một.

Ví dụ như, bạn có thể nhập nguyên một mảng hình chữ nhật cùng lúc như sau:
...

Hàm WORKDAY.INTL (Excel 2010)

  • 10,926
  • 0
[h=4]Hàm WORKDAY.INTL[/h]Trả về số sê-ri của ngày trước hoặc sau một số ngày làm việc đã xác định, với các tham số ngày cuối tuần tùy chỉnh. Tham số ngày cuối tuần cho biết những ngày nào và có bao nhiêu ngày là ngày cuối tuần. Ngày cuối tuần và bất kỳ ngày nào đã xác định là ngày lễ sẽ không được coi là ngày làm việc.

Cú pháp: =WORKDAY.INTL(start_date, days, [weekend], [holidays])

Start_date Bắt buộc. Ngày bắt đầu, được cắt cụt để trở thành số nguyên.

Days Bắt buộc. Số ngày làm việc trước hoặc sau start_date. Giá trị dương cho kết quả là một ngày trong tương lai; giá trị âm cho kết quả là một ngày trong quá khứ; giá trị 0 cho kết quả là start_date. Day-offset (đối số Days) sẽ được cắt cụt để trở thành một số nguyên.

Weekend Tùy chọn. Cho biết những ngày nào trong tuần là ngày cuối tuần và không được coi là ngày làm...
Back
Top Bottom