Làm thế nào để add tool viết bằng VBA vào tool của excel

[joga7785 0]

Chào các bạn - mình muốn nhờ các bạn tư vấn chủ để như sau:

B1. Mình đã tạo 1 macro cho phép tạo một tool có chức năng xóa sheet rỗng, xóa dòng trắng , xóa cột trăng như hình

http://www.mediafire.com/imageview.p...ey=canonwgm5i4

B2. Nhưng hiện tại xảy ra trường hợp sau:

- Nếu copy dữ liệu vào file gốc đã viết code VBA thì ấn vào 1 buton trên tool thì nó sẽ thực thi lệnh

- Nếu mở file excel mới thì chức năng của buton trên file mới không có tác dụng

- Mình viết code như sau:

PHP Code:

Sub DeleteEmptyRows()

Dim i As Long

Application.ScreenUpdating = False

With Sheet1.UsedRange

For i = .Rows.Count To 1 Step -1

If WorksheetFunction.CountA(.Cells(i, 1).EntireRow) = 0 Then

.Cells(i, 1).EntireRow.Delete

End If

Next i

End With

Application.ScreenUpdating = True

End Sub

B3. Sau khi sửa được lỗi trên, mình muốn mang tool này sang bất kỳ máy tính nào thì phải đăng ký những gì thì excel ở các máy khác mới hiểu - và cho add tool lên taskbar

Nhờ các bạn chỉ giúp các vấn đề mình gặp phải trên

[hoa35ktxd 38]

Sau khi code xong bạn hãy lưu thành file.xla

Copy file.xla đó sang máy khác, khởi động Excel vào Tools>Add-In và Browse đến file.xla đó là được.