Mã VBA dùng phím key Enter...??? (1 người xem)

[taynguyen2010]

Mình mới lọ mọ học VBA Excel. Đang gặp khó ở chỗ muốn tạo Micro hoặc đoạn mã với yêu cầu như sau:
*Chọn một vị trí bất kỳ trong sheet.
- Khi Dòng đó không có dữ liệu thì Enter lần 1 sẽ Xoá dòng đó.
- Khi dòng đó không có dữ liệu thì Enter 1 lần sẽ insert thêm 1 dòng, sau khi thêm dòng thì tự động chọn dòng trống đó.
Ví dụ cụ thể:
Chọn Row 5 (Cột bất kỳ) mà Dòng này không có bất kỳ dữ liệu nào thì Enter 1 lần sẽ xoá dòng 5.
Chọn Row 6 (Cột bất kỳ) mà dòng này có dữ liệu (Ở bấtt kỳ ô ôn ào) thì enter 1 lần sẽ thêm 1 dòng, và tự động chọn dòng 7 ngay vị trí đặt chỏ của ô trước.

Anh em cao thủ VBA giúp mình nhé.
Cám ơn các bạn. Thanks!

 

[TrungChinhs]

Mình mới lọ mọ học VBA Excel. Đang gặp khó ở chỗ muốn tạo Micro hoặc đoạn mã với yêu cầu như sau:
*Chọn một vị trí bất kỳ trong sheet.
- Khi Dòng đó không có dữ liệu thì Enter lần 1 sẽ Xoá dòng đó.
- Khi dòng đó không có dữ liệu thì Enter 1 lần sẽ insert thêm 1 dòng...

Tôi cá với bạn đến Billgate cũng bó tay.
Mà bạn đã bao giờ nghe nói đến Nguyên tắc KISS chưa ? KISS là một cách viết ngắn lại cho cụm từ: Keep It Simple, Stupid.

 

[Quang_Hải]

Mình mới lọ mọ học VBA Excel. Đang gặp khó ở chỗ muốn tạo Micro hoặc đoạn mã với yêu cầu như sau:
*Chọn một vị trí bất kỳ trong sheet.
- Khi Dòng đó không có dữ liệu thì Enter lần 1 sẽ Xoá dòng đó.
- Khi dòng đó không có dữ liệu thì Enter 1 lần sẽ insert thêm 1 dòng, sau khi thêm dòng thì tự động chọn dòng trống đó.
Ví dụ cụ thể:
+ Chọn Row 5 (Cột bất kỳ) mà Dòng này không có bất kỳ dữ liệu nào thì Enter 1 lần sẽ xoá dòng 5.
+ Chọn Row 6 (Cột bất kỳ) mà dòng này có dữ liệu (Ở bấtt kỳ ô ôn ào) thì enter 1 lần sẽ thêm 1 dòng, và tự động chọn dòng 7 ngay vị trí đặt chỏ của ô trước.

Anh em cao thủ VBA giúp mình nhé.
Cám ơn các bạn. Thanks!

Mới học VBA sao mà bạn yêu cầu một điều quá khó khăn và phức tạp vậy. Thực ra chuyện gì cũng có thể giải quyết, bằng cách này hoặc cách khác. Cần gì phải chọn cái cách khó để làm gì, nếu chủ yếu chỉ là để phục vụ cho công việc của mình nhanh gọn lẹ và chính xác.
Thay vì bấm phím Enter, sao ta không thay thế bằng cái nhấp chuột hoặc là chỉ định 1 cột nào đó để làm điều kiện...
Còn nếu bạn quyết định phải làm bằng cái phím Enter trong bảng tính thì e rằng không thể

Thân

 

[ndu96081631]

Tôi cá với bạn đến Billgate cũng bó tay.
Mà bạn đã bao giờ nghe nói đến Nguyên tắc KISS chưa ? KISS là một cách viết ngắn lại cho cụm từ: Keep It Simple, Stupid.

Em đoán tác giả viết nhầm thôi
Chắc là vầy

- Khi Dòng đó không có dữ liệu thì Enter lần 1 sẽ Xoá dòng đó.
- Khi dòng đó có dữ liệu thì Enter 1 lần sẽ insert thêm 1 dòng

Em nghĩ là làm được ---> Dùng OnKey
--------------
Có điều:
- Sau khi Insert dòng xong, ta chọn vào dòng trống đó luôn
- Vậy khi chọn dòng trống ấy, ta sẽ làm gì? Nếu nhập liệu vào dòng trống rồi Enter, nó lại insert thêm dòng nữa à?
- Tại sao không chọn 1 phím nào khác? Vì dùng phím Enter sẽ rất bất tiện

 

[taynguyen2010]

Thật ra đã có người thực hiện được điều đó. Tuy nhiên mình không biết cách nào thực hiện được. Đa phần các PM lập dự toán đều sử dụng cách thức trên. (Mình xin tác giả hướng dẫn nhưng chưa được).
VD: Phần mềm dự toán xaydung360.vn
Cũng trên nền VBA Excel , thực hiện các thao tác đúng như mình mô tả trên.
Thanks tất cả anh Em!