Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Gitiho for leading business
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
Ở phần lưu dữ liệu lại đúng dòng đã sửa Xin cho code giải của
Ở phần lưu dữ liệu lại đúng dòng đã sửa. Xin thầy cho code giải của bài giảng để em hiểu với ạ. Cảm ơn Thầy
3 câu trả lời
447 lượt xem
vỗ tay
Chào bạn hướng code như sau:
nếu bạn chọn con trỏ vào dòng thì như sau:
Option Explicit
Sub timdong()
Dim i As Long
i = ActiveCell.Row
MsgBox i
End Sub
Trường hợp tìm theo 1 ô hoặc một textbox nào đó
Sub timdongdulieu()
Dim i As Long
Dim giatri, vung
giatri = Sheet1.Range("B1").Value
vung = Sheet1.Range("A1:A10").Value
i = Application.WorksheetFunction.Match(giatri, vung, 0)
MsgBox i
End Sub
ở đây đã có vị trí i bạn thay i vào ô cần sửa là xong
sheetghi.range("o").value = sheetnhan.range("o"&i).value
vỗ tay
thưa thầy e nghĩ nếu dùng match thì chỉ trả về thứ tự trong bảng đó thôi chứ không ra được vị trí của hàng đúng không ah, hay mình phải cộng thêm số dòng nữa
vỗ tay
Chào bạn quan trọng là vùng của bạn là vùng nào nếu đúng vùng thì nó trả ra đúng giá trị bạn nhé.
vỗ tay
Câu hỏi liên quan
Top
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông