Đoạn code gọi tên sheet tiếng việt

  • #2

Anh chị cho em xin đoạn code: mỗi khi mở file thì nó sẽ mở sheet đó trước (tạm gọi là sheet cố định). Trân trọng cảm ơn

Chép code này vào ThisWorkbook thử xem.

PHP:

Private Sub Workbook_Open()
Sheet1.Activate
[D8].Select
End Sub

Đoạn code gọi tên sheet tiếng việt

  • #3

Xai cái này. Thay chữ tensheet bằng tên sheet muốn nha

Private Sub Workbook_Open()
Sheets("tensheet").Activate
End Sub

Đoạn code gọi tên sheet tiếng việt

  • #4

Cả cái này nữa:

PHP:

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

  • #5

Chào các anh chị, tôi đã thử đoạn code trên khi copy vào thử mở bảng tính của bạn saomai6692 và save shet khác lại chưa được, xin được chỉ giúp. Cảm ơn

Đoạn code gọi tên sheet tiếng việt

  • #6

Bài này giải quyết bằng câu lệnh Sheets("Tên Sheet").Activate thì đúng rồi, nhưng đặt trường hợp Sheet bị ẩn thì sao?
Vậy lý ra code đầy đủ phải là:
- Cho sheet hiện lên
- Active sheet ấy

Đoạn code gọi tên sheet tiếng việt

  • #7

Bài này giải quyết bằng câu lệnh Sheets("Tên Sheet").Activate thì đúng rồi, nhưng đặt trường hợp Sheet bị ẩn thì sao?
Vậy lý ra code đầy đủ phải là:
- Cho sheet hiện lên
- Active sheet ấy

Vậy mình phải đề phòng mọi thứ

PHP:

Private Sub Workbook_Open()
    Sheets("tensheet").visible =True
    Sheets("tensheet").Activate
End Sub

Đoạn code gọi tên sheet tiếng việt

  • #8

Chào các anh chị, tôi đã thử đoạn code trên khi copy vào thử mở bảng tính của bạn saomai6692 và save shet khác lại chưa được, xin được chỉ giúp. Cảm ơn

1. Bạn có thay cái (tensheet) chưa?
2. Bạn có mở chức năng Macro lên chưa?

Chứ code thì không sai chỗ nào đâu. Có tẹo không lẽ sai.

Đoạn code gọi tên sheet tiếng việt

  • #9

vẫn chưa được các bác ạ, phiền quá

Đoạn code gọi tên sheet tiếng việt

  • #10

vẫn chưa được các bác ạ, phiền quá

Làm vầy nè
1> Mở file của bạn lên, bấm Alt + F11 để vào cửa sổ lập trình
2> Trong cửa sổ lập trình, hãy vào menu Insert, chọn Module để chèn 1 Module
3> Xong, copy đoạn code dưới đây paste vào khung phải của Module vừa chèn

Mã:

Sub Auto_Open()
  With Sheets("[COLOR=#ff0000][B]Tên sheet[/B][/COLOR]")  ''<--- Thay tên sheet của bạn vào
    .Visible = True
    .Activate
  End With
End Sub

4> Đóng và lưu file của bạn
5> Mở file và kiểm tra
---------------
Lưu ý:
- Phải hạ mức Security xuống mức Medium thì mới chạy được code ---> Về việc chỉnh Security thế nào, hãy tham khảo ở các bài khác nhé
- Bạn không thể gõ tên sheet bằng tiếng Việt có dấu trong cửa sổ VBA. Vậy nên tốt nhất nên đặt tên sheet ngắn gọn và là tiếng Việt không dấu. Trong trường hợp bắt buộc phải dùng đến tên sheet là tiếng Việt có dấu, ta phải có cách khác (dùng hàm Chr) để code VBA hiểu được tên sheet tiếng Việt có dấu ấy

Lần chỉnh sửa cuối: 10/8/12

Đoạn code gọi tên sheet tiếng việt

  • #11

Bác ndu96081631 chỉ dẫn thật chu đáo. Trân trọng cảm ơn

Đoạn code gọi tên sheet tiếng việt

  • #12

Nhưng trong trường hợp này thì nó lại không mở được. Kính mong các anh giúp đỡ.(file này em xin ở trên diễn đàn)

  • Chu chay OK.xls

    46 KB · Đọc: 7

Đoạn code gọi tên sheet tiếng việt

  • #13

Nhưng trong trường hợp này thì nó lại không mở được. Kính mong các anh giúp đỡ.(file này em xin ở trên diễn đàn)

Trời!
Trong file ấy có sự kiện Workbook_Open, đương nhiên nó sẽ hoạt động trước Sub Autpen
Với cái code RunMarquee trong file này, khi nó chạy sẽ chẳng có cái quái gì chạy được cả (code này thuộc dạng dở ẹc)
------------
Ngoài ra, code của bạn là

Mã:

Sub Auto_Open()
  With Sheets("[COLOR=#ff0000][B]MENU[/B][/COLOR]") 
    .Visible = True
    .Activate
  End With
End Sub

Trong khi tên sheet của bạn là MUNE ---> Bạn nói láy cũng hay ghê

Đoạn code gọi tên sheet tiếng việt

Đoạn code gọi tên sheet tiếng việt

  • #14

Không phải đâu anh, em gõ nhầm, em gửi lại lên mong các anh giup đỡ. Bây giờ thì làm thế nào anh ơi.

  • Chu chay sua.xls

    46 KB · Đọc: 6

Đoạn code gọi tên sheet tiếng việt

  • #15

Không phải đâu anh, em gõ nhầm, em gửi lại lên mong các anh giup đỡ. Bây giờ thì làm thế nào anh ơi.

Mấy thứ này xa xỉ quá, không đáp ứng được cho công việc nhiều nên không khoái lắm

  • Copy of Chu chay sua.rar

    19.4 KB · Đọc: 20

  • #16

Cũng có thể bạn saomai6692 ghép các đoạn code(ráp) là được mà.

  • Chu chay sua.xls

    48 KB · Đọc: 21