Windows Form Làm thế nào để định vị cột và dòng nhập dữ liệu

Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài

binhtv69

Thành viên mới
Tham gia
9/5/21
Bài viết
2
Được thích
0
Chào các bác
Hiện tại mình cần nhập dữ liệu theo yêu cầu của Sếp
Sếp đưa cho1 sấp tài liệu nhiều quá mình không thể nhập tay hết được, nên mình có tìm hiểu VBA nó giúp mình làm lẹ hơn, nhưng mình mới tìm hiểu nên không rành
mong bro giúp mình viết code định vị để mình nhập dữ liệu cho nhanh với
Ví dụ Trường Dãy H, mình nhập 5 ; TT mình nhập 6, Ký tự nhập 100 thì tự động nó nhập 100 vào phần khoanh đỏ.
Mong được sự giúp đở của các bác.
Em xin cám ơn

hop.jpg
 

File đính kèm

  • nhapphieu.xlsm
    1.9 MB · Đọc: 8
Upvote 0
Trên thực tế hàm chả khác gì phương thức ngoài cái tính năng hàm thì có thể trả về một giá trị.

Nếu dịch "hàm" là Function, và "phương thức" là procedure (tiếng mới) hay subroutine (tiếng cũ) thì nó chỉ vỏn vẹn vậy. Lý do tại sao lại phân biệt Func/Sub thì phải hỏi IBM, lão này mới là chúa của cách hoạt động máy tính. Hầu hết các tiêu chuẩn đều từ một cái gì đó của lão IBM.
Riêng bọn Unix thì không muốn lệ thuộc cho nên các ngôn ngữ về sau này đều coi subroutine là Function. JavaScript dùng từ khóa void để cho biết rằng hàm không cần phải trả về cái gì cả.

Những tên gọi khác của Function và Sub chỉ là cách người ta diễn giải theo LT HĐT.

Chat GPT trả lời như hạch. Không còn chỗ bào chữa. Có lẽ tiêu chí AI là không đọc sách và không chấp nhận những gì thuộc về thế kỷ trước.

(*) Procedure = phương thức
subroutine = routine (nhóm lệnh) con
 
Upvote 0
Trên thực tế hàm chả khác gì phương thức ngoài cái tính năng hàm thì có thể trả về một giá trị.

Nếu dịch "hàm" là Function, và "phương thức" là procedure (tiếng mới) hay subroutine (tiếng cũ) ...
Tôi cũng nói như vậy. Trong VBA thì tôi đang nói về find là 1 hàm dùng như 1 method, hay chỉ là 1 method giống như Save, copy, Move, ... (mở rộng ra Sub và Function thì tôi biết thêm, nhưng không phải ý chính tôi muốn nói.
Find trả về 1 giá trị, vậy nó là hàm. Hàm gắn vào đối tượng gì gì đó rồi gọi là method thì đồng ý, nhưng bản chất nó cứ là hàm. Ấy vậy mà khi tôi gọi hàm Find thì sinh ra cuộc thảo luận này.
 
Upvote 0
Bạn copy thêm đoạn code này.

JavaScript:
Private Sub cboBoPhan_Change()
    laySoLuong
End Sub

Private Sub cboMatHang_Change()
    laySoLuong
End Sub

Sub laySoLuong()
    If Len(Trim(Me.cboBoPhan)) = 0 Or Len(Trim(Me.cboMatHang)) = 0 Then Exit Sub
    Me.txtSoLuong.Value = sht.Cells(Me.cboMatHang.ListIndex + startRow, Me.cboBoPhan.ListIndex + startCol).Value
End Sub
Anh @ongke0711 cho em hỏi một chút về Activecell.Offset().Active với ạ.
Em muốn ô vừa được nhập liệu sẽ trở thành Activecell nhưng sau khi em thử nghiệm với dòng code như sau thì không hề có thông báo lỗi nào nhưng Activecell vẫn không thay đổi
Mã:
Private Sub cmdNhap_Click()
sht.Cells(Me.cboMatHang.ListIndex + startRow + 2, Me.cboBoPhan.ListIndex + startCol + 1).value = Me.txtSoLuong.value
ActiveCell.Offset(Me.cboMatHang.ListIndex + startRow + 2, Me.cboBoPhan.ListIndex + startCol + 1).Activate  'di chuyển activecell đến ô vừa nhập liệu
TestComment 'tạo note cho activecell
Me.cboBoPhan = ""
Me.cboMatHang = ""
Me.txtSoLuong = ""
End Sub
Em nghĩ là em đã hiểu sai về Activecell, hi vọng anh @ongke0711 có thể chia sẽ cho em thêm chút kiến thức về Activecell ạ.
Em cảm ơn ạ.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom