Caption của dialog sheet (4 người xem)

[vba_gpe]

Chào anh/chị GPE ngày mới.
Cho em hỏi: Trong UserForm tạo bằng Dialogsheet 5.0 của Excel, Caption của Userform đó mình dùng đối tượng nào khi code nhỉ?
Em thử:

- Thisworkbook.sheets("Tên dialog sheet").caption 
- Thisworkbook.sheets("Tên dialog sheet").Text
- Thisworkbook.DialogSheets("Tên dialog sheet").caption 
- Thisworkbook.DialogSheets("Tên dialog sheet").Text

Em thử record macro thì nó gắn các đối tượng của dialog này ở dạng shape (form, button,....).
Em chuyển qua đặt shape theo cú pháp:
Thisworkbook.sheets("Tên sheet dialogsheet").shape("Tên dialogsheet").text =abc
thì cũng báo không tồn tại object luôn.

Không biết phải khai báo như thế nào đối với Caption của userform trong Dialogsheet bằng code nhỉ?

Cảm ơn anh chị nhiều
Mong nhận được hồi đáp.

 

[chucuoi92]

Chào anh/chị GPE ngày mới.
Cho em hỏi: Trong UserForm tạo bằng Dialogsheet 5.0 của Excel, Caption của Userform đó mình dùng đối tượng nào khi code nhỉ?
Em thử:

- Thisworkbook.sheets("Tên dialog sheet").caption
- Thisworkbook.sheets("Tên dialog sheet").Text
- Thisworkbook.DialogSheets("Tên dialog sheet").caption
- Thisworkbook.DialogSheets("Tên dialog sheet").Text

Em thử record macro thì nó gắn các đối tượng của dialog này ở dạng shape (form, button,....).
Em chuyển qua đặt shape theo cú pháp:
Thisworkbook.sheets("Tên sheet dialogsheet").shape("Tên dialogsheet").text =abc
thì cũng báo không tồn tại object luôn.

Không biết phải khai báo như thế nào đối với Caption của userform trong Dialogsheet bằng code nhỉ?

Cảm ơn anh chị nhiều
Mong nhận được hồi đáp.

Bạn thử thế này xem sao:
Sheets("Tên dialog sheet").DialogFrame.Caption = "GPE"

 

[vba_gpe]

Bạn thử thế này xem sao:
Sheets("Tên dialog sheet").DialogFrame.Caption = "GPE"

Chuẩn quá bác ạ. Cảm ơn bạn nhiều. ^_^

Đúng là GPE ok quá.
Tìm món Dialogsheet trên google bằng tiếng anh mà ít quá, chẳng biết mô tả thế nào cho đúng nội dung cần tìm nữa.

 

[ndu96081631]

Chào anh/chị GPE ngày mới.
Cho em hỏi: Trong UserForm tạo bằng Dialogsheet 5.0 của Excel, Caption của Userform đó mình dùng đối tượng nào khi code nhỉ?
Em thử:

- Thisworkbook.sheets("Tên dialog sheet").caption
- Thisworkbook.sheets("Tên dialog sheet").Text
- Thisworkbook.DialogSheets("Tên dialog sheet").caption
- Thisworkbook.DialogSheets("Tên dialog sheet").Text

Em thử record macro thì nó gắn các đối tượng của dialog này ở dạng shape (form, button,....).
Em chuyển qua đặt shape theo cú pháp:
Thisworkbook.sheets("Tên sheet dialogsheet").shape("Tên dialogsheet").text =abc
thì cũng báo không tồn tại object luôn.

Không biết phải khai báo như thế nào đối với Caption của userform trong Dialogsheet bằng code nhỉ?

Cảm ơn anh chị nhiều
Mong nhận được hồi đáp.

Bạn viết code kiểu đó nên không nhìn được gợi ý từ tooltip xổ xuống
Chuẩn nhất là nên khai báo DialogSheet rõ ràng thế này:

  Dim dlg As DialogSheet
  Set dlg = DialogSheets("Dialog1")  'Dialog1 là tên của Dialog sheet
  dlg.DialogFrame.Caption = "THÔNG BÁO"
  ''Hoặc dlg.DialogFrame.Characters.Text = "XYZ"
  dlg.Show

 

[vba_gpe]

Bạn viết code kiểu đó nên không nhìn được gợi ý từ tooltip xổ xuống
Chuẩn nhất là nên khai báo DialogSheet rõ ràng thế này:

  Dim dlg As DialogSheet
  Set dlg = DialogSheets("Dialog1")  'Dialog1 là tên của Dialog sheet
  dlg.DialogFrame.Caption = "THÔNG BÁO"
  ''Hoặc dlg.DialogFrame.Characters.Text = "XYZ"
  dlg.Show

Dạ. Em sẽ lưu ý. Cảm ơn thầy nhiều ạ.

 

[vba_gpe]

Bạn viết code kiểu đó nên không nhìn được gợi ý từ tooltip xổ xuống
Chuẩn nhất là nên khai báo DialogSheet rõ ràng thế này:

  Dim dlg As DialogSheet
  Set dlg = DialogSheets("Dialog1")  'Dialog1 là tên của Dialog sheet
  dlg.DialogFrame.Caption = "THÔNG BÁO"
  ''Hoặc dlg.DialogFrame.Characters.Text = "XYZ"
  dlg.Show

Sao của em nó không có đoạn DialogFrame thầy nhỉ.
Không biết em có khai báo nhầm chỗ nào không ạ.
Nhờ thầy xem giúp
Cảm ơn thầy nhiều ạ.

 

[ndu96081631]

Sao của em nó không có đoạn DialogFrame thầy nhỉ.
Không biết em có khai báo nhầm chỗ nào không ạ.
Nhờ thầy xem giúp
Cảm ơn thầy nhiều ạ.

Trong VBA có rất nhiều thuộc tính và phương thức ẩn. DialogFrame thuộc dạng này. Để hiện nó, bạn làm như sau:
- Trong cửa sổ VBA, bạn bấm phím F2 để hiện cửa sổ Object Browser
- Click chuột phải bất cứ chỗ nào trong cửa sổ Object Browser và chọn vào mục "Show Hidden Members"



- Xong, quay lại module bạn đang viết code, sẽ thấy DialogFrame (nhưng hơi mờ mờ)

 

[vba_gpe]

Trong VBA có rất nhiều thuộc tính và phương thức ẩn. DialogFrame thuộc dạng này. Để hiện nó, bạn làm như sau:
- Trong cửa sổ VBA, bạn bấm phím F2 để hiện cửa sổ Object Browser
- Click chuột phải bất cứ chỗ nào trong cửa sổ Object Browser và chọn vào mục "Show Hidden Members"

View attachment 181755

- Xong, quay lại module bạn đang viết code, sẽ thấy DialogFrame (nhưng hơi mờ mờ)

View attachment 181756

Cảm ơn thầy rất nhiều. Bây giờ em mới biết VBA có thêm chỗ này nữa đấy ạ.
Chúc thầy và anh chị GPE cuối tuần nhiều niềm vui.