Khi ấn phím F5 sẽ tự động mở một form

  • Thread starter Thread starter cadafi
  • Ngày gửi Ngày gửi
Liên hệ QC

cadafi

Hành động từ trái tim
Administrator
Tham gia
27/5/07
Bài viết
4,297
Được thích
11,386
Donate (Paypal)
Donate
Giới tính
Nam
Nghề nghiệp
Business Man
Tôi có vấn đề như sau:
Trong màn hình nhập liệu excel, các ô từ range("C3:C10") để nhập số tài khoản. khi cho con trỏ vào các cells này khi ấn phím F5 sẽ tự động mở form để chọn tài khoản (form này đã làm rồi). Cảm ơn các anh chị nhiều.
 
Tôi có vấn đề như sau:
Trong màn hình nhập liệu excel, các ô từ range("C3:C10") để nhập số tài khoản. khi cho con trỏ vào các cells này khi ấn phím F5 sẽ tự động mở form để chọn tài khoản (form này đã làm rồi). Cảm ơn các anh chị nhiều.
Bạn dùng cách này nhé
PHP:
Sub Test()
    Application.OnKey "{F5}", "ShowForm"
End Sub

Sub ShowForm()
    UserForm1.Show
End Sub
Bạn chạy Sub Test() và bây giờ bạn có thể dùng phím F5 để hiện Form rồi đó. Nếu muốn giới hạn Range("C3:C10") thì bạn thêm If...Then... vào

TDN
 
Em gửi file đính kèm, các anh xem giúp. Sheet("PT") thì cột tài khoản ghi có, hiện em đang làm là khi double click vào cells nào trong vùng đó thì tự động mở form danh mục tai khoản. Em đang cần xử lý thủ tục khi ấn một phím, hoặc tổ hợp phím (không nhất thiết phải là F5) (hihi, em còn ứng dụng chuyện này phục vụ cho một số mục đích tương tự nữa) nên nhờ các anh chỉ giúp. Thanks cac anh nhiều lắm.

Sao file zip của em khoản 1.6Mb nhưng không upload lên được vậy cà.
 
Chỉnh sửa lần cuối bởi điều hành viên:
Bạn dùng cách này nhé
PHP:
Sub Test()
    Application.OnKey "{F5}", "ShowForm"
End Sub

Sub ShowForm()
    UserForm1.Show

End Sub
Bạn chạy Sub Test() và bây giờ bạn có thể dùng phím F5 để hiện Form rồi đó. Nếu muốn giới hạn Range("C3:C10") thì bạn thêm If...Then... vào

TDN

Em viết như thề này các anh coi có ổn không nhé:

Private Sub Worksheet_Activate()
Application.Run "Test" '
End Sub

Sub ShowForm()
Dim r,c as Integer
r=Activecell.Row
c=Activecell.Column
If (r >= 25 And r <= 29) And (c = 6) Then
frm_DMTK.Show
Else
Exit sub
End If
End sub
 
Rút gọn lai:
PHP:
Sub ShowForm()
Dim r,c as Integer
r=Activecell.Row
c=Activecell.Column
   If (r >= 25 And r <= 29) And (c = 6) Then frm_DMTK.Show
End sub
Tiếp theo gán cho con macro này 1 phím tắt để gọi là xong (Alt + F8 \ Options)
ANH TUẤN
 
To: các anh
Làm thế nào để form hiện ra đã có các danh mục trong đó anh nhỉ?
(ví dụ như của Ca_difi khi form_DMTK hiện ra, ta click vào đó đã có các tài khoản trong đó)
Xin các anh chỉ giáo
 
Em đã làm xong rồi, up lên để các anh góp ý nhé. Trong phần xử lý form khi hiện ra có dữ liệu cũng viết trong đó luôn rồi. Khi double click vào listbox trên fom, giá trị sẽ được gán vào activecell và tự đóng form lại. Bạn Feelingyes mở VB code lên xem thử nhé. Nhờ các anh góp ý giúp. Thanks in advance

Quên nữa, các anh thử vào sheet("PT") để con trỏ vào ô tài khoản ghi có và ấn thử F5. Hihihi, thanks các anh nhiều nhiều.
 

File đính kèm

