Với Excel, bạn có thể sử dụng Visual Basic để thêm một loạt các tính năng khác nhau vào bảng tính của mình, bao gồm cả “UserForms”. Thông qua UserForms, bạn có thể hiển thị biểu mẫu đầu vào cho người dùng tách biệt với trang tính chính, điều này rất hữu ích để thu thập dữ liệu từ những cá nhân có thể không quen thuộc với bảng tính. Với một chút mã Visual Basic, bạn có thể thêm tất cả dữ liệu này vào bảng tính của mình trong các hàng mới.
Xác định các trường của bạn
Khởi chạy Excel. Nhập tên của tất cả các trường bạn muốn chụp ở hàng trên cùng, bắt đầu từ “A1” và làm việc ở bên phải. Nhấp vào “Nhà phát triển”, sau đó nhấp vào “Visual Basic”. Cửa sổ Visual Basic sẽ xuất hiện. Nhấp vào biểu tượng “A” từ Hộp công cụ và nhấp và kéo bên trong cửa sổ “UserForm1” tại vị trí bạn muốn trường biểu mẫu đầu tiên của mình đi đến. Chỉnh sửa nhãn bằng cách thay đổi thuộc tính “Chú thích” thành một thứ dễ mô tả hơn, chẳng hạn như “Tên” chẳng hạn. Tạo nhãn cho từng trường bạn đã nhập trên trang tính của mình.
Thêm hộp văn bản của bạn
Chọn biểu tượng “TextBox” từ Hộp công cụ và kéo ra một hộp văn bản ngay bên phải nhãn đầu tiên của bạn. Nếu bạn chỉ sử dụng một vài trường, bạn có thể để thuộc tính “(Tên)” làm “TextBox1” mặc định. Tuy nhiên, nếu bạn cần một số lượng lớn các trường, điều này có thể gây nhầm lẫn, vì vậy bạn nên chỉnh sửa chúng để phù hợp với các nhãn bạn đã tạo. Đảm bảo mỗi nhãn có một hộp văn bản tương ứng.
Thêm nút gửi
Nhấp vào biểu tượng “Nút lệnh” trong Hộp công cụ, trông giống như một nút kiểu Windows tiêu chuẩn. Nhấp và kéo nó đến kích thước và vị trí bạn yêu cầu trong UserForm1. Thông thường, bạn sẽ muốn điều này bên dưới hoặc gần hộp văn bản cuối cùng trong biểu mẫu của bạn. Thay đổi thuộc tính "Chú thích" của nút thành "Gửi dữ liệu" hoặc một cái gì đó tương tự, cho người dùng biết rằng họ phải nhấp vào nút này để gửi dữ liệu của họ.
Thêm mã Visual Basic
Bấm đúp vào nút. Nhập mã sau giữa "Sub riêng tư" và "Sub kết thúc":
eRow = Sheet1.Cells (Rows.Count, 1) .End (xlUp) .Offset (1,0) .Row
Sau đó, bắt đầu một dòng mới bên dưới dòng này và sau đó nhập như sau:
Ô (erow, 1) = TextBox1.Text
Nếu bạn đã đổi tên các hộp văn bản của mình, hãy thay đổi “TextBox1” thành tên mà bạn đã đặt cho hộp văn bản đầu tiên. Làm điều này cho mỗi hộp nhập bạn đã tạo, bắt đầu một dòng mới và nhập tên hộp văn bản chính xác nếu thích hợp. Ngoài ra, đối với mỗi dòng mới, hãy tăng số liệu trong ngoặc đơn lên một. Ví dụ: dòng tiếp theo có thể trông như thế này:
Ô (erow, 2) = TextBox2.Text
Nhấp vào nút “Phát” ở đầu cửa sổ để bắt đầu thu thập dữ liệu.
