Mong anh chị và các bạn giúp cách mỗi lần mở file con trỏ luôn nằm ở 1 sheet cố định

[baquy]

Các Bác giúp em cách mỗi lần mở file con trỏ luôn nằm ở 1 sheet cố định

Em đang có một file trong đó có các sheet sau:
- sheet "Menu"
- sheet "Nhat ky xuat"
- sheet "Bao cao xuat"
Các Bác làm ơn chỉ giúp có cách nào để mỗi khi đóng và mở file đó lên thì con trỏ chuột luôn luôn nằm ở sheet "MENU"
Em có gửi file đính kèm. Các Bác có cách nào chỉ bảo giúp em. Cảm ơn các Bác rất nhiều!

 

[viehoai]

Em đang có một file trong đó có các sheet sau:
- sheet "Menu"
- sheet "Nhat ky xuat"
- sheet "Bao cao xuat"
Các Bác làm ơn chỉ giúp có cách nào để mỗi khi đóng và mở file đó lên thì con trỏ chuột luôn luôn nằm ở sheet "MENU"
Em có gửi file đính kèm. Các Bác có cách nào chỉ bảo giúp em. Cảm ơn các Bác rất nhiều!

Bạn sử dụng code trong thisworkbook

Private Sub Workbook_Open()
Sheet1.Select
End Sub

 

[nghiaphuc]

Em đang có một file trong đó có các sheet sau:
- sheet "Menu"
- sheet "Nhat ky xuat"
- sheet "Bao cao xuat"
Các Bác làm ơn chỉ giúp có cách nào để mỗi khi đóng và mở file đó lên thì con trỏ chuột luôn luôn nằm ở sheet "MENU"
Em có gửi file đính kèm. Các Bác có cách nào chỉ bảo giúp em. Cảm ơn các Bác rất nhiều!

Bạn nhấn Alt+F11, nhấp đúp vào đối tượng ThisWorkbook (trong khung bên trái), trong khung bên phải, bạn dán code này vào:

Private Sub Workbook_Open()
    Sheets("Menu").Select
End Sub

Sau đó đóng file (nhớ lưu file) và mở lại xem có được không.

 

[baquy]

Bạn sử dụng code trong thisworkbook

Mình làm theo cách của bạn. Nhưng chưa đc. Bạn có thể làm luôn vào file của mình rồi up lên đây giúp mình được không?. Mong bạn giúp mình. Cảm ơn bạn!

 

[nghiaphuc]

Mình làm theo cách của bạn. Nhưng chưa đc. Bạn có thể làm luôn vào file của mình rồi up lên đây giúp mình được không?. Mong bạn giúp mình. Cảm ơn bạn!

File của bạn đây. Nhớ đặt Security ở mức Medium hoặc Low nhé (chọn Tools\Macro\Security và thiết lập).

 

[baquy]

Bạn nhấn Alt+F11, nhấp đúp vào đối tượng ThisWorkbook (trong khung bên trái), trong khung bên phải, bạn dán code này vào:

Private Sub Workbook_Open()
    Sheets("Menu").Select
End Sub

Sau đó đóng file (nhớ lưu file) và mở lại xem có được không.

Vẫn ko được bạn ah. Mình làm vào trong file rồi mình gửi lên bạn xem sai chỗ nào giúp mình với. Cảm ơn Bạn!

 

[nghiaphuc]

Vẫn ko được bạn ah. Mình làm vào trong file rồi mình gửi lên bạn xem sai chỗ nào giúp mình với. Cảm ơn Bạn!

Tại bạn đặt code sai chỗ. Bạn đọc lại nhé (chỗ màu đỏ):

Bạn nhấn Alt+F11, nhấp đúp vào đối tượng ThisWorkbook (trong khung bên trái), trong khung bên phải, bạn dán code này vào:

Private Sub Workbook_Open()
    Sheets("Menu").Select
End Sub

Sau đó đóng file (nhớ lưu file) và mở lại xem có được không.

 

[viehoai]

Vẫn ko được bạn ah. Mình làm vào trong file rồi mình gửi lên bạn xem sai chỗ nào giúp mình với. Cảm ơn Bạn!

Sao bạn đặt code đó trong Module ? Bạn lấy File anh nghiaphuc í

 

[baquy]

Sao bạn đặt code đó trong Module ? Bạn lấy File anh nghiaphuc í

Cảm ơn bạn. mình lấy file của anhnghiaphuc về và mở ra đúng như mình mong muốn rồi. ah bạn ơi bây giờ mình mà muốn đặt pass để bảo vệ code đó thì làm cách nào vậy bạn? Bạn chỉ giúp mình luôn nhé.

 

[baquy]

Cảm ơn Bác Viehoai và Bác Hoàng Nghĩa Phúc rất nhiều. Các Bác chỉ bảo mình làm theo được rồi. cả đặt pass mày mò bây giờ ok rồi. Một lần nữa cảm ơn 2 Bác !

 

[ndu96081631]

Cảm ơn bạn. mình lấy file của anhnghiaphuc về và mở ra đúng như mình mong muốn rồi. ah bạn ơi bây giờ mình mà muốn đặt pass để bảo vệ code đó thì làm cách nào vậy bạn? Bạn chỉ giúp mình luôn nhé.

Sao mấy chú lính mới hay thích làm mấy cái vụ pass piết thế nhỉ? Học không lo lại đi lo làm những việc tào lao
Chỉ có mỗi chuyện Active 1 sheet cố định mà còn hỏi tới hỏi lui thì cái vụ pass piết gì đó tốt nhất hãy đợi vài năm nữa đi ---> Có đặt pass người ta cũng phá được như thường