-
10-12-2009, 06:01 PM #1Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
viết code xong nhưng không thực thi lệnh
các bạn xin chỉ giáo
mình viết code để khi nhấn phím ENTER (phím số) thì nó sẽ chuyển sang phải một ô , nhưgn viết xong chẳng thấy nó thực hành
sub setup_onkey()
application.onkey "ENTER","[RIGHT_SUB"]
end sub
sub RIGHT_SUB()
activecell.offset(1,0).active
end sub
không biêt đoạn code của mình có sai chỗ nào không?
cả nhà có ai biết có lớp nào dạy VBA cho excel không , chỉ dùm mình với?mình đang ở HCMView more random threads:
- Xử lý giúp Lỗi 40040 trong Excel 2003
- Chơi games = excel
- PHẦN MỀM KẾ TOÁN EXCEL
- Xin giúp code nhập, chỉnh sửa, liên kết dữ liệu từ excel với form
- Giúp đỡ viết code trong excel
- đăng ký học vba excel tại hà nội
- Trong Excel 2003 có cách nào định dạng kiểu chữ tự động không ?
- Cho em hỏi cách tạo 1 Combo Box
- Sửa lỗi code giúp mình
- Viết đoạn code cho nút lệnh SAVE ?
-
10-13-2009, 12:19 AM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
Active là để khai báo trước các lệnh sau đó sẽ tác động lên đối tượng active.
Bạn phải dùng select để điều khiển việc con nháy nhảy sang ô kế bên.
Select và Active khác nhau tương tự như động từ và tính từ vậy đó.
sub RIGHT_SUB()
activecell.offset(1,0).select
end sub
-
10-13-2009, 03:41 PM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
mình làm như hướng dẫn rồi mà vẫn chưa được , muontennguoi có thể viết code và gửi file lên cho mình xem tham khảo không?
-
10-13-2009, 04:33 PM #4Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
Gửi bởi takuda_khoad
-
10-13-2009, 11:56 PM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
sub setup_onkey()
application.onkey "{ENTER}","RIGHT_SUB"
end sub
sub RIGHT_SUB()
activecell.offset(0,1).select
end sub
Sau khi bạn chạy macro setup_onkey() thì onkey mới có tác dụng.
-
10-14-2009, 02:19 AM #6Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
Cái code này tôi thấy nó kỳ kỳ thế nào ấy. Thế ta cho nó vào sự kiện gì để nó tự kích hoạt đây?
Code nằm trong UserForm thì họa chăng!
-
10-14-2009, 05:57 AM #7Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 21
Ðề: viết code xong nhưng không thực thi lệnh
Gửi bởi atmt17
Ở đây dùng phím {ENTER} như là 1 ví dụ mẫu.
Gửi bởi atmt17
Tốt hơn hết là hãy để người dùng tự quyết định khi nào thì chạy. Gắn nó vào 1 cái nút nào đó trên form.
-
10-14-2009, 04:44 PM #8Silver member
- Ngày tham gia
- May 2016
- Bài viết
- 9
Ðề: viết code xong nhưng không thực thi lệnh
Gửi bởi muontennguoi
-
10-14-2009, 07:22 PM #9Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
Gửi bởi muontennguoi
Thêm nữa:
- Enter mà chỉ xuống dòng hoặc dịch sang phải thì cần gì code nhỉ? (Excel Options có thể tự chỉnh đúng yêu cầu này)
- Cứ cho rằng đây chỉ là ví dụ minh họa, trên thực tế người ta làm 1 việc khác thì chẳng lẽ code chạy rồi ta không dùng được phím Enter nữa sao?
Trên Form người ta "bẫy" các phím mới có vẻ hợp lý hơn!
------------
Gửi bởi takuda_khoad
-
10-14-2009, 08:50 PM #10Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: viết code xong nhưng không thực thi lệnh
Gửi bởi atmt17
Phím Enter bên bàn phím chữ vẫn hoạt động theo Excel Option.
Việc người ta bẫy phím Enter đó để làm gì, trong tình huống nào... thì đó là chuyện riêng của mỗi người.
Để hủy bỏ Onkey, lấy lại như mặc định thì :
Sub unsetup_onkey()
Application.OnKey "{ENTER}"
End Sub
Du lịch Thụy Sĩ - Đất nước Thụy Sĩ là quốc gia không giáp với biển thuộc khu vực Tây Âu. Thụy Sĩ nổi tiếng với những ngọn núi quanh năm phủ đầy tuyết trắng, những thảo nguyên xanh mướt hay cảnh hồ...
Dulichviet giới thiệu các tour Du lịch Thụy Sĩ đặc sắc