PDA

View Full Version : Đưa hình ảnh vào ghi chú (comment) trong MSE



kasonal
11-08-06, 01:50 PM
Các anh chị cho em hỏi: Có cách nào để làm 1 cái comment mà khi rê chuột tới nó hiện ra cái hình (chứ không phải text) trong đó không ???

PhanTuHuong
11-08-06, 04:02 PM
Lỗi này ngày trước tôi dùng Excel 95 cũng gặp. Sau đó màn hình Excel biến đổi loạn xạ.

Nghĩa của nó đại loại là "không đủ hệ thống tài nguyên để hiển thị hoàn chỉnh".
Theo tôi, có thể là do lỗi phần mềm Excel hoặc xung đột hệ thống trong máy của bạn. Bạn thử cài lại xem sao?

Chúc ... hết bệnh!:-=

Còn bạn muốn hiện hình ra thì mặc định không có, may ra thì dùng VBA thì được. Bạn có thể tải file để nghiên cứu

http://www.giaiphapexcel.com/forum/attachment.php?attachmentid=59&d=1153043058

kasonal
11-08-06, 07:09 PM
Ban vao Data- Validation nhap noi dung cua comment trong input message

Bạn hiểu sai ý tôi rồi ! Ý tôi muốn là làm sao chèn 1 cái hình vô cửa sổ Comment chứ không phải gõ chữ vô !!!

