chữ chạy trên thanh tiêu đề. (1 người xem)

[oicuocsongmenthuong]

vừa rồi em có sửa được tên trên thanh tiêu đề. anh em nào chỉ giáo em cho chữ chạy luôn trên thanh như mong muốn không vậy?

 

[dovanhoc84]

Anh có thấy món trong bát em đang ăn có ngon không mặc dù em và bác đang chém gió với nhau qua mạng?

Câu hỏi của bạn đại loại y như vậy nên tôi nghĩ ít có ai hứng thú trả lời với 1 câu hỏi hời hợt như vậy.

 

[oicuocsongmenthuong]

cảm ơn a! nhưng hoàn toàn là sự thật. có sao e nói vậy mà nếu có sai cho mình xin lỗi

 

[oicuocsongmenthuong]

như e đã sửa trong workbook như sau:

Private Sub Workbook_Open()
Application.Caption = Format(Now(), "dd/mm/yyyy") & ", H" & ChrW$(7891) & " Thi" & ChrW$(7879) & "n Nam, QTDND M" & ChrW$(7929) & " Th" & ChrW$(7841) & "nh. 09.49.08.80.86"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Caption = ""
End Sub
cho ra chữ như em mong muốn. nay e muốn cho dòng chữ trên nó "nhúc nhích" nên nhờ cao nhân chỉ giáo

 

[huuthang_bd]

vừa rồi em có sửa được tên trên thanh tiêu đề. anh em nào chỉ giáo em cho chữ chạy luôn trên thanh như mong muốn không vậy?

Tiêu đề của cái gì???

 

[chuot0106]

vừa rồi em có sửa được tên trên thanh tiêu đề. anh em nào chỉ giáo em cho chữ chạy luôn trên thanh như mong muốn không vậy?

Bạn tự đọc lại câu hỏi của bạn và đặt địa vị bạn là 1 người đang đi giúp! Sau đó bạn sẽ biết suy nghĩ cũng như thái độ của họ nhé!

 

[oicuocsongmenthuong]

Bạn tự đọc lại câu hỏi của bạn và đặt địa vị bạn là 1 người đang đi giúp! Sau đó bạn sẽ biết suy nghĩ cũng như thái độ của họ nhé!

hiểu rồi, cũng vì sử dụng từ ngữ không đúng thôi. cảm ơn a em

 

[tk0213]

vừa rồi em có sửa được tên trên thanh tiêu đề. anh em nào chỉ giáo em cho chữ chạy luôn trên thanh như mong muốn không vậy?

Đây là những gì bạn muốn...muốn nhiều hiệu ứng hơn thì bạn vào VBA mà thay đổi code tại Sub vong2().

Chúc bạn vui vẻ!

 

[hophoang]

Đây là những gì bạn muốn...muốn nhiều hiệu ứng hơn thì bạn vào VBA mà thay đổi code tại Sub vong2().

Chúc bạn vui vẻ!

Sao cái này khi sang file khác nó có màu vàng
ActiveWorkbook.Worksheets("VALUE").Activate

 

[giaiphap]

Sao cái này khi sang file khác nó có màu vàng
ActiveWorkbook.Worksheets("VALUE").Activate

File khác của bạn có Sheet VALUE hay không?

 

[hophoang]

File khác của bạn có Sheet VALUE hay không?

Đầu tiên mở file CHỮ CHẠY RỒI CHO MACROS CHẠY.Sau đó mở bất kỳ file nào lên(file không có shett nào tên VALUE) thì nó báo màu vàng,FILE CHU CHAY maros không hoạt động nữa

 

[giangleloi]

Đầu tiên mở file CHỮ CHẠY RỒI CHO MACROS CHẠY.Sau đó mở bất kỳ file nào lên(file không có shett nào tên VALUE) thì nó báo màu vàng,FILE CHU CHAY maros không hoạt động nữa

