Lỗi về phương thức InputBox UNC (1 người xem)

[khaothibaclieu]

Mình có tải đoạn code của tác giả Nguyễn Duy Tuân về hàm MsgBox và phương thức InputBox Tiếng Việt
Đối với hàm MsgBox thì không có vấn đề gì nhưng đối với phương thức Inputbox thì bị lỗi Compile Error: Syntax Error

Sub test()
Sheet1.Activate
Sheet1.Range("A1").Value = Application.InputBox UNC("NhËp hä vµ tªn")
End Sub

Nếu bỏ UNC đi thì OK nhưng không hiển thị được Tiếng Việt.
Các bạn có thể chỉ cho mình lỗi là ở đâu không.
Vui lòng xem file đính kèm. Xin cám ơn.

 

[sealand]

Bạn sửa 1 chút, thêm 2 cái ngoặc màu đỏ ấy

Sub test()
    Sheet1.Activate
    Sheet1.Range("A1").Value = Application.InputBox[B][COLOR=#ff0000]([/COLOR][/B]UNC("NhËp hä vµ tªn")[B][COLOR=#ff0000])[/COLOR][/B]
End Sub

 

[befaint]

Thử như vầy xem:
Sheet1.Range("A1").Value = Application.InputBox(UNC("NhËp hä vµ tªn"))