VB trong Excel!

[htanhvu]

Xin chào mọi người! Khi mình viết một hàm bằng VB. Sao đó muốn sử dụng trong MS Excel như một hàm nội trú của Excel thì phải làm thế nào? Chả lẽ mỗi lần làm một WorkSheet thì phải add hàm đó vào thôi sao!!! Xin giúp mình !!! Cám ơn đã xem bài .

[langthangIT]

Bạn mở Excell ra và menu Tool chọn macro\visual basic editor thế là xong.
Bạn có thể lập trình trong Excell và sử dụng các hàm tự định nghĩa bằng cách này.

[htanhvu]

Nếu làm như bạn thì khi mở hay tạo một file khác thì hàm đó không còn nữa !!! Cái này mình thường xuyên làm ! Mình muốn nó làm hàm nội trú của Excel luôn kia! Giống như trong MS Word vậy !
Cám ơn đã đọc bài!

[langthangIT]

thì bạn cws làm thì sẽ khắc biết thôi. mình đã từng làm thế mà.ttrong mọi tình huống bạn có thể dùng được hàm này trên máy bạn.

[cucarot]

Khi bạn tạo Macro, trong list box "Macro in" bạn chọn Personal.xls, hoăc bạn có thể tạo hàm macro trong modul của VBAProject(Personal.xls) như vậy bạn có thể chạy macro vừa tạo cho tất cả các bảng excle. Chúc bạn thành công

[htanhvu]

Cám ơn nhiều nhé. Nhưng cũng thấy nghi ngờ lắm vì mình cũng đã làm tương tự cách bạn chỉ rồi!

[nganha]

Nếu bạn dùng bộ Office từ 97 trở lên thì có thể tạo File *.xla trong đó có chứa các hàm bạn tự định nghĩa để sử dụng cho mọi workbook khác. Để file *.xla chạy khi bạn khởi động Excel thì bạn phải thêm nó vào bằng cách chọn menu Tools--> Add-Ins... để thêm file *.xla của bạn. Nếu file *.xla của bạn nằm trong thư mục ...\Program Files\Microsoft Office\Office\Library (đối với Office 97, 2000) hay ...\Program Files\Microsoft Office\Office 10\Library (đối với Office XP) thì nó được Excel tự động phát hiện và thêm ngay vào trong danh mục Add-Ins available để bạn chọn hay bỏ chọn. Nếu đặt file *.xla ở thư mục khác thì bạn nhấn Browse để chuyển tới file đó phục vụ cho việc bổ sung nó vào danh mục Add-Ins available. Cách viết hàm bằng VBA trong standard module của file *.xla thì chắc là bạn đã rõ.

[htanhvu]

Cám ơn nganha nhiều! Mình nghĩa cách này mới thiệt hay!
Chứ nếu chỉ sử dụng Personal.xls thì không thể sử dụng được cho các file Excel khác được!

[htanhvu]

nganha ơi vẫn chưa được .... Có lẽ mình chưa biết cách tạo một function mà dùng được cho cả các VABproject khác! Nó chỉ xài được trong VABproject của mình thôi!
Ý mình là muốn giống như Vloopup.xla của Excel vậy đó! Khi mình tạo trong một VABproject thì mình có thể xài cho bất kì một VABproject luôn đó! Nếu bạn biết xin chỉ cho mình với!
Xin cám ơn nhiều ...

[nganha]

Được mà. Tôi đã làm như thế cho tất cả các hàm tự định nghĩa phục vụ cho công việc. Trong standard modules bạn gõ như sau:
Public Function abc (ByVal param1 as Variant,....) as Variant
'Code
End Function
Ví dụ hàm NewStr():
Public Function NewStr(ByVal Str As String) As String
Dim NewArr() As String, Tmp As String, Tmp1 As String
Dim i As Integer, j As Integer, k As Integer
j = Len(Str)
ReDim NewArr(0 To 1)
k = 0
For i = 1 To j
Tmp1 = Mid(Str, i, 1)
If Tmp1 <> "/" Then
Tmp = Tmp & Tmp1
Else
NewArr(k) = "'00" & Tmp
k = k + 1
Tmp1 = ""
Tmp = ""
End If
Next i
If Len(Tmp) < 5 Then
NewArr(k) = "0000" & Tmp
Else
NewArr(k) = Tmp
End If
NewStr = NewArr(0) & NewArr(1)
End Function
và sau đó lưu File dưới dạng xla ví dụ MyFunctions.xla vào một thư mục nào đó để có thể select (mark) nó trong danh mục Add-Ins available sau khi chọn menu Tools/Add-Ins.... như tôi đã viết ở bài trên. Sau khi chọn MyFunction trong danh mục thì phải khởi động lại Excel để code của hàm abc có thể thực thi khi trong các Workbooks khác có gọi tới hàm này.
Bạn có thể liên hệ với tôi qua Email hdscob1053@hn.vnn.vn để tôi có thể gửi cho bạn file hướng dẫn cụ thể có hình ảnh minh họa.