Đưa ô vừa click thành ô đầu tiên

[nguyennb]

Mình muốn biết làm thế nào để chuyển ô vừa click thành ô trên cùng của cửa sổ.

Bình thường mỗi khi click vào một ô, muốn xem nội dung các ô phía dưới thì ta phải kéo con lăn chuột hoặc dùng mũi tên xuống. bây giờ mình muốn khi click vào ô nào đó thì ô đó sẽ biến thành ô đầu tiên của cửa sổ để mình có thể dễ dàng xem nội dung các ô phía dưới.
​

 

[hoangdanh282vn]

Mình muốn biết làm thế nào để chuyển ô vừa click thành ô trên cùng của cửa sổ.

Bình thường mỗi khi click vào một ô, muốn xem nội dung các ô phía dưới thì ta phải kéo con lăn chuột hoặc dùng mũi tên xuống. bây giờ mình muốn khi click vào ô nào đó thì ô đó sẽ biến thành ô đầu tiên của cửa sổ để mình có thể dễ dàng xem nội dung các ô phía dưới.
​

Ý kiến này rất hay. Có điều thực hiện hơi khó.
Muốn làm được thì ta phải xác định được tọa độ của ô hiện hành trong vùng soạn thảo mà ta nhìn thấy được. Không biết có cách nào không nữa!

 

[hoangvuluan]

Copy code dưới đây vào mục ThisWorkBook trong cửa sổ VBE, đảm bảo bấm vào ô nào cũng đưa nó về góc trên trái. (Nếu chỉ muốn cuộn dòng thì hủy lệnh cuộn cột đi nhé)

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    ActiveWindow.ScrollRow = Target.Row
    ActiveWindow.ScrollColumn = Target.Column
End Sub

 

[rollover79]

Yêu cầu này có thể thực hiện bởi 1 câu lệnh đơn giản như sau, viết code cho từng Sheet nào cần yêu cầu này

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.Goto Target, True
End Sub

Tuy nhiên tôi thấy nó cũng không được hay lắm, có khi còn bất tiện.

 

[Po_Pikachu]

Bác nói hay à! Vậy bác có thể giải thích cho em được rõ nó hay ở điểm nào không? Vì em thấy chẳng hay gì cả. Nếu dữ liệu 20,000 dòng thì bác vẫn phải kéo thanh cuộn xuống tít dưới rồi click chuột 1 cái thì nó mới lên trên đầu. Vậy thà ta xem ngay tại điểm đó luôn còn hơn. Mà bác cũng có thể thấy dữ liệu trên thanh Formula rồi còn gì? Vậy bác cho em xin ý kiến đi. Thân.

 

[hoangdanh282vn]

Code của Hoangvuluan rất hay, có lẽ đã đáp ứng yêu cầu của tác giả rồi.

To Rollover79 : Code của bạn cũng rất hay. Có những cái thật đơn giản mà mình không nghĩ ra.

To : Po_Pikachu : có công dụng chứ bạn. xem nhé.
Giả sử ta có một sổ nhật ký theo dõi ngân hàng, khi có phát sinh thì ta nhập liệu vào. Cuối tháng, nếu xảy ra sai sót thì ta dùng chứng từ gốc để đối chiếu với sổ nhật ký. Khi đối chiếu ta sẽ nhìn vào sổ nhật ký và đối chiếu với số chứng từ bên ngoài. Đối chiếu từng dòng chứng từ 1, cho đến hết một trang, ta chỉ cần click vào ô cuối cùng là ta đã có một trang kế tiếp để đối chiếu (thay vì phải cuộn con lăn vài lượt, lăn nhiều cũng hơi oải).

Nhưng thật ra chẳng cần code gì cả, vì ta đã có phím Pagedown rồi còn gì. Nhưng ở đây quan trọng là giải thuật. Ta sẽ áp vào những việc khác khi cần đến.

 

[Po_Pikachu]

Vậy nếu bác nói ra ngay từ đầu thì cần gì viết code chi cho mệt. 1 là có thể dùng lệnh Find để đối chiếu số liệu hoặc như bác nói đó là hai phím Page Up va Page Down. Vậy có phải nhanh hơn không? Hoặc có thể dùng AutoFilter để chọn mã số ngày hoặc mã số chứng từ để lọc và test lại. Cũng đâu cần code gì đâu. Hic Thân.

 

[ndu96081631]

Code thì hay nhưng ý tưởng không hay!
Lúc kéo xuống thuận tiện bao nhiêu thì lúc "đi lên" khổ bấy nhiêu
Thôi thì dùng Freeze Panes cho ngon... hoặc là cái gì đó tùy theo điều kiện cụ thể (Hyperlink chẳng hạn)

 

[nguyennb]

Mình đang làm một cái chương trình trắc nghiệm viết bằng Excel. Sau mỗi câu hỏi sẽ có hai nút "Cau tiep" và "Cau truoc". Khi ấn 2 nut này thì nó sẽ nhảy sang câu tiếp theo và quay về câu trước. Việc này đã giải quyết được khi đặt name cho các câu hỏi và dùng Hyperlink. Tuy nhiên khi nó nhảy tới một name nào đó thì tôi muốn name đó lên trên cùng cho dễ quan sát

 

[Po_Pikachu]

Nếu làm trắc nghiệm thì làm như bạn đúng là không chuyên nghiệp gì hết. Đầu tiên cần 1 sheet chứa dữ liệu gồm câu hỏi và các đáp của câu hỏi đó, và cả 1 bảng kết quả đúng nữa. Rồi ẩn sheet đó đi. Tiếp theo, cần 1 sheet dùng để hiển thị câu hỏi và các đáp cùng số đề tên học sinh và mọi thứ mà học sinh đó sẽ làm trên đề đó. Việc nhấn nút để sang câu hỏi tiếp theo thực ra là quá trình làm tăng hoặc giảm 1 số (biến Public) để chọn số của câu hỏi tương ưng bên sheet dữ liệu. Và nó sẽ đem dữ liệu vào vị trí ô tương ứng. Vậy vừa đẹp vừa đơn giản nữa. Tốt hơn cái kia nhiều. Thân.