HYen
11-08-06, 08:46 PM
Tôi muốn là làm sao chèn 1 cái hình vô cửa sổ Comment chứ không phải gõ chữ vô !!!
/(hi lang thang trên xa lộ, tình cờ lượm được cái này, bạn nghía cái nha:
http://www.ozgrid.com/forum/showthread.php?t=36653&highlight=picture+comment
/(ể cũng hơn năm rồi không biết có fát triển khác không, bạn tìm thêm nha!

saudiec
11-08-06, 10:03 PM
Bạn có thể insert một picture vào comment theo cách đơn giản như sau:
- Tạo mới comment ở cell mà bạn muốn.
- Nhấp chuột phải vào đường bao của comment mới tạo, chọn Format comment --> hộp thoại Format comment hiện ra --> Bạn chọn tab Colors and lines --> Trong mục Fill, bạn nhấn vào mũi tên ở mục Color và chọn Fill effect --> Hộp thoại Fill effect hiện ra --> Bạn chọn tab Picture và nhấn vào select picture --> tìm đường dẫn tới file picture mà bạn muốn --> Nhấn OK. Thế là xong.
Xin lỗi vì hơi bị dài dòng.
Chúc bạn vui.

rockydatalone
07-08-08, 05:32 PM
Tôi làm không được các bác ơi, cứ mỗi lần insert cái hình vào comment là chờ gần 1 phút (vì tôi lấy hình từ bên máy Sẹt vơ ). Các bác có cách nào làm cho nó nhanh hơn không mấy bác. Giúp em với!!!!

ThuNghi
07-08-08, 06:56 PM
Tôi làm không được các bác ơi, cứ mỗi lần insert cái hình vào comment là chờ gần 1 phút (vì tôi lấy hình từ bên máy Sẹt vơ ). Các bác có cách nào làm cho nó nhanh hơn không mấy bác. Giúp em với!!!!
Copy tất cả các hình từ Serve vào Folder mà có file cần insert hình.
Lần sau nhớ đừng đánh chữ "Sẹt vơ" nhạy cảm!

quangthieu79
21-08-09, 09:26 PM
Cảm ơn bạn saudiec, cho mình hỏi thêm tí: nếu đưa hình vào như bạn hướng dẫn thì file excel sẽ rất nặng nếu đưa hình số lượng nhiều, vậy làm cách nào dùng comment mà lại chỉ sử dụng liên kết đến file hình trong 01 thư mục khác (tức không chèn hẳn ảnh vào file)? Rất mong mọi người cùng chỉ giáo! Rất cảm ơn!

ndu96081631
22-08-09, 08:20 AM
Cảm ơn bạn saudiec, cho mình hỏi thêm tí: nếu đưa hình vào như bạn hướng dẫn thì file excel sẽ rất nặng nếu đưa hình số lượng nhiều, vậy làm cách nào dùng comment mà lại chỉ sử dụng liên kết đến file hình trong 01 thư mục khác (tức không chèn hẳn ảnh vào file)? Rất mong mọi người cùng chỉ giáo! Rất cảm ơn!
Xin thưa là.. hỏng có
Đưa hình vào là đưa luôn chứ hỏng có link ---> Vả lại bạn có thể viết code để mỗi khi cần xem hình nào thì chỉ hình đó hiện lên, sao nặng được!

beray3088
17-02-12, 11:01 AM
Vậy ngược lại chúng ta muốn lấy hình từ những comment nay thì có được không ạh. Mong các thành viên GPE phản hồi. Thân mến!
Xin thưa là.. hỏng có
Đưa hình vào là đưa luôn chứ hỏng có link ---> Vả lại bạn có thể viết code để mỗi khi cần xem hình nào thì chỉ hình đó hiện lên, sao nặng được!

ndu96081631
17-02-12, 11:17 AM
Vậy ngược lại chúng ta muốn lấy hình từ những comment nay thì có được không ạh. Mong các thành viên GPE phản hồi. Thân mến!

Cũng có thể được.
Ví dụ cell E1 đang có comment, ta dùng code này copy picture sang M1


Sub Test()
With Range("E1").Comment
.Visible = True
.Shape.CopyPicture
Range("M1").PasteSpecial
.Visible = False
End With
End Sub

beray3088
17-02-12, 02:23 PM
Cảm ơn anh ndu96081631 với câu trả lời sát tưởng chừng không thể sát hơn^^.Vậy trong trường hợp tổng quát nhất anh có thể cho code của anh duyệt toàn bộ workbook tự động insert column bên cạnh cột có comment và dán hình vào đó được không ạh. Nếu được vậy thì code của anh sẽ giải quyết tương đối hầu hết các dạng mà tôi và các bạn có thể gặp. Một lần nữa xin cảm ơn anh trước.

Cũng có thể được.
Ví dụ cell E1 đang có comment, ta dùng code này copy picture sang M1


Sub Test()
With Range("E1").Comment
.Visible = True
.Shape.CopyPicture
Range("M1").PasteSpecial
.Visible = False
End With
End Sub

ndu96081631
17-02-12, 02:42 PM
Cảm ơn anh ndu96081631 với câu trả lời sát tưởng chừng không thể sát hơn^^.Vậy trong trường hợp tổng quát nhất anh có thể cho code của anh duyệt toàn bộ workbook tự động insert column bên cạnh cột có comment và dán hình vào đó được không ạh. Nếu được vậy thì code của anh sẽ giải quyết tương đối hầu hết các dạng mà tôi và các bạn có thể gặp. Một lần nữa xin cảm ơn anh trước.
Code cho 1 comment làm được thì đương nhiên nhiều comment cũng thế thôi
Đại khái thế này cũng được


Sub Test()
Dim Clls As Range, sht As Worksheet
On Error Resume Next
For Each sht In ThisWorkbook.Worksheets
For Each Clls In sht.UsedRange.SpecialCells(1)
With Clls.Comment
.Visible = True
.Shape.CopyPicture
.Parent.Offset(, 1).PasteSpecial
.Visible = False
End With
Next
Next
End Sub

xiaoshang23085
18-10-12, 03:35 PM
Bạn có thể insert một picture vào comment theo cách đơn giản như sau:
- Tạo mới comment ở cell mà bạn muốn.
- Nhấp chuột phải vào đường bao của comment mới tạo, chọn Format comment --> hộp thoại Format comment hiện ra --> Bạn chọn tab Colors and lines --> Trong mục Fill, bạn nhấn vào mũi tên ở mục Color và chọn Fill effect --> Hộp thoại Fill effect hiện ra --> Bạn chọn tab Picture và nhấn vào select picture --> tìm đường dẫn tới file picture mà bạn muốn --> Nhấn OK. Thế là xong.
Xin lỗi vì hơi bị dài dòng.
Chúc bạn vui.

Mình làm theo hướng dẫn của bạn được rồi, cảm ơn bạn rất nhiều