Cách tạo và sử dụng Pattern trong Photoshop 
Cách lấy lại thanh công cụ trong Photoshop bị ẩn 
Tải bộ thư viện Brush Photoshop đẹp cho Designer chuyên nghiệp 
Cách tạo chữ mạ vàng trong Photoshop (Gold Text Effect) 
Các vòng lặp trong VBA: Vòng lặp For và Do While 
Cách khai báo biến trong PHP, các loại biến thường gặp 
Download và cài đặt Vertrigo Server 
Thẻ li trong HTML 
Thẻ article trong HTML5 
Cấu trúc HTML5: Cách tạo template HTML5 đầu tiên 
Cách dùng thẻ img trong HTML và các thuộc tính của img 
Thẻ a trong HTML và các thuộc tính của thẻ a thường dùng Hộp thoại InputBox trong VBA
Trong bài này chúng ta sẽ tìm hiểu cách sử dụng hộp thoại InputBox trong VBA, đây là hàm dùng để lấy thông tin từ người dùng.
Có một số chức năng yêu cầu người dùng nhập một giá trị nào đó thì này ta sẽ sử dụng hộp thoại InputBox VBA. Hộp thoại này sẽ yêu cầu người dùng nhập dữ liệu vào, sau đó nhấn Ok hoặc Enter thì sẽ trả về giá trị mà người dùng đã nhập. Nếu nhán Cancel hoặc dấu X thì sẽ trả về một giá trị rỗng.
1. Cú pháp của InputBox VBA
Trước tiên hãy tham khảo cú pháp của hộp thoại InputBox.
InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
Trong đó:
Bài viết này được đăng tại [free tuts .net]
Promptlà tham số bắt buộc, là nội dung tin nhắn trong hộp thoại giúp người dùng biết được là bạn đang cần dữ liệu gì.Titlelà tham số tùy chọn, đây là tiêu đề của hộp thoại InputBoxDefaultlà tham số tùy chọn, là giá trị mặc định trong ô nhập dữ liệu của người dùng lúc xuất hiện.XPos/YPoslà tham số tùy chọn, là vị trí của trục X à Y của hộp thoại sẽ xuất hiện trên màn hình- Hai tham số cuối cùng là
helpfile,contextrất ít khi được sử dụng.
Ví dụ: Viết một Macro yêu cầu nhập tên của người dùng.
Sub getInfor()
Dim name As String
name = InputBox("Nhap ten cua ban!")
MsgBox "Ten cua ban la: " & name
End SubKết quả:
2. Một vài ví dụ khác về InputBox trong VBA
Mình sẽ viết thêm một ví dụ nữa về cách sử dụng hộp thoại InputBox VBA nhé.
Viết chương trình yêu cầu người dùng nhập thông tin gồm tên, tuổi, và blog. Sau đó hãy in thông tin này lên các ô A1, A2 và A3.
Sub getInfor()
Dim name, domain As String
Dim age As Integer
name = InputBox("Nhap ten cua ban!")
age = InputBox("Nhap tuoi cua ban!")
domain = InputBox("Nhap domain cua ban!")
Range("A1").Value = name
Range("A2").Value = age
Range("A3").Value = domain
End SubChạy macro này và nhập thông tin của mình thì kết quả sẽ như sau:
Trên là cách sử dụng hộp thoại InputBox trong VBA để lấy thông tin người dùng.
