Take Image from UserForm

[bvtvba]

Cả nhà cho em hỏi. Cách insert image to UserForm thì ai cũng biết.
Vậy ngược lại, một file em lấy về, trên UserForm đó họ sử dụng ảnh. Làm thế nào để em trích xuất ảnh mà họ đang dùng trên UserForm và lưu trên máy tính của em ạ.

 

[YeuVBA-NT]

@bvtvba hình như giải nén file ra sẽ thấy ảnh (đổi đuôi excel sang .rar hay .zip rồi giải nén xem) mình chưa thử bạn làm xem được không

 

[bvtvba]

Cảm ơn @YeuVBA-NT đã quan tâm tới chủ đề này.
Mình có file 123.xlsm =>đổi tên file thành 123.xlsm.zip
Tiến hành giải nén nhưng không tìm thấy ảnh đâu bạn ạ. Cách của bạn chỉ đúng nếu người ta sử dụng ảnh trên Ribbon.
Còn ở đây, mình dán một ảnh vào UserForm, thì giải nén như trên không nhìn thấy ảnh đó ở đâu. Không biết MicroSoft giấu nó ở đâu nữa.

 

[tuhocvba]

@bvtvba hình như giải nén file ra sẽ thấy ảnh (đổi đuôi excel sang .rar hay .zip rồi giải nén xem) mình chưa thử bạn làm xem được không

Phương án của bạn có lẽ không ổn. Tôi cũng đã thử tìm hiểu trên internet vấn đề này nhưng chưa có kết quả.
Đây, mời bạn thử:

Bạn cần đăng nhập để thấy link

Mình làm thử và cũng không có kết quả.
Mong muốn lưu ảnh trực tiếp vào một folder nào đó trên máy tính mà không trung gian dán vào sheet nhé.

Bạn cần đăng nhập để thấy hình ảnh

 

[bvtvba]

Vấn đề của topic này có đủ làm khó chuyên gia bảo mật @vothanhthu của diễn đàn chưa ạ

 

[vothanhthu]

@bvtvba Thử cách này xem sao:
Giả sử trong code: Tên Userform là Userform1, Đường dẫn lưu ảnh là C:\Users\Administrator\Desktop\123.jpg

SavePicture UserForm1.Picture, "C:\Users\Administrator\Desktop\123.jpg"

Và đây là hình ảnh Userform trong file của Admin Tuhocvba sau khi dùng code.

Bạn cần đăng nhập để thấy hình ảnh

 

[bvtvba]

@bvtvba Thử cách này xem sao:
Giả sử trong code: Tên Userform là Userform1, Đường dẫn lưu ảnh là C:\Users\Administrator\Desktop\123.jpg

SavePicture UserForm1.Picture, "C:\Users\Administrator\Desktop\123.jpg"

Đúng là danh bất hư truyền. Cảm ơn bạn nhiều nhé, mình test và đã thấy OK rồi ạ.

 

[Euler]

Chủ đề này hay quá. Bây giờ làm khó @vothanhthu một chút xem sao nhé.
Mình muốn lấy ảnh này, mà chưa lấy được.

Bạn cần đăng nhập để thấy hình ảnh

File :

Bạn cần đăng nhập để thấy link

 

[vothanhthu]

@Euler Làm khó thành ra khó quá nên Thứ không biết luôn ^^!

 

[Thanh Binh PV]

Chủ đề này hay quá. Bây giờ làm khó @vothanhthu một chút xem sao nhé.
Mình muốn lấy ảnh này, mà chưa lấy được.

Bạn cần đăng nhập để thấy hình ảnh

File :

Bạn cần đăng nhập để thấy link

Em thử theo cách của anh @vothanhthu mà thấy sai sai.
Userform có tên là Euler, đường dẫn lưu ảnh là D:\123.bmp

SavePicture Euler.Image1.Picture, "D:\123.bmp"

Nhưng em chỉ ra được hình ảnh có nền đỏ (đuôi ảnh là bmp) hoặc nền đen ( đuôi ảnh là ico).

Bạn cần đăng nhập để thấy hình ảnh

 

[tuhocvba]

Bí mật của

Bạn cần đăng nhập để thấy link

là cái ảnh trong suốt trên nằm ở đâu vậy nhỉ, nếu làm rõ được, sẽ có vai trò rất lớn trong thiết kế UserForm. Hiện tại mình cũng chưa tìm ra lời giải.
Rất mong nhận được giải đáp của các thành viên khác.