Lần chỉnh sửa cuối:
To: Ca_difi
Bạn Feelingyes mở VB code lên xem thử nhé.
Ca_difi có thể giúp tôi bạn làm như hình dưới thế nào không?
1. các tài khoản hiện trong userform
DMTK.jpg


2. Tại ô B5 khi ta click thì danh mục sổ xuống (và điểm click này nằm ở bên trái của ô)

List.jpg
 
To: Ca_difi

Ca_difi có thể giúp tôi bạn làm như hình dưới thế nào không?
1. các tài khoản hiện trong userform
DMTK.jpg


2. Tại ô B5 khi ta click thì danh mục sổ xuống (và điểm click này nằm ở bên trái của ô)

List.jpg
Ở hình thứ nhất, bạn để ý trong hộp thoại properties của object ListBox <ListDMTK>, bạn xem giá trị "RowSource" mình gõ vào giá trị "DMTK" (cái này bạn đặt tên trong insert/name/define).

Còn hình số hai cũng tương tự. Bạn xem file đính kèm nhé.
moz-screenshot.jpg
moz-screenshot-1.jpg
 

File đính kèm

Lần chỉnh sửa cuối:
Cám ơn Ca_dafi nhiều

Mình đã hiểu cách tạo form như trong danh mục tài khoản (DMTK). nhưng mình không thể nào xem được -Properties của Choloaitien combobox
Có thể bạn đã protect sheet nên mình không thể xem được chăng?
Làm cách nào để mình xem được Properties của các Combobox?

Bác nào giúp em hiểu được cách làm (click vào combobox) thì được như hinh 2 bài #9 với.
Em xin cám ơn nhiều
 
