Trong Excel làm thế nào để tạo nút lệnh vừa khít với ô, khi thay đổi chiều rộng cột hoặc dòng thì nút lệnh sẽ di chuyển theo, sau đây là 1 số cách thực hiện để làm điều đó:

1/ Code tự tạo nút Button tại B2:



Mã nguồn PHP:
[COLOR=#000000]
Sub TaoButton[/COLOR][COLOR=#007700]() [/COLOR][COLOR=#0000BB]Dim Btn [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Button Dim rng [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range With Worksheets[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"Sheet1"[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Set rng [/COLOR][COLOR=#007700]= .[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"B2"[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Set Btn [/COLOR][COLOR=#007700]= .[/COLOR][COLOR=#0000BB]Buttons[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Add[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]rng[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Left[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]rng[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Top[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]rng[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Width[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]rng[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Height[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]With Btn [/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Caption [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#DD0000]"Button_nncb" [/COLOR][COLOR=#0000BB]End With End With End Sub[/COLOR] 
2/ Code tạo nút lệnh CommandButton:
Vẽ CommandButton1 từ góc trái trên B2, nhấn nút Alt và thả chuột nó sẽ tự vẽ CommandButton1 nằm gọn vào B2, Click phải CommandButton1, trong cửa sổ Properties mục Caption gõ Button_nncb, xong click phải vào tên sheet cửa sổ code hiện ra bạn đặt Code sau vào:



Mã nguồn PHP:
[COLOR=#000000]
Sub CoDinhCommanbutton[/COLOR][COLOR=#007700]() [/COLOR][COLOR=#0000BB]ActiveSheet[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Shapes[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"CommandButton1"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Select With Selection [/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Placement [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]xlMoveAndSize [/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]PrintObject [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True End With End Sub[/COLOR] 
Trở về cửa sổ Excel chạy Macro CoDinhCommanbutton xong click vào thước Eke (Exit Design Mode), bây giờ bạn di chuyển cột và dòng để xem kết quả (xem File ở sheet 3)

Lưu ý:
- Trong File ở Sheet 1 tôi sử dụng macro có tên TaoButton để tự tạo nút Button (xem code trong File)
- Trong File ở Sheet 1 tôi sử dụng macro có tên TaoCommandButton để tạo nút CommandButton1 (xem code trong File)

3/ Cách khác đơn giản mà không cần dùng Code:

Vẽ CommandButton1 từ góc trái trên B2, nhấn nút Alt và thả chuột nó sẽ tự vẽ CommandButton1 nằm gọn vào B2, Click phải CommandButton1, trong cửa sổ Format Control, cửa sổ Format Control xuất hiện và chọn thẻ Properties, đánh dấu chọn vào mục Move and size with cells xong nhấn nút OK.

Lưu ý: Nếu bạn muốn in bảng tính mà không có nút CommandButton1 thì bỏ chọn mục Print objec.