minhmee2610
Thành viên mới

- Tham gia
- 18/9/20
- Bài viết
- 26
- Được thích
- 6
Chào các anh chị.
Em đang học cách viết thư viện .dll trên Visual Studio 22. Do còn nhiều cái chưa rõ nên khi khởi chạy trên excel có hiện lỗi này.
Các hàm sử dụng bình thường nhưng các Sub thì chưa chạy được.
Nhờ anh chị hướng dẫn giúp em cách xử lý ạ. Em cảm ơn mọi người.

Đính kèm là code trong dll. Em sử dụng excel 32bit.
Em đang học cách viết thư viện .dll trên Visual Studio 22. Do còn nhiều cái chưa rõ nên khi khởi chạy trên excel có hiện lỗi này.
Các hàm sử dụng bình thường nhưng các Sub thì chưa chạy được.
Nhờ anh chị hướng dẫn giúp em cách xử lý ạ. Em cảm ơn mọi người.

Đính kèm là code trong dll. Em sử dụng excel 32bit.
Mã:
Imports System
Namespace MC1
Public Class HCN
Public Function tinh_dien_tich_HCN(ByVal a As Integer, ByVal b As Integer) As Integer
tinh_dien_tich_HCN = a * b
End Function
End Class
Public Class SAP_gui
Public Sub cnn_SAP()
Dim application As Object
Dim SapGui As Object
Dim connection As Object
Dim session As Object
application = CreateObject("SAPGUI.ScriptingCtrl.1")
SapGui = GetObject("SAPGUI")
application = SapGui.GetScriptingEngine
connection = application.OpenConnection("888", True)
session = connection.children(0)
session.findById("wnd[0]/usr/txtRSYST-BNAME").text = "999"
session.findById("wnd[0]/usr/pwdRSYST-BCODE").text = "10000"
session.findById("wnd[0]").sendVKey(0)
End Sub
End Class
End Namespace