Chèn Hình Vào Cell Bằng Hàm Tự Tạo | Giải Pháp Excel

Có thể bạn quan tâm

Trang chủ Có gì mới Hoạt động gần nhất Tác giả
Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
Video Video về Excel Video về tin học khác Tin tức về tin học chung
Thông tin mới Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
Tài nguyên Đánh giá mới nhất Tìm tài nguyên
Facebook
Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Bởi: Tìm kiếm Tìm nâng cao…

Tìm bài viết mới
Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

Trang chủ
Diễn đàn
Lập Trình với Excel
Lập Trình với Excel

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Chèn hình vào cell bằng hàm tự tạo

Thread starter anhtuan1066
Ngày gửi 9/7/11

anhtuan1066

Thành viên gạo cội

Tham gia 10/3/07 Bài viết 5,802 Được thích 6,911 Xưa nay người ta thường chèn hình vào bảng tính bằng 1 thủ tục nào đó (Sub...). Vậy các bạn có nghĩ rằng có thể chèn hình bằng hàm tự tạo không? Tức là ta gõ hàm vào cell, lập tức hình được chèn vào ngay cell ấy! Ví dụ ta gõ thế này: =CommPic("D:\Pic\Hinh 1.jpg",C5) thì lập tức Hinh 1.jpg được chèn vừa vặn vào cell C5 Hấp dẫn nhỉ? Vậy mà code lại khá đơn giản: Mã:Sao chép. Function CommPic(Pic As String, Cel As Range) As String On Error Resume Next Application.Volatile Cel.Comment.Delete If Cel.Comment Is Nothing Then Cel.AddComment Cel.Comment.Text vbLf With Cel.Comment.Shape .Left = Cel.Left: .Top = Cel.Top: .Visible = True .Width = Cel.Width: .Height = Cel.Height .Fill.UserPicture Pic End With End Function Thí nghiệm: - Mở Excel, chèn code trên vào module, xong lưu file vào 1 thư mục nào đó - Copy 1 số hình vào cùng thư mục chưa file Excel (file của tôi có 4 hình AT01.jpg, AT02.jpg, AT03.jpg và AT04.jpg) - Gõ công thức này vào cell B3: PHP:Sao chép. =LEFT(CELL("filename",A1),FIND("[",CELL("filename",A1))-1) - Từ cell A5 trở xuống, gõ tên các file hình - Tại cell B5, gõ công thức =$B$3&A5 và kéo fill xuống - Tại cell C5, gõ công thúc =CommPic(B5,C5) và kéo fill xuống Xem thử hình đã được Add vào có ngoạn mục không? Hy vọng tạo sự dễ dàng cho các bạn, những ai quan tâm đến việc chèn hình ảnh vào bảng tính

File đính kèm

TestComPic.rar 68.2 KB · Đọc: 7,618

1
2
3
…
Go to page
Tiếp tục
12

Tiếp 1 of 12

Go to page

Tiếp tục Tiếp Last Sắp xếp theo thời gian sắp xếp theo bầu chọn H

HOANG 1978

Thành viên mới

Tham gia 29/12/10 Bài viết 8 Được thích 3 Em cảm on anh Tuấn rất nhiều có được hàm này mọi công việc của em trở nên dễ dàng hơn Upvote 0 H

HOANG 1978

Thành viên mới

Tham gia 29/12/10 Bài viết 8 Được thích 3 Anh Tuấn cho em hỏi thêm với code này nếu em muốn thay đổi kích cở hình em phải làm sao để cho ra được những hình ảnh theo ý muốn Xin anh vui lòng chỉ điểm cho. Cảm ơn anh nhiều, Upvote 0

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,950

HOANG 1978 đã viết: Anh Tuấn cho em hỏi thêm với code này nếu em muốn thay đổi kích cở hình em phải làm sao để cho ra được những hình ảnh theo ý muốn Xin anh vui lòng chỉ điểm cho. Cảm ơn anh nhiều, Nhấp chuột vào đây để mở rộng...

Bạn chỉ cần thay đổi chiều cao, chiều rộng của cell mà bạn đang gõ hàm rồi bấm F9 là tự động hình sẽ được chỉnh theo kích thước mới của cell Thử xem Upvote 0 cavoi54

cavoi54

Thành viên mới

Tham gia 18/7/11 Bài viết 31 Được thích 0 Chèn hình động vào bản tính Bạ n có cá ch nà o chè n hì nh độ ng và o bả n tinh duoc ko vay? Upvote 0 cavoi54

cavoi54

Thành viên mới

Tham gia 18/7/11 Bài viết 31 Được thích 0 Đổi hình con trỏ chuột Excel Làm sao đôỉ hình con trỏ chuột trong excel được? Upvote 0

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,950

cavoi54 đã viết: Bạ n có cá ch nà o chè n hì nh độ ng và o bả n tinh duoc ko vay? Nhấp chuột vào đây để mở rộng...

Cách đơn giản là nhúng file Flash vào Excel (khỏi code) ----------------------

cavoi54 đã viết: Làm sao đôỉ hình con trỏ chuột trong excel được? Nhấp chuột vào đây để mở rộng...

Vào Control Panel để chỉnh, chẳng liên quan gì đến Excel cả Upvote 0 cavoi54

cavoi54

Thành viên mới

Tham gia 18/7/11 Bài viết 31 Được thích 0 Nhúng file Flash vào excel tức là copy hay sao vậy bạn (làm phiền bạn một lần nữa vậy) Upvote 0

Hoàng Trọng Nghĩa

Chuyên gia GPE

Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,719 Giới tính Nam

cavoi54 đã viết: Nhúng file Flash vào excel tức là copy hay sao vậy bạn (làm phiền bạn một lần nữa vậy) Nhấp chuột vào đây để mở rộng...

Bạn xem đường dẫn này: http://www.giaiphapexcel.com/forum/...ao-để-lấy-flash-trong-Excel&p=16883#post16883 Upvote 0