Anh chị có cách nào để đến được dòng cuối cùng nhanh nhất. (1 người xem)

[baquy]

Anh chị và các Bạn giúp Em làm cách nào để khi bấm vào biểu tượng nào đó mình tạo ra trong file thì con trỏ chuột luôn đặt vào vị trí cuối của vùng nhập liệu.

Em có gửi file đính kèm Anh Chị và các Bạn xem và giúp đỡ. Em xin trân thành cảm ơn.

 

[viehoai]

Anh chị và các Bạn giúp Em làm cách nào để khi bấm vào biểu tượng nào đó mình tạo ra trong file thì con trỏ chuột luôn đặt vào vị trí cuối của vùng nhập liệu.

Em có gửi file đính kèm Anh Chị và các Bạn xem và giúp đỡ. Em xin trân thành cảm ơn.

Bạn xem File thử nhé

 

[baquy]

Đúng như mình mong muốn. Bạn cho mình hỏi bây giờ mà mình muốn làm ở các file khác thì cách làm như thế nào để được như file bạn gửi. Bạn chỉ giúp mình với. Cảm ơn bạn viehoai rất nhiều!

 

[tungson_mrcc]

A. Trong bảng tính excel : Bấm tổ hợp phím Ctrl+Phím mũi tên (cứ thử là biết liền).
B. Muốn biết code cụ thể thì làm như sau:
1. Trong bảng tính, chọn Tools -> Macro -> Record New Macro
2. Trong cửa sổ Macro, tại ô Macro Name, gõ MyMacro rồi bấm OK. Trên bảng tính sẽ xuất hiện nút Stop Record.. Cứ để nguyên như vậy.
3. Thực hiện các thao tác ờ bước A.
4. Nhấn nút Stop Record...
5. Lại vào Tools -> Macro -> Run Macro, chọn MyMacro rồi chọn Edit.
Lúc này sẽ xuất hiện cửa sổ Visual Basic với đoạn code thể hiện các thao tác đã thực hiện tại bước A.

    Range("H16").Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToRight).Select
    Selection.End(xlToRight).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToRight).Select
    Selection.End(xlUp).Select
    Selection.End(xlUp).Select
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
    Selection.End(xlUp).Select
    Selection.End(xlUp).Select

 

[baquy]

A. Trong bảng tính excel : Bấm tổ hợp phím Ctrl+Phím mũi tên (cứ thử là biết liền).
B. Muốn biết code cụ thể thì làm như sau:
1. Trong bảng tính, chọn Tools -> Macro -> Record New Macro
2. Trong cửa sổ Macro, tại ô Macro Name, gõ MyMacro rồi bấm OK. Trên bảng tính sẽ xuất hiện nút Stop Record.. Cứ để nguyên như vậy.
3. Thực hiện các thao tác ờ bước A.
4. Nhấn nút Stop Record...
5. Lại vào Tools -> Macro -> Run Macro, chọn MyMacro rồi chọn Edit.
Lúc này sẽ xuất hiện cửa sổ Visual Basic với đoạn code thể hiện các thao tác đã thực hiện tại bước A.

    Range("H16").Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToRight).Select
    Selection.End(xlToRight).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlToRight).Select
    Selection.End(xlUp).Select
    Selection.End(xlUp).Select
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
    Selection.End(xlUp).Select
    Selection.End(xlUp).Select

Cảm ơn bạn. Bạn cho mình hỏi Bấm tổ hợp phím Ctrl + Phím mũi tên (xuống hay lên vậy bạn?) mình ko biết về BVA nên khó quá mong bạn thông cảm và chỉ giúp mình.

 

[baquy]

Bạn xem File thử nhé

File của bạn mình thấy rất hay. Bất kể mình thêm dòng trống các kiểu ở bên trên thì cái ô tô mầu đó luôn là cố định và dịch chuyển theo. Khi bấm vào biểu tượng ở trên thì con trỏ vẫn trỏ vào. Nếu có thể bạn chỉ giúp mình cách làm với. Mình đã xem code của bạn. Nhưng ko biết cách làm thế nào để bấm vào để nó chạy như của bạn. Bạn chỉ giúp mình. VBA mình chưa biết làm. Cảm ơn bạn.

 

[TrungChinhs]

File của bạn mình thấy rất hay. Bất kể mình thêm dòng trống các kiểu thì cái ô tô mầu đó con trỏ vẫn trỏ vào.

Code của Viethoai là chọn ô cuối tại cột A của vùng làm việc (không liên quan gì đến màu ô đâu, bạn xóa màu đi và thử lại sẽ biết).

Nếu có thể bạn chỉ giúp mình cách làm với. Mình đã xem code của bạn. Nhưng ko biết cách tạo cái để bấm vào như thế nào. Bạn chỉ giúp mình.

Bạn muốn chạy code thì làm như sau: phải chuột vào cái hình ô van màu xanh -> chọn Assign Macro -> chọn DiChuyen rồi nhấn OK.

Code của Viethoai

ActiveSheet.Range("A" & ActiveSheet.UsedRange.Rows.Count).Select

Có thể sửa thành (bỏ ActiveSheet ở đầu câu)

Range("A" & ActiveSheet.UsedRange.Rows.Count).Select

 

[baquy]

Cảm ơn bạn nhiều!
Cách tạo Dichuyen trong Macro thì làm như thế nào vậy bạn? Bạn có thể chỉ giúp mình cách làm được ko?

Mình làm các bước như sau:
1. Trong bảng tính, chọn Tools -> Macro -> Record New Macro
2. Trong cửa sổ Macro, tại ô Macro Name, gõ Dichuyen rồi bấm OK. Trên bảng tính sẽ xuất hiện nút Stop Record..
.......

Bước tiếp theo mong các bạn giúp đỡ. Cảm ơn các bạn nhiều!

 

[viehoai]

Cảm ơn bạn nhiều!
Cách tạo Dichuyen trong Macro thì làm như thế nào vậy bạn? Bạn có thể chỉ giúp mình cách làm được ko?

Mình làm các bước như sau:
1. Trong bảng tính, chọn Tools -> Macro -> Record New Macro
2. Trong cửa sổ Macro, tại ô Macro Name, gõ Dichuyen rồi bấm OK. Trên bảng tính sẽ xuất hiện nút Stop Record..
.......

Bước tiếp theo mong các bạn giúp đỡ. Cảm ơn các bạn nhiều!

1. Ở file mới của bạn, bạn nhấn Alt+F11, cửa sổ VBE hiện ra. Từ Menu Insert bạn chọn Module, sau đó bạn copy đoạn code đó vào module mới chèn
2. Chuyển qua cửa sổ Excel, bạn kích phải hình oval đã vẽ, bạn chọn Assign Macro.. cửa sổ Assign Macro hiện ra bạn chọn DiChuyen --> OK là xong
Chúc bạn thành công