Tổng hợp tên sheet (1 người xem)

[Hoangkhoi2012]

Chào Anh Chị GPE,

em có đang làm 1 code để lấy thông tin tên các sheet vào sheet Tổng Hợp, nhưng không hiểu sao tên viết dính vào thì chạy ok, nhưng khi tên sheet có thêm: Khoảng trắng, dấu "_" hoặc "-" thì không thể link được, nhờ anh chị xem file giúp em là bị thiếu cái gì nha.

Cảm ơn anh chị rất nhiều.

 

[nghiaphuc]

Chào Anh Chị GPE,

em có đang làm 1 code để lấy thông tin tên các sheet vào sheet Tổng Hợp, nhưng không hiểu sao tên viết dính vào thì chạy ok, nhưng khi tên sheet có thêm: Khoảng trắng, dấu "_" hoặc "-" thì không thể link được, nhờ anh chị xem file giúp em là bị thiếu cái gì nha.

Cảm ơn anh chị rất nhiều.

Nếu bạn để ý, khi lập công thức lấy dữ liệu từ sheet khác, nếu tên sheet có khoảng trắng thì trong công thức, tên sheet luôn được bao bởi một cặp dấu nháy đơn (').
Vậy, để khắc phục vấn đề của bạn, bạn cần sửa chỗ

SubAddress:=TenSheet.Name & "!A1"

thành:

SubAddress:=[SIZE=4][COLOR=#ff0000]"'" &[/COLOR][/SIZE] TenSheet.Name & "[SIZE=4][COLOR=#ff0000]'[/COLOR][/SIZE]!A1"

 

[Hoangkhoi2012]

Nếu bạn để ý, khi lập công thức lấy dữ liệu từ sheet khác, nếu tên sheet có khoảng trắng thì trong công thức, tên sheet luôn được bao bởi một cặp dấu nháy đơn (').
Vậy, để khắc phục vấn đề của bạn, bạn cần sửa chỗ

SubAddress:=TenSheet.Name & "!A1"

thành:

SubAddress:=[SIZE=4][COLOR=#ff0000]"'" &[/COLOR][/SIZE] TenSheet.Name & "[SIZE=4][COLOR=#ff0000]'[/COLOR][/SIZE]!A1"

Nhanh gọn, đã giải quyết xong, em cảm ơn anh rất nhiều.

 

[Hoangkhoi2012]

Nếu bạn để ý, khi lập công thức lấy dữ liệu từ sheet khác, nếu tên sheet có khoảng trắng thì trong công thức, tên sheet luôn được bao bởi một cặp dấu nháy đơn (').
Vậy, để khắc phục vấn đề của bạn, bạn cần sửa chỗ

SubAddress:=TenSheet.Name & "!A1"

thành:

SubAddress:=[SIZE=4][COLOR=#ff0000]"'" &[/COLOR][/SIZE] TenSheet.Name & "[SIZE=4][COLOR=#ff0000]'[/COLOR][/SIZE]!A1"

Chào anh Nghiaphuc,

Em muốn thêm số thứ tự nữa thì làm sao anh? vì nếu nhiều sheet mà không có stt thì dễ bị nhầm lẫn, nhờ anh xem giúp em nha.

 

[giaiphap]

Chào anh Nghiaphuc,

Em muốn thêm số thứ tự nữa thì làm sao anh? vì nếu nhiều sheet mà không có stt thì dễ bị nhầm lẫn, nhờ anh xem giúp em nha.

Chổ màu đỏ nè bạn

TextToDisplay:=[COLOR=#ff0000][B]TenSheet.Index & ". " &[/B][/COLOR] TenSheet.Name

 

[Hoangkhoi2012]

Chổ màu đỏ nè bạn

TextToDisplay:=[COLOR=#ff0000][B]TenSheet.Index & ". " &[/B][/COLOR] TenSheet.Name

Cảm ơn anh nha,
Em dùng thế này cho nó chạy từ số 1

TextToDisplay:=[COLOR=#ff0000][B]TenSheet.Index -1 & ". " &[/B][/COLOR] TenSheet.Name