<php _e('Click to Call','call-now'); ?>

0764222218

Microsoft Excel, Lập Trình VBA

Tự tạo hàm mới trong Excel

Đã đăng bởi admin
Tự tạo hàm mới trong Excel
30
Oct

Trong Excel có rất nhiều hàm được xây dựng sẵn. Thế nhưng nó vẫn không đủ đáp ứng nhu cầu công việc. Câu hỏi đặt ra là: Có cách nào để tạo hàm mới trong Excel hay không? Trả lời: Không những có mà còn đơn giản nữa nhé.

Cú pháp tạo hàm mới trong Excel

Cú pháp:

Function Tên_hàm (Biến_1 As Kiểu_dữ_liệu, Biến_2 As Kiểu_dữ_liệu…) As Kiểu_dữ_liệu

    Nhóm lệnh thực thi

    Tên_hàm = Giá trị trả về

End Function

Để tra các Kiểu_dữ_liệu, bạn có thể  tham khảo bài Kiểu dữ liệu – Data Type.

Các bước tạo hàm mới trong Excel

      1. Alt+F11 để mở VBA.
        Alt+F11 để mở cửa sổ VBA
        Alt+F11 để mở cửa sổ VBA
      2. Insert Module
        Chèn Module mới
        Chèn Module mới
      3. Chèn code tạo hàm vào Module
Các hàm tự tạo trong Excel
Các hàm tự tạo trong Excel

Một số ví dụ về các hàm tự tạo:

Tạo hàm tính trung tổng hai số

Hàm tính tổng 2 số yêu cầu phải có 2 biến đầu vào là 2 con số thuộc kiểu dữ liệu số thực (hoặc có thể là số nguyên) và kết quả trả về cũng sẽ là số thực (hoặc có thể là số nguyên tùy vào biến đầu vào). Vậy Function sẽ được viết như sau:

Function TONG_HAI_SO(Num1 As Double, Num2 As Double) As Double
    TONG_HAI_SO = Num1 + Num2
End Function

Đây cũng là một phần nhỏ của  Bài 2 – Điền dữ liệu hàng loạt theo nhiều điều kiện  của khóa học Lập Trình VBA Cơ Bản. Khóa học này sẽ giúp bạn nâng cao hiệu suất làm việc lên 300%-500%.

Sử dụng hàm TONG_HAI_SO trong Excel:

TONG_HAI_SO1
TONG_HAI_SO

Tạo hàm lấy tên của ActiveSheet

Trong Excel, ta cũng có thể lấy được tên sheet nhưng phải kết hợp nhiều hàm phức tạp. Khi sử dụng VBA, ta có thể tạo ra hàm để lấy tên của ActiveSheet một cách rất đơn giản như sau:

Function TEN_ACTIVESHEET() As String
    TEN_ACTIVESHEET = ActiveSheet.Name
End Function

Sử dụng hàm TEN_ACTIVESHEET trong Excel:

TEN_ACTIVESHEET
TEN_ACTIVESHEET

Tạo hàm lấy tên ActiveWorkbook

Function TEN_ACTIVEWORKBOOK() As String
TEN_ACTIVEWORKBOOK = ActiveWorkbook.Name
End Function

Sử dụng hàm TEN_ACTIVEWORKBOOK trong Excel:

TEN_ACTIVEWORKBOOK
TEN_ACTIVEWORKBOOK

Video hướng dẫn chi tiết  cách tạo hàm mới trong Excel

Tài liệu đính kèm

Các bạn có thể tải file đính kèm ngay tại đây: File Thực Hành

Link dự phòng: File Thực Hành

Truy cập các bài viết về Lập Trình VBA hoặc Microsoft Excel.

 

 

Mời bạn đánh giá
admin