Đến nội dung


Hình ảnh
- - - - -

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


  • Please log in to reply
1 reply to this topic

#1 joga7785

joga7785

    Chưa sử dụng CAD

  • Members
  • Pip
  • 1 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 28 April 2010 - 01:54 PM

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....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
  • 0

#2 hoa35ktxd

hoa35ktxd

    biết lệnh move

  • Members
  • PipPipPip
  • 125 Bài viết
Điểm đánh giá: 38 (tàm tạm)

Đã gửi 29 April 2010 - 04:18 PM

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.
  • 0