hungcuongtx
Thành viên mới
- Tham gia
- 15/12/10
- Bài viết
- 2
- Được thích
- 0
Thì vầy thôiEm có 1 cột A2:A20 như hình A, 1 Command Button có nhãn là W.
Bây giờ em muốn khi nhấn Button W thì A2:A20 sẽ thêm chữ W như hình B nhưng mà em không biết viết code cho button W như thế nào hết.
Mong anh (chị) giúp đỡ.! Cám ơn rất nhiều!
Private Sub W_Click()
With Range("A2:A20")
.Value = Evaluate("" & .Address & " & """ & W.Caption & """")
End With
End Sub