[Hỏi] Dùng validation để đi tới một phần khác trong 1 sheet

[iamcuong]

Thân gửi các bác/anh/chị/bạn/em

Hiện em đang chưa có ý tưởng cho vấn đề sau:
- Em có một sheet 'nhận xét'
Tại sheet này:
+ Mỗi tháng sẽ có các dòng ghi chép các quyết định mua/bán trong tháng
+ Liên tục ghi chép như vậy qua các tháng và qua các năm
- Mục đích của em là:
+ Chọn 2 validation tại ô D1 và G1
+ Sau khi chọn xong, thì excel sẽ tự nhẩy sang vùng dữ liệu của tháng đó.



Mong các bác/anh/chị/em cùng hỗ trợ giải đáp. Chân thành cám ơn GPE!

 

[tờ rung]

Mình cũng không hiểu ý bạn lắm, có phải là chọn tháng nào thì vùng range("a7:h" & dongcuoi) sẽ cập nhật tháng đó cho bạn phải không?
Nếu vậy bạn cần có một dữ liệu nguồn nhập trước thì mới lọc dữ liệu được

 

[iamcuong]

Trong sheet đính kèm, mình mới chỉ có tháng 8/2015
Các tháng tiếp theo, mình sẽ tiếp tục ghi thêm vào phần dưới. Mỗi tháng tầm khoảng 30 dòng dữ liệu.
Mục đích là:
- Chọn tháng, chọn năm ở dòng đầu tiên
- File sẽ tự nhảy sang vùng dữ liệu của tháng/năm đó để mình đọc lại.

 

[tờ rung]

Mình không rõ ý bạn lắm, mình thêm một cột "yyyy" để cho bạn đánh năm vào, bạn thử bấm nút "Run" mình vừa tạo xem thử có đúng ý bạn chưa

 

[tờ rung]

sory đây là file của mình lấy từ file gốc của bạn

 

[tờ rung]

file này chỉ cho phép bạn nhập liệu theo thứ tự thời gian.ok

 

[tờ rung]

Bạn dùng file update này có thể dễ nhìn và chuẩn hơn ne!

 

[iamcuong]

Bạn dùng file update này có thể dễ nhìn và chuẩn hơn ne!

Ôi bạn ơi. Đúng như ý tưởng của mình rồi. Ấn RUN 1 cái là con trỏ chuột chạy đúng đến vùng dữ liệu cần tham khảo.
Bạn chỉ giúp mình phương pháp để mình chủ động nghiên cứu nhé.
Đây là file mình vừa bổ sung
P/s: May quá gặp bạn, bạn tìm giúp mình phương án ở bên topic này nữa nhé. Cám ơn bạn lắm lắm
http://www.giaiphapexcel.com/forum/...-sánh-2-vùng-dữ-liệu-động&p=669758#post669758

 

[tờ rung]

Có cao nhân chỉ rồi!

 

[iamcuong]

uh. Bên ấy đã xong.
bạn chỉ giúp mình phương pháp cho bên này nhé.

 

[tờ rung]

phương pháp gì ta? nếu bạn biết VBA rồi thì đọc code trong file mình gửi là hiểu được vấn đề rồi!

 

[tờ rung]

Nếu bạn biết VBA thì đọc code của mình cũng hiểu rồi mà!

 

[iamcuong]

^^, mình đang dịch đoạn code rồi. Có gì mình hỏi sau nha

Sub NhanXet()Dim DongCuoi As Long, i As Long, k As Long, m As Long
DongCuoi = [d1000000].End(xlUp).Row
Range("a7:i" & DongCuoi).Borders.LineStyle = xlNone
For i = 7 To DongCuoi
If Cells(i, 2) = Cells(1, 5) And Cells(i, 3) = Cells(1, 8) Then
k = i
m = m + 1
End If
Next i
If m > 0 Then
With Range(Cells(k - m + 1, 1), Cells(k, 9))
.Borders.LineStyle = 1
.Borders(xlInsideHorizontal).LineStyle = 2
End With
Cells(k - m + 1, 1).Select
End If
End Sub

 

[tờ rung]

Ok, bạn thích hỏi gì thì hỏi? biết thì sẽ trả lời liền!