Chỉnh sửa lần cuối bởi điều hành viên:
Cám ơn Anh Tedaynui đã giúp đỡ
-Em đã xem code trong file của Mr TuanVNUNI và Mr Bắp (code khá phức tạp)
-Nhưng sao em không thấy code này ở trong file Ca_dafi (mà nút click nằm bên trái-không phải là bên phải----bài #7)
-Bác Ca_dafi đâu rồi?
 
Bạn click chuột phải trên thanh menu chọn Control toolbox, bật chế độ design mode lên thì bạn mới edit được combobox. Mình không có protect sheet đâu.

Trong phần properties của combobox, Bạn chú ý giá trị ListFillRange và LinkedCell. Cái này không cần viết code gì cả, tự excel nó có rồi đó, bạn thử xem nhé.

Còn phần nằm bên trái hay bên phải là do bạn tùy ý chọn thôi (thu nhỏ combobox lại đến khi nhỏ bằng ô vuông có hình mũi tên chỉ xuống, điều chỉnh thuộc tính ListWith và columnWith cho phù hợp với độ dài dữ liệu các cột, di chuyển combobx sang trái hay sang phải của cell tùy ý,... hihihi).
Cám ơn Anh Tedaynui đã giúp đỡ
-Em đã xem code trong file của Mr TuanVNUNI và Mr Bắp (code khá phức tạp)
-Nhưng sao em không thấy code này ở trong file Ca_dafi (mà nút click nằm bên trái-không phải là bên phải----bài #7)
-Bác Ca_dafi đâu rồi?
Mr.TuanVNUNI và Mr. Bắp viết cho combobox động thì code phức tạp là đúng bạn ạ. Còn mình thì sử dụng combobox cố định mà, nên đơn giản hơn nhiều.
 
Chỉnh sửa lần cuối bởi điều hành viên:
He he
Em tạo được form rồi, nhưng hơi buồn cái là list trong form không "động" được
-Ý của em là Items (tên đồ uống) sẽ không được phân loại theo T-Group (nhóm đồ uống) như trong validation anh nhỉ?
(Nhấn F5 cột(4)-Items để show form)

Nhân tiện em muốn hỏi luốn ở nhưng form mà mình tạo ra, làm cách nào để tô màu và format vác font chữ trên đó?

Mong được chỉ dạy
Xin cám ơn!
 
Lần chỉnh sửa cuối:
He he
Em tạo được form rồi, nhưng hơi buồn cái là list trong form không "động" được
-Ý của em là Items (tên đồ uống) sẽ không được phân loại theo T-Group (nhóm đồ uống) như trong validation anh nhỉ?
(Nhấn F5 cột(4)-Items để show form)

Nhân tiện em muốn hỏi luốn ở nhưng form mà mình tạo ra, làm cách nào để tô màu và format vác font chữ trên đó?

Mong được chỉ dạy
Xin cám ơn!

Bạn sử dụng validation động và đặt tên động mà. Combo box làm theo cách của mình chỉ xử lý dạng dữ liệu thông thường. Nếu bạn muốn trích lọc dữ liệu theo nhóm chắc phải viết code thôi. Vu này phải nhờ tới các tiền bối rồi đó.

Anh AnhTuan và anh TeDayNui ơi! Hỗ trợ bọn em vụ này nhé. Em cũng đang cần đấy.
Ví dụ file trên của em, em có một combo box để chọn mã khách hàng. Khách hàng thì có nhiều địa chỉ giao hàng, em tạo thêm một combo box nữa để chọn mã địa chỉ giao hàng. Làm sao để combo box thứ hai hiểu khi chọn mã khách hàng ở combo box 1 thì phải lấy danh sách các mã địa chỉ giao hàng tương ứng ở combo box 2. Thanks you in advance.
 
Lần chỉnh sửa cuối:
Anh AnhTuan và anh TeDayNui ơi! Hỗ trợ bọn em vụ này nhé. Em cũng đang cần đấy.
Ví dụ file trên của em, em có một combo box để chọn mã khách hàng. Khách hàng thì có nhiều địa chỉ giao hàng, em tạo thêm một combo box nữa để chọn mã địa chỉ giao hàng. Làm sao để combo box thứ hai hiểu khi chọn mã khách hàng ở combo box 1 thì phải lấy danh sách các mã địa chỉ giao hàng tương ứng ở combo box 2. Thanks you in advance.

Yêu cầu của bạn có thể thực hiện bằng 2 cách : cách 1 dùng VBA , cách này mình nghĩ tương đối dễ thực hiện và các bạn có thể tự làm được. Cách 2 mình thấy cũng rất hay, hoàn toàn không dùng VBA. Gởi bạn tham khảo nhé

Download File
TDN
 
Yêu cầu của bạn có thể thực hiện bằng 2 cách : cách 1 dùng VBA , cách này mình nghĩ tương đối dễ thực hiện và các bạn có thể tự làm được. Cách 2 mình thấy cũng rất hay, hoàn toàn không dùng VBA. Gởi bạn tham khảo nhé

Download File
TDN

Cảm ơn anh, anh có thể hướng dẫn kỹ hơn về hàm indirect không? Theo như em nghĩ, đây là hàm xử lý mảng??.

Em thấy các anh xài validdation rất hay. Tuy nhiên nó có nhược điểm là không thể hiện nhiều cột tham chiếu như combobox (có nhiều khi không nhớ hết mã hàng, tìm theo tên dễ hơn chẳn hạn). Các anh giúp em xử lý vụ này với combobox nhé.
 
Hầu hết các trường hợp dùng Validation nhiều list đều xài 1 trong 2 hàm: INDIRECT hoặc OFFSET...
Hàm OFFSET thì hơi khó giãi thích 1 chút chứ còn INDIRECT thì rất dể hiểu... Bạn gõ nhăng nhít gì đó vào cell A1.. tại 1 cell khác bạn gõ công thức =INDIRECT("A1") xem nó ra cái gì là tự nhiên hiểu liền
ANH TUẤN
 
Nhân tiện em muốn hỏi luốn ở nhưng form mà mình tạo ra, làm cách nào để tô màu và format vác font chữ trên đó?

Trong phần properties của từng object có một số thuộc tính để format. Ví dụ:
BackColor: màu nền của object
BorderColor: Màu viền xung quanh object
BorderStyle: kiểu viền
Font: Font chữ (bạn có thể chọn font chữ, kích cỡ, in đậm/nghiêng/gạch dưới ở đây)
ForeColor: màu chữ
TextAlign: canh trái/phải/giữa cho text
v.v...

Bạn thử các thuộc tính này xem nhé.
 
Web KT

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

Back
Top Bottom