普通的设置是完成不了的，只能上VBA。搞了一个模板，放在下面链接的问题答案这个文件夹中，自取不谢！
以下是代码，主要是用到 URLDownloadToFile 这个函数
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Public Sub downloadandshow() Application.ScreenUpdating = False Dim iRow, i, s Dim savePath Dim arr As Variant Set fso = CreateObject("scripting.filesystemobject") savePath = ThisWorkbook.Path & "\图片" If fso.folderexists(savePath) Then fso.deletefolder savePath End If MkDir savePath i = 2 Do While Cells(i, 1) <> "" URLDownloadToFile 0, Cells(i, 1).Value, savePath & "\" & i & ".jpg", 0, 0 Cells(i, 1).Select ActiveSheet.Pictures.Insert(savePath & "\" & i & ".jpg").Select Selection.ShapeRange.LockAspectRatio = msoFalse Selection.ShapeRange.Height = Rows(i).RowHeight Selection.ShapeRange.Width = Columns(1).Width i = i + 1 Loop Application.ScreenUpdating = True End Sub
��Ҫ��Excel�в���ͼƬ���ӣ�һ��Ϳ��Ե���һ����ͼƬ���ڡ���Excel�п��Բ��볬���ӣ����������㲻�ã�һ��Ҫ�����£�����Excel����ʾ����D:\MyDocuments\MyPictures\1_12103351.jp... ��Ҫ��Excel�в���ͼƬ���ӣ�һ��Ϳ��Ե���һ����ͼƬ���ڡ�
��Excel�п��Բ��볬���ӣ����������㲻�ã�һ��Ҫ�����£�����Excel����ʾ����D:\My Documents\My Pictures\1_12103351.jpg·����
���ʴ���ܲ���ֻ��һ�¾͵�����ͼƬ���ں�����·��
չ��
�����ϵ�����
�߷۴���
2019-04-22 �� ��Ҫ�ڴ�ʱ����������ǿ��С����ڿ�ҹ
��ע
����/���ߣ�Excel2010
1������Ҫ���б༭��excel��������
2�������������Ҫ���ӳ����ӵĵ�Ԫ���ϡ�
3���ڹ������Ϸ��˵����е�����롣
4��ѡ�����ӡ�
5���ڵ����ij����ӶԻ������ҵ���Ҫ������ļ��������ȷ����
6����ͼ�����Ӿ���ʾ�ڵ�Ԫ�����ˣ��˴��������һ�Żõ�Ƭ��
7������굥���ղŲ���ij����ӣ��õ�Ƭ�ʹ��ˡ�
�����oZ
�Ƽ���2017-12-16 �� TA��ó���2696����
֪������
�ش�����34
�����ʣ�0%
�������ˣ�0
��ע
��������������⣺
1����EXCEL��,���볬���Ӻ��һ�¾Ϳ��Դ����ӡ�
2������·�����������˳������˵�Ԫ���ϣ�����Ƶ��������ʱ������ʾ�����ӵ�·������ʵҪ�������·������EXCEL��û����ȷ��һ�����ã������Ҿ���ʹ�õķ����У����ֿ���ͨ�����·���ʵ�֣�
�����ó����ӵĴ����У�����ͼ���ڡ���Ļ��ʾ���ϴ�һ�����ڣ�����������ݣ�Ҳ�����ǿո�ȷ���Ժ����ٵ�������������Ƶ������ӵ�Ԫ��ʱ���ͻ���ʾ��ո���������ݣ���������ʾ�����ӵĵ�ַ�ˡ�
��ʵ����취�ܼ����Ŵ�Ҷ��п����õ�������������ԡ�
���ش������߲���
�ٶ�����8c874d3
2009-06-02
֪������
�ش�����25
�����ʣ�0%
�������ˣ�2.5��
��ע
�����˵� ������������� �������༭�������ӡ����ڣ��ڡ�Ҫ��ʾ�����֡��ı���������Ҫ��ʾ�����ݣ�Ȼ��ѡ��ͼƬ���ٵ����ȷ������OK�ˡ�
���Թ����������ӿ�����ʾͼƬ��
����˫CX
�߷۴���
2020-03-18 �� ���Ĵ��⣬��ӭ��ע
֪������
�ش�����0
�����ʣ�0%
�������ˣ�0
��ע
�ٶ�����25da2f7
2009-06-02 �� TA���3241����
֪�����п�Ϊ����
�ش�����1197
�����ʣ�57%
�������ˣ�498��
��ע
��E�̵ĸ�Ŀ¼�½���1.jpg��JPEG�ļ�,��EXCEL�е���һ����Ԫ��������:
=HYPERLINK("E:\1.jpg",1)
����������������.
�ù�ʽ���г����ӵĺô���:������ļ����й��ɵ�,���ļ����Ѿ�������EXCEL�ĵ���ʱ��,���ö�������Ӿͱ��ʮ��������.