Bởi vì khi đó ActiveWorkbook đâu phải là File CHỮ CHẠY nữa.
Đổi câu này ActiveWorkbook.Worksheets("VALUE").Activate thành ThisWorkbook.Worksheets("VALUE").Activate là hiểu được vấn đề ngay.

 

[oicuocsongmenthuong]

sữa tên trên tiêu đề đó anh, thay vì chữ excel e thay đổi tên Ngân Hàng BIDV thí dụ vậy? mà nó chạy á. cảm ơn mọi người và thứ lỗi sử dụng từ ngữ k đúng.

 

[oicuocsongmenthuong]

chữ vẫn chạy nhưng khi qua sheet 2 hay sheet nào đó nó không cho a ơi. thế thì e làm gì các sheet kia. cảm ơn a

 

[oicuocsongmenthuong]

đa phần hổm rày là các chữ chạy em đã học hỏi ở anh em rất nhiều. nhưng 1 vấn đề chung là khi chạy thì các ô khác e đánh thông tin k được. thay vì thế phải ngừng chạy mới đánh được. hic cảm ơn anh em đã chỉ giáo. Dường như nó quá khó vs e

 

[tk0213]

đa phần hổm rày là các chữ chạy em đã học hỏi ở anh em rất nhiều. nhưng 1 vấn đề chung là khi chạy thì các ô khác e đánh thông tin k được. thay vì thế phải ngừng chạy mới đánh được. hic cảm ơn anh em đã chỉ giáo. Dường như nó quá khó vs e

Vấn đề của bạn xử lý như sau:
- Thay vì lấy dữ liệu chữ chạy liên tục => mình chuyển qua lấy 1 lần duy nhất khi mở file (Do đó để cập nhật lại nội dung dòng chữ chạy: (1) bạn phải đóng file và mở lại; (2) Chạy lại macro "Khoidong"{Bạn có thể tự tạo cho mình 1 Nút bấm cho tiện})
- Các biến chứa dữ liệu tạo hiệu ứng lúc trước sử dụng trên ô của Sheet => mình chuyển thành biến toàn cục (Quá trình còn lại không phụ thuộc vào Sheet)

Suy ra trên CODE mới bạn tha hồ thao tác trên tất cả các Sheet còn lại mà không bị cản trở. Đồng thời khi bạn mở file Excel khác lên thì dòng chữ chạy của bạn cũng không bị ảnh hưởng.

 

[hophoang]

Bởi vì khi đó ActiveWorkbook đâu phải là File CHỮ CHẠY nữa.
Đổi câu này ActiveWorkbook.Worksheets("VALUE").Activate thành ThisWorkbook.Worksheets("VALUE").Activate là hiểu được vấn đề ngay.

ThisWorkbook.Worksheets("VALUE").Activate chỉ xem được file CHỮ CHẠY .Còn các file khác đã mở nhưng tab không qua(khong xem được)
Bây giờ làm thế nào
1.Coppy Module này vào một file khác sửa nó như thế nào để chạy chữ được
2.Mở file có chữ chạy tab sang các file khác được

 

[hophoang]

Vấn đề của bạn xử lý như sau:
- Thay vì lấy dữ liệu chữ chạy liên tục => mình chuyển qua lấy 1 lần duy nhất khi mở file (Do đó để cập nhật lại nội dung dòng chữ chạy: (1) bạn phải đóng file và mở lại; (2) Chạy lại macro "Khoidong"{Bạn có thể tự tạo cho mình 1 Nút bấm cho tiện})
- Các biến chứa dữ liệu tạo hiệu ứng lúc trước sử dụng trên ô của Sheet => mình chuyển thành biến cục bộ (Quá trình còn lại không phụ thuộc vào Sheet)

Suy ra trên CODE mới bạn tha hồ thao tác trên tất cả các Sheet còn lại mà không bị cản trở. Đồng thời khi bạn mở file Excel khác lên thì dòng chữ chạy của bạn cũng không bị ảnh hưởng.

Sao mở file không thấy chữ chay bạn ơi