实用小技巧

m0_65159391

已于 2023-07-23 15:30:39 修改

阅读量77

点赞数

文章标签： wps excel word

于 2023-07-23 15:30:03 首次发布

本文链接：https://blog.csdn.net/m0_65159391/article/details/131432042

版权

一.WPS-Excel自适应大小

第六步的选择热键就是点击旁边的上下按钮可以让所选择功能的位置上下移动，从而设置成我们方便的功能热键。如上图我将所选的切换为嵌入单元格图片移动到顶部，其功能热键为Alt+1。

在实际使用中我们选择一个单元格，然后粘贴图片，按Alt+1键就会将图片自动嵌入单元格中

如图：

可以看到的函数框里面有一个函数，其中的1应该是说这个图片保持等比例，若设置成0则不包吃等比例，即完全填满单元格。如下：

可以看到这俩个图片中，上门的图片时有一些空白的地方的。而下面的图片则完全填满单元格。

二.WPS-word从表格切换成文本

有俩种方式：

第一种：选择表格中的某一列，将其粘贴到空白处，点击下面的粘贴选项，选择：只粘贴文本。

第二种：选择整个表格或某列，点击转换成文本

选择分隔符：选择你要的分隔符，下图以制表符^p为例。

结果为：

三.WPS-word从文本切换成表格

选择要转换的文本：张三,李四,王五,张三,李四,王五,张三,李四,王五,张三,李四,王五,张三,李四

按下Ctrl+h键，将其中的分隔符，替换成制表符^P。而后复制整个文本，粘贴到空表格中即可。

四：通过宏实现自动嵌入图片

1.将文件设置为xlsm（点击右上角的文件选择另存为），只有改格式才可以启用宏，在完成插入图片操作后可以设置格式为xlsx。

2.在表格中填写图片的名称

3.录制宏

4.打开录制后选择任意单元格插入浮图片

5.再次打开开发工具栏，停止录制（原来录制的那个按钮会变成停止），之后再打开宏编辑器

6.以下为插入图片的方法，修改其中的参数就可以实现批量插入图片

ActiveSheet为当前的活动表，Shapes为图片对象，AddPicture为添加图片的方法。

以下为官方文档对AddPicture方法的介绍

一下为Value2的介绍

7.对脚本进行修改

function 批量插图()
{
	var ph = ThisWorkbook.Path;//获取当前文档所在的文件路径
	var R = Sheets(1).Range("e19", Sheets(1).Range("e19").End(xlDown));//该语句为获取e19到e列最后一个引用的单元格数组对象，End为e列的最后一个引用（也就是：猫）
	for( var r of  R)//遍历数组对象
	{
		var path1 = ph + "\\Camera Roll\\" + r.Value2 + ".jpeg";//设置要插入图片所在的位置，其中r.Value2为该单元格的值，也就是名称（如边牧等）
		var offer = r.Offset(0,2);//向右偏移俩个单元格，也就是图片列
		try{
			//插入图片，Left为该单元格的左边界，以此类推，Top为上边界，之所以对left+1是为了不让图片遮住俩个单元格之间的那个框
			ActiveSheet.Shapes.AddPicture(path1, msoFalse, msoTrue, offer.Left+1, offer.Top+1, offer.Width-1, offer.Height-1);
		}catch(err){
			//当没有找到相应的图片时，会报错，这个时候可以设置其中的值为“暂无图片”，以便进行提示
			offer.Value2="暂无图片";
		}
	}
}

此外可以进行逐行运行，查看其中的变量是否正确