[ad_1]
Thêm một nút lệnh VBA với mã tương ứng của nó không phải là một nhiệm vụ phức tạp. Nó chỉ yêu cầu một chút kiến thức về Excel và macro. Bài viết này sẽ chỉ cho bạn cách.
Mã nút lệnh VBA là gì?
Với VBA, các nút có thể gọi macro, hiển thị thông báo và thực hiện các chức năng khác. Sử dụng VBA để thêm nhiều chức năng hơn vào trang tính Excel mà không cần có kiến thức về các chi tiết kỹ thuật của thuộc tính Nút lệnh VBA hoặc các chức năng như nhấp vào Nút lệnh VBA.
Sao chép mã vào mô-đun tương ứng và xác nhận rằng nút đang hoạt động. Người ta có thể tăng chức năng của trang tính bằng cách thêm một Nút lệnh VBA với mã tương ứng của nó. Phần mềm Văn phòng rõ ràng đã phát triển hơn bao giờ hết.
Dán hai phần mã này vào một mô-đun chung (Ví dụ: Mô-đun1).
Sub CreateButton() Dim Obj As Object Dim Code As String Sheets("Sheet1").Select 'create button Set Obj = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", _ Link:=False, DisplayAsIcon:=False, Left:=200, Top:=100, Width:=100, Height:=35) Obj.Name = "TestButton" 'button text ActiveSheet.OLEObjects(1).Object.Caption = "Test Button" 'macro text Code = "Sub ButtonTest_Click()" & vbCrLf Code = Code & "Call Tester" & vbCrLf Code = Code & "End Sub" 'add macro at the end of the sheet module With ActiveWorkbook.VBProject.VBComponents(ActiveSheet.Name).CodeModule .insertlines .CountOfLines + 1, Code End With End Sub Sub Tester() MsgBox "You have click on the test button" End Sub
Tải về ở đâu?
Ghé thăm diễn đàn của chúng tôi để biết thêm các thủ thuật Microsoft excel!
[ad_2]