Vấn đề dùng code để điều khiển Folder. (1 người xem)

[Hoàng Trọng Nghĩa]

Kính thưa các Thầy Cô, Anh Chị,
Tôi có một thắc mắc là có thể sử dụng Code của Excel để điều khiển tất cả các Folder đang hiện hành từ Maximize, Normal trở thành Minimize (thu nhỏ nhất) hay không? Nếu có, xin vui lòng tặng mình đoạn code đó nhé!
Cảm ơn rất nhiều ạ.

 

[ndu96081631]

Đúng là có hiệu nghiệm, tuy nhiên, các cửa sổ lần lượt "khép từ từ" làm mình cảm giác khó chịu! hihihihi

Thì đương nhiên vậy rồi ---> Duyệt qua các cửa sổ và Minimize nó mà
Muốn không khó chịu thì dùng MinimizeAll như bài 13 ấy. Có điều lại phải chấp nhận thêm 1 code để Maximize ActiveWindow (được cái này mất cái kia)

 

[Hoàng Trọng Nghĩa]

Thì đương nhiên vậy rồi ---> Duyệt qua các cửa sổ và Minimize nó mà
Muốn không khó chịu thì dùng MinimizeAll như bài 13 ấy. Có điều lại phải chấp nhận thêm 1 code để Maximize ActiveWindow (được cái này mất cái kia)

Bài 13 (xui lém), máy em thì chạy không sao, một số khác bị lỗi y chang lỗi của Sư phụ Mỹ! Phải tắt nguồn khởi động lại mới chạy máy được đó! Ẹc ... Ẹc ...

 

[ndu96081631]

Bài 13 (xui lém), máy em thì chạy không sao, một số khác bị lỗi y chang lỗi của Sư phụ Mỹ! Phải tắt nguồn khởi động lại mới chạy máy được đó! Ẹc ... Ẹc ...

Vô lý!
Dám bảo đảm với bạn rằng code trong bài 13 tương đương với phím tắt Windows + D ---> Vì vậy sẽ không có chuyện lỗi xuất hiện được!

 

[Hoàng Trọng Nghĩa]

Tôi thì làm vầy:

Sub Test()
  CreateObject("Shell.Application").MinimizeAll
  Application.Wait Now + TimeValue("00:00:01")
  Application.WindowState = xlMaximized
End Sub

Không có vấn đề gì cả

Bài trên giống bài này:

Nếu là minimize toàn bộ các ứng dụng thì chỉ cần 1 lệnh thôi

      CreateObject("Shell.Application").MinimizeAll

Chỉ khác khúc đuôi.

Trước đây em đã từng xài code trên, thú thật là trên Win7 không thấy gì, tới khi đem cái File đó qua máy WinXP chẳng hiểu vì sao, một số máy bị lỗi giống hệt kiểu lỗi của Thầy Mỹ!

 

[ptm0412]

Tóm lại, đừng lạm dụng lệnh hệ thống đánh toàn bộ chương trình (bao gồm cả chương trình chạy ngầm của hệ thống)
Nếu cần, chĩ minimize cửa sổ excel và maximze form làm việc.
Nếu bị che khuất, thì Activate window
Nếu muốn hay hơn, thì tìm hiểu chức năng always on top. (không biết property hoặc method là gì, nhưng là chức năng always on top mà nhiều phần mềm đã viết.)

 

[thanh12345678]

Tóm lại, đừng lạm dụng lệnh hệ thống đánh toàn bộ chương trình (bao gồm cả chương trình chạy ngầm của hệ thống)
Nếu cần, chĩ minimize cửa sổ excel và maximze form làm việc.
Nếu bị che khuất, thì Activate window
Nếu muốn hay hơn, thì tìm hiểu chức năng always on top. (không biết property hoặc method là gì, nhưng là chức năng always on top mà nhiều phần mềm đã viết.)

Đây là chủ đề em đang tìm nhưng không tìm thấy em cần. Rất mong các anh, các thầy trên GPE giúp em viết code cho phần em nêu bên dưới:
Em có 3 form: ở form1 khi em click nút commandbutton để gọi form2 thì form1 đươc minimize. Nhưng khi form2 đóng thì form1 được active
Tương tự nếu ở form3 em gọi form2 thì cũng tương tự như trên, nhưng khi form3 đóng thì form1 được active.