cách tạo button đóng, mở sheet

[xyanua6881]

Tôi mới học excel và có một vài vấn đền xin nhờ các bạn giúp đỡ
1. Khi A1=B1 thì C1 hiện thị 1 hình tròn thì làm thế nào?
2. Tôi muốn tạo một button ở sheet1 để khi nhấp vào thì tự động mở sheep2 và coppy một dòng dữ liệu ở sheep1 sang một dòng cố định sheep2 (giả sử là dòng 1). Ở sheep2 tạo một button đóng sheep 2 và mở sheep 1
Tôi rất gà về excel, Nên mong các bạn nhiệt tình giải đáp kĩ một chút, mong các bạn bớt chút thời gian chỉ bảo

 

[khoavu87]

Tôi mới học excel và có một vài vấn đền xin nhờ các bạn giúp đỡ
1. Khi A1=B1 thì C1 hiện thị 1 hình tròn thì làm thế nào?
2. Tôi muốn tạo một button ở sheet1 để khi nhấp vào thì tự động mở sheep2 và coppy một dòng dữ liệu ở sheep1 sang một dòng cố định sheep2 (giả sử là dòng 1). Ở sheep2 tạo một button đóng sheep 2 và mở sheep 1
Tôi rất gà về excel, Nên mong các bạn nhiệt tình giải đáp kĩ một chút, mong các bạn bớt chút thời gian chỉ bảo

thử xem sao.còn ý một bạn mô tả thêm dữ liệu xem sao?

 

[anhkietvn]

Tôi mới học excel và có một vài vấn đền xin nhờ các bạn giúp đỡ
1. Khi A1=B1 thì C1 hiện thị 1 hình tròn thì làm thế nào?
2. Tôi muốn tạo một button ở sheet1 để khi nhấp vào thì tự động mở sheep2 và coppy một dòng dữ liệu ở sheep1 sang một dòng cố định sheep2 (giả sử là dòng 1). Ở sheep2 tạo một button đóng sheep 2 và mở sheep 1
Tôi rất gà về excel, Nên mong các bạn nhiệt tình giải đáp kĩ một chút, mong các bạn bớt chút thời gian chỉ bảo

Ở câu một mình chưa hiểu ý bạn, cho thêm thêm ví dụ mô tả nhé
còn ý 2 và 3 thì theo mình biết sheet không có chức năng đóng mở (close/open) như wookbook, mà chỉ có chức năng hide và unhide thôi

 

[xyanua6881]

Cảm ơn 2 bạn đã nhiệt tình giúp, có lẽ do trình độ excel của tôi quá i tờ nên đến câu hỏi cũng không nêu rõ ràng được!
VD như file Excel này, khi tôi muốn tạo button ở sheet DS_NV để khi muốn xem thông tin chi tiết của 1 nhân viên nào đấy chỉ cần click vào thì tất cả thông tin của nhân viên đấy sẽ được hiện thị ở sheet THONG TIN và sheet THONG TIN tự động được mở lên
1. Muốn làm việc đấy tôi phải tạo mỗi nhân viên 1 button riêng hay chỉ cần tạo 1 button chung cho tất cả?
2. Cách làm như thế nào?
3. Ở sheet THONG TIN tạo 1 button quay lại sheet DS_NV

 

[concogia]

Cảm ơn 2 bạn đã nhiệt tình giúp, có lẽ do trình độ excel của tôi quá i tờ nên đến câu hỏi cũng không nêu rõ ràng được!
VD như file Excel này, khi tôi muốn tạo button ở sheet DS_NV để khi muốn xem thông tin chi tiết của 1 nhân viên nào đấy chỉ cần click vào thì tất cả thông tin của nhân viên đấy sẽ được hiện thị ở sheet THONG TIN và sheet THONG TIN tự động được mở lên
1. Muốn làm việc đấy tôi phải tạo mỗi nhân viên 1 button riêng hay chỉ cần tạo 1 button chung cho tất cả?
2. Cách làm như thế nào?
3. Ở sheet THONG TIN tạo 1 button quay lại sheet DS_NV

Làm đại như thế này đi, trật ....làm lại

 

[ptm0412]

Dùng for chậm lắm Cò già ơi. Thử tham khảo dùng Find hoặc dùng Match xem sao:

Sub find1()
   Dim CllAdress, Dk, times
   times = Timer
   With Sheet1
      Dk = .[g2]
      CllAdress = .Range(.[b2], .[b65000].End(xlUp)).Find(Dk).Address
      .Range(CllAdress).Resize(, 4).Copy Sheets("thong tin").[b3]
      .[f2] = Timer - times
   End With
   ''Sheets("thong tin").Select
End Sub

Sub find2()
   Dim CllRow, Dk, times
   times = Timer
   With Sheet1
      Dk = .[g2]
      CllRow = Application.Match(Dk, .Range(.[b2], .[b65000].End(xlUp)), 0)
      .Cells(CllRow, 2).Resize(, 4).Copy Sheets("thong tin").[b3]
      .[f3] = Timer - times
   End With
   ''Sheets("thong tin").Select
End Sub

Sub find3()
   Dim Cll, Dk, times
   times = Timer
   With Sheet1
      Dk = .[g2]
      For Each Cll In .Range([b2], [b65000].End(xlUp))
         If Cll = Dk Then Cll.Resize(, 4).Copy Sheets("thong tin").[b3]: Exit For
      Next
      .[f4] = Timer - times
   End With
''Sheets("thong tin").Select
End Sub

Private Sub CommandButton1_Click()
find1
find2
find3
End Sub

Thử với 50.000 dòng và tìm thấy ở dòng 49.500:

find: 0,093994141 giây
match: 0,062011719 giây
for: 0,405975342 giây

Match nhanh nhất, For chậm nhất, For so với Match chậm hơn gần 7 lần. Find nhanh gần bằng Match.

Ghi chú: Giả định rằng cột tên không bị trùng, và tìm chắc chắn có.

 

[xyanua6881]

Cảm ơn 2 bạn, Mình đã làm được rồi, cho dù không hiểu lắm, chỉ copy các câu lệnh rồi dán vào và sử đổi chút thôi! Cho mình hỏi thêm 1 câu nữa, trong file của ConCogia gửi lên làm sao tạo được dữ liệu như cột G, Hình như dùng Filter phải không? Mong các bạn hướng dẫn kĩ một chút
Mình dung autofilter thì khi chọn tên một nhân viên nào đó thì tên và thông tin của những người còn lại bị ẩn mất