Tạo Addin gắn trên thanh công cụ

[AnhThu-1976]

Chào các anh/chị và các bạn!

Em muốn có 1 biểu tượng để khi nhấn vào thì nó đọc tiếng anh trên excel (dành cho em bé tập luyện)
Em đã add "Speak cells" vào thanh Customize Quick Access Toolbar
Sau khi chọn 1 cell bất kỳ thì "Speak cells" đọc tất cả các từ ở các cell lận cận kề bên của cell đã chọn
Ví dụ: cell A1 có từ "speak" và cell A2 có từ "love". Em chọn cell A1 và bấm biểu tượng Speak cells thì nó đọc luôn các từ ở cell A1 và A2

Em có 1 đoạn code để đọc tiếng Anh cho từng cell đã chọn

Sub PhatAm()
Application.Speech.Speak ActiveCell.Value
End Sub

Code trên em đã tạo thành Addin và phím tắt là: Ctrl+shift+E
Tuy nhiên do em bé còn nhỏ, nên bé rất khó bấm tổ hợp phím trên
Em muốn có 1 biểu tượng (ví dụ: như hình cái loa, hay hình gì cũng được) gắn trên thanh công cụ để cho bé thực hiện dễ hơn
Em có tham khảo một số bài
Hướng dẫn cách tạo Addin gắn trên thanh công cụ
nhưng em không hiểu gì hết
Rất mong các anh/chị và các bạn giúp đỡ
em đang sử dụng win 7 và excel 2010
Em cảm ơn!

 

[befaint]

Vẽ cái hình gì cũng được, chèn cái hình gì vào bảng tính cũng được.. rồi gán sub trên vào thôi.

Xem ở đây.

 

[batman1]

Tôi không hiểu ý tưởng. Tại sao lại phải làm 2 thao tác là chọn ô rồi nhấn nút gì đó? Cho code vào SelectionChange thôi

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.Speech.Speak Target.Value
End Sub

Bé thích câu nào thì chọn ô đó thôi.

Đọc xung quanh không phải là ý tốt. Vd. chọn B2 thì đọc B2, A2, B1, C2, B3? Lúc đó bé chẳng biết câu nói nào là của đoạn văn nào.