首页 > 其他分享 >Excel将插入的图片在单元格居中代码

Excel将插入的图片在单元格居中代码

时间:2023-06-29 10:14:13浏览次数:35  
标签:居中 shp Sub 单元格 Excel TopLeftCell 插入 ALT

一、选中需要居中的图片(ALT+A全选)

 

二、按ALT+F11打开Microsoft Visual Basic for Applications窗口:

  1、点击:插入-模块:

   2、输入代码:

Sub dq()
 
Dim shp As Shape
 
For Each shp In ActiveSheet.Shapes
 
shp.Left = (shp.TopLeftCell.Width - shp.Width) / 2 + shp.TopLeftCell.Left
 
shp.Top = (shp.TopLeftCell.Height - shp.Height) / 2 + shp.TopLeftCell.Top
 
Next
 
End Sub

  3、直接关闭窗口。

 

三、按ALT+F8,打开宏命令窗口:

四、执行dq宏命令。

五、完。

 

标签:居中,shp,Sub,单元格,Excel,TopLeftCell,插入,ALT
From: https://www.cnblogs.com/tolerate/p/17513282.html

相关文章

  • 使用exceljs和file-saver导出带图片的excel表格
    参考https://www.swvq.com/article/detail/487https://github.com/exceljs/exceljs/blob/master/README_zh.md#图片importExcelJSfrom'exceljs'importfileSaverfrom'file-saver'letworkbook=nullletworksheet=null//图片转base64constco......
  • Winform DataGridView空间绘制单元格内容
    在项目中遇到一个需求,需将特定单元格内data显示为修饰后的内容,但不改变原始值(例如将data内的时间单位为ms,单元格需显示ms或者根据值显示特定名称)CellValueNeeded,该事件在控件刷新,需要为单元格填充数据时发生,其参数e返回当前单元格的行和列,根据行和列,获取需要的值,赋给e的Value属性......
  • 数据库 - 不同数据库将表、字段、描述保存到Excel
    不同数据库将表、字段、描述保存到Excel查询语句SqlServerSELECT表名=CASEWHENA.COLORDER=1THEND.NAMEELSE''END,表备注=CASEWHENA.COLORDER=1THENISNULL(F.VALUE,'')ELSE''END,列序号=A.COLORDER,列名称=A.NAME,标识=CASEWHENCOLUMNPROPERT......
  • Excel JavaScript object model in Office Add-ins
    ExcelJavaScriptobjectmodelinOfficeAdd-ins-OfficeAdd-ins|MicrosoftLearnOffice.jsAPIforExcelExcel加载项使用 OfficeJavaScriptAPI 与Excel中的对象进行交互,其中包括两个JavaScript对象模型:ExcelJavaScriptAPI:随Office2016一起引入的Exc......
  • CSS中实现元素居中的七种方法总结
    在前端开发中,经常需要将元素居中显示,CSS提供了多种技术方法来实现元素的居中,在不同场景下有不同的使用方法、不同的效果,需要特别记住它们的应用场景才能够正常的居中。这篇文章就大致总结一下CSS中的居中方法。一、元素分类在CSS中,元素大致可以分为以下几种:1.块级元素(Block-l......
  • ExcelJS 导入导出excel带下拉框筛选数据
    importExcelJSfrom"exceljs"; asyncfunctionexportExcelTemplate(deptList:any){ constworkbook=newExcelJS.Workbook(); constworksheet=workbook.addWorksheet("模板"); worksheet.columns=[  {   header:"编号"......
  • 合并行的单元格 EXTJS
    在ExtJS4中,如何合并行的单元格,已经选取的时候只能选择某一列,期望的效果如下:在ExtJS中,合并表头的列有现成方案,但是合并行单元格不是extjs的现有功能,这个需要底层扩展,也就是使用table的跨行实现。而ExtJS7以及新版本和ExtJS4在最底层的Grid组成上又有差别,所以不同......
  • 单列行数太大使用excel进行分列显示
    公式:=OFFSET($A$1,COLUMN(A1)-1+(ROW(A1)-1)*2,)说明:最后的*2是指定分列的个数 ,这里指定分2列  ......
  • css居中(自己常用的)
    水平居中:1.text-aligin:center  如果仅使用 text-aligin:center   是无法达到水平居中的效果的,为什么?text-aligin:center  需要在行内块元素上使用的,而盒子是块级元素,所以,需要将盒子转换为行内块元素 text-aligin:center  才能生效。<divstyle="text-align:cen......
  • Excel JavaScript API for PivotTables
    WorkwithPivotTablesusingtheExcelJavaScriptAPI-OfficeAdd-ins|MicrosoftLearnPivotTablesstreamlinelargerdatasets.Theyallowthequickmanipulationofgroupeddata.TheExcelJavaScriptAPIletsyouradd-increatePivotTablesandinteractw......