精华内容
下载资源
问答
  • 博奥清单导出Excel后单位批量替换
    千次阅读
    2021-01-15 13:14:59

    博奥清单V17中,单位平方米和立方米的数字均为上标显示。为使打印出来后易于分辨,应BOSS要求,在导出Excel后将其修改为“m2”和“m3”。

    VBS批量修改代码:

    Option Explicit

    If Wscript.Arguments.Count = 0 ThenWScript.EchoChr(10) &_"[正确操作]" & Chr(10) & Chr(10) &_Chr(9) & "拖拽导出的Excel文件到本程序" & Chr(10) & Chr(10) &_"[错误操作]" & Chr(10) & Chr(10) &_Chr(9) & "双击本程序"WScript.QuitEnd If

    DimxlsFilePath

    xlsFilePath=WScript.Arguments(0)DimWshellSet Wshell=CreateObject("Wscript.Shell")If LCase(Right(WScript.FullName,11)) = "wscript.exe" ThenWshell.Run"CScript.exe //nologo" &_Chr(32) &_Chr(34) & WScript.ScriptFullName & Chr(34) &_Chr(32) &_Chr(34) & WScript.Arguments(0) & Chr(34)

    WScript.QuitEnd IfWScript.Echo"正在运行,请等待......"

    DimoExcel,oWorkbook,SheetOn Error Resume Next

    Set oExcel = GetObject(,"Excel.Application")If Err ThenWScript.Echo Err.Description

    Err.ClearSet oExcel = CreateObject("Excel.Application")

    oExcel.Visible= False

    End If

    Set oWorkbook =oExcel.Workbooks.Open(xlsFilePath)If Err ThenErr.Clear

    Wshell.Popup"无法打开指定的文件,可能的原因有:" & Chr(10) &_"1、本机没有安装Microsoft Office 2003、2007、2010或以上版本。" & Chr(10) &_"2、需要处理的文件已经打开或被其它程序占用,请关闭文件后重新使用本程序。", 10 , "提示", 16+4096WScript.QuitEnd If

    On Error Goto 0oExcel.DisplayAlerts= False

    DimCurrentPath

    CurrentPath= CreateObject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.PathFor Each Sheet InoWorkbook.Worksheets

    Sheet.Activate

    Wscript.Echo"Replace:" &Sheet.Name

    oExcel.Cells.Replace"㎡", "m2", 2, 1, False, False, FalseoExcel.Cells.Replace"", "m2", 2, 1, False, False, FalseoExcel.Cells.Replace"", "m3", 2, 1, False, False, FalseoExcel.Cells.Replace"延长米", "m", 2, 1, False, False, False

    NextoWorkbook.Worksheets(1).Select

    oWorkbook.Save

    oExcel.DisplayAlerts= TrueoWorkbook.CloseSet oExcel = Nothing

    Set oWorkbook = NothingWshell.Popup"经过一段时间的浴血奋战,终于搞定了所有的单位替换。", 10, "博奥单位替换", 48

    VBS批量修改代码(读取“替换列表.txt”文件,循环替换)

    Option Explicit

    If Wscript.Arguments.Count = 0 ThenWScript.EchoChr(10) &_"[正确操作]" & Chr(10) & Chr(10) &_Chr(9) & "拖拽导出的Excel文件到本程序" & Chr(10) & Chr(10) &_"[错误操作]" & Chr(10) & Chr(10) &_Chr(9) & "双击本程序"WScript.QuitEnd If

    DimxlsFilePath

    xlsFilePath=WScript.Arguments(0)DimWshellSet Wshell=CreateObject("Wscript.Shell")If LCase(Right(WScript.FullName,11)) = "wscript.exe" ThenWshell.Run"CScript.exe //nologo" &_Chr(32) &_Chr(34) & WScript.ScriptFullName & Chr(34) &_Chr(32) &_Chr(34) & WScript.Arguments(0) & Chr(34)

    WScript.QuitEnd IfWScript.Echo"正在运行,请等待......"

    DimoExcel,oWorkbook,SheetOn Error Resume Next

    Set oExcel = GetObject(,"Excel.Application")If Err ThenWScript.Echo Err.Description

    Err.ClearSet oExcel = CreateObject("Excel.Application")

    oExcel.Visible= False

    End If

    Set oWorkbook =oExcel.Workbooks.Open(xlsFilePath)If Err ThenErr.Clear

    Wshell.Popup"无法打开指定的文件,可能的原因有:" & Chr(10) &_"1、本机没有安装Microsoft Office 2003、2007、2010或以上版本。" & Chr(10) &_"2、需要处理的文件已经打开或被其它程序占用,请关闭文件后重新使用本程序。", 10 , "提示", 16+4096WScript.QuitEnd If

    On Error Goto 0

    Dimfso,oFileSet fso = CreateObject("Scripting.FileSystemObject")DimstrLineDimstrArrDimCurrentPath

    CurrentPath= CreateObject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path

    oExcel.DisplayAlerts= False

    For Each Sheet InoWorkbook.Worksheets

    Sheet.Select

    Sheet.Activate

    WScript.Echo Sheet.NameSet oFile = fso.OpenTextFile(CurrentPath & "\替换列表.txt", 1)Do While oFile.AtEndOfStream <> TruestrLine=oFile.ReadLine

    strArr= Split(strLine,"→")

    oExcel.Cells.Replace strArr(0), strArr(1), 2, 1, False, False, False

    LoopoFile.CloseNextoWorkbook.Worksheets(1).Select

    oWorkbook.Save

    oExcel.DisplayAlerts= TrueoWorkbook.CloseSet oFile = Nothing

    Set oExcel = Nothing

    Set oWorkbook = NothingWshell.Popup"经过一段时间的浴血奋战,终于搞定了所有的单位替换。", 10, "博奥单位替换", 48

    “替换列表.txt”样例:

    古民居04号→04号古民居(罗满才)修缮工程

    古民居05号→05号古民居(邓耀柱)修缮工程

    古民居06号→06号古民居修缮工程

    古民居09号→09号古民居修缮工程

    古民居11号→11号古民居(邓耀梓)修缮工程

    古民居12号→12号古民居(邓秋阳)修缮工程

    古民居13号→13号古民居(邓亚贵)修缮工程

    古民居15号→15号古民居修缮工程

    古民居18号→18号古民居修缮工程

    古民居19号→19号古民居(邓国天)修缮工程

    古民居27号→27号古民居(邓耀梓祖屋)修缮工程

    古民居28号→28号古民居修缮工程

    古民居29号→29号古民居修缮工程

    古民居31号→31号古民居(邓耀梓)修缮工程

    古民居32号→32号古民居修缮工程

    古民居33号→33号古民居(廖家祖屋)修缮工程

    古民居34号→34号古民居(罗家祖屋)修缮工程

    古民居35号→35号古民居(罗家祖屋)修缮工程

    古民居36号→36号古民居(罗家祖屋)修缮工程

    古民居37号→37号古民居(罗家祖屋)修缮工程

    古民居38号→38号古民居(杨家祖屋)修缮工程

    闸门01→闸门一修缮工程

    闸门02→闸门二修缮工程

    闸门03→闸门三修缮工程

    闸门04→闸门四修缮工程

    闸门05→闸门五修缮工程

    闸门06→闸门六(廖家闸门)修缮工程

    闸门07→闸门七(罗家闸门)修缮工程

    闸门08→闸门八(二闸)修缮工程

    闸门09→闸门九(大闸)修缮工程

    闸门10→闸门十修缮工程

    闸门11→闸门十一修缮工程

    闸门12→闸门十二修缮工程

    闸门13→闸门十三修缮工程

    金石庙→金石庙修缮工程

    木村坡围墙→围墙修缮工程

    木村坡铺张→木村坡铺装

    木村坡寨墙→寨墙

    木村坡牌楼→入口牌坊

    木村坡排水→雨水

    木村坡污水→污水

    木村坡照明→强电

    木村坡雨水→雨水

    ㎡→m2

    →m2

    →m3

    更多相关内容
  • 一、 测量元器件的基础知识 现在在学习和应用科学技术知识时,都要求使用法定计量单位,请列出和电子技术有关的法定计量单位。 答:国务院 1984年发布了《中华人民... 表:国际单位制中具有专门名称的导出单位  
  • 3dmax 模型导出单位设置问题

    千次阅读 2020-07-27 10:38:29
    b) 如果通过3dmax转化,一定要将单位设为mm,即建模和转化的单位要一致。 现在是正确的,板长是两米。 如果在3dmax里将转化的单位设置为m,则 会把模型放大1000倍,如下,这不是我们把期望的。 ...

    3dmax 模型到unity3d注意问题

    2 creo建模单位问题

    a) creo建模的单位如果mm,如果通过creo转化为obj(Creo自带转化obj格式的功能),再导入到unity则会把模型放大1000倍。

    b) 如果通过3dmax转化,一定要将单位设为mm,即建模和转化的单位要一致。

    现在是正确的,板长是两米。

    如果在3dmax里将转化的单位设置为m,则

    会把模型放大1000倍,如下,这不是我们把期望的。

     

     

     

     

     

     

     

    展开全文
  • 1.配置合适的配置编辑器 如图,将dxf_out_comments 和dxf_out_drawing_scale的值设置为yes 在查找中搜索关键字 dxf 即可找到上述的名称。 ...2.在Creo安装文件中更改相关参数 ...3.二维图纸导出设置。(如前两

    1.配置合适的配置编辑器

    如图,将dxf_out_comments 和dxf_out_drawing_scale的值设置为yes

    在查找中搜索关键字 dxf 即可找到上述的名称。

    2.在Creo安装文件中更改相关参数

    具体操作是:找到PTCCreo2.0\Creo 2.0\Common Files\M070\text(即自己软件的安装文件夹)找到Prodetail,用写字板打开方便查找。

    修改drawing_units的参数 INCH 改为 mm即可。

    3.二维图纸导出设置。(如前两步骤设置完成导出依然为英尺比例)

    文件→准备→绘图模型

    详细信息选项→杂项选项→drawing_units 改为 mm即可。

    4.导出文件

    通过标注,我们可以看出比例已经正确。

    展开全文
  • SAP数据导出途径及注意事项

    千次阅读 2021-01-12 07:52:29
    1、会计凭证 事务码ZCOMLWIP;会计凭证后台表BSEG,会计凭证过账...采购订单中后台导出的表里面有单位换算的,需要进行单位换算。SAP中的订单日期是后台表中的凭证日期,不是创建日期。3、采购入库单价格,不能取标...

    1、会计凭证 事务码ZCOMLWIP;会计凭证后台表BSEG,会计凭证过账日期后台表 BKPF;

    2、采购订单带有删除标记的需要与采购入库单核对。前台与后台的采购入库单匹配,没有的需要查看一下收货时是否跨月。跨月的需要导入。采购订单前台用ZMMGR02导出。

    采购订单中后台导出的表里面有单位换算的,需要进行单位换算。

    SAP中的订单日期是后台表中的凭证日期,不是创建日期。

    3、采购入库单价格,不能取标准价格,需要取采购订单价格。即实际价格。

    采购入库从前台导出时,是用MB51,然后筛选采购订单号。

    采购入库对应的发票需要筛选出费用化的入库。

    从采购订单中单位换算的物料筛选一下入库单,进行单位换算。

    匹配一下价格,对一下记账金额是否一致。

    同一个物料凭证对应两个入库地点的问题。

    4、销售出库,交货单删除的,需要核对一下冲销是否跨月。如果跨月的冲销,需要导入到系统里。

    对于删除的交货单号,用MB51查看对应的物料凭证,用MB03查看,点进去会计凭证,然后在布局里将所有的字段放出来,可以查找对应的销售订单号。然后用FD10N来查看每个客户的余额,查找其含税价及。无税价。

    销售订单的价格,总金额等在后台表VBAP中可以导出来。

    5、目前寄售销售是从原仓库发出,应该是从寄售仓库发出。所有的寄售发货的单据需要将其库存地点改为其相应的寄售仓库。

    6、费用化采购入库的,必须出库,出到部门。

    7、供应商后台表LFM1

    8、MIR5 显示发票凭证的清单,也是显示的发票总额,只是没有汇率等信息。

    MIR6 发票概览:发票凭证,只显示出票方及金额,没有凭证及过账日期等信息。

    mir7 预制发票

    9、SAP中 EKBZ 每个采购凭证的历史:交货费用 EKBZ-KSCHL 条件类型

    KSCHL条件类型的配置是事务码M/06,

    展开全文
  • [oracle@testdb dmp]$ expdp \"testuser/testuser\" DIRECTORY=dpump_dir dumpfile=kevin.dmp tables=test_table query=\"where cust_no like \'066%\'\" -------注意这里的转义符Export: Release 10.2.0.1.0 - 64bi...
  • Zabbix没有报表导出的功能,于是通过编写脚本导出zabbix数据并发邮件。效果如下: 下面是脚本,可根据自己的具体情况修改: #!/usr/bin/python` `#coding:utf-8` `import MySQLdb` `import time,datetime` `import...
  • 石墨文档批量导出 支持类型 文档 表格 思维导图 ... Sleep: 1000 // 导出两个文档间的时间间隔,必须设置,否则会服务器忙,单位 ms }; 安装依赖 yarn // or npm install 运行 node index.js 依赖 node ^13
  • pcb如何导出坐标文件

    2020-07-11 12:43:13
    3、在对话框中,选择你所要的输出格式(坐标文件的格式,一般选择TXT格式)和输出单位(衡量坐标的单位,一般选择“公制”),选择完成后,单击确定选项即可导出坐标文件。 4、导出的坐标文件保存在PCB文件所在的...
  • 将页面中的HtmlTable,导出为Execl 支持合并单位元、合并行等操作。续之前的优化了计算算法,升级了代码。
  • AD/DXP/PADS 导出SMT坐标文件步骤 Protel99转出SMT贴片坐标文件步骤: 1. 设置单位为公制mm(贴片坐标一般用公制为单位) 2. 设置坐标原点为左下角 3. 输出坐标文件(注意输出格式选csv, 单位选MM)
  • fluent软件模拟计算之后,如果要发文章得把数据处理漂亮,然后就得导出大量的工况下的数据,包括点的位置,x,y,z。点的速度,方向,动量,涡量,热量,压力等等。然后常常只关心某些点的信息。所以要在几百个excel表...
  • ABAP代码实现了批量导出BOM的功能。包含物料号、物料描述、基本数量、物料单位、替代BOM、可选文本
  • 用于Blender的动画导出器插件 * .anim文件格式文件格式是信息的层次结构。信息以行片段,空格分隔的标记和值编码。第一个标记指示行片段的命令/内容-非常类似于波前OBJ格式。 以下结构定义了不同的命令。 以井号(#...
  • exportComponentAsPDF还接受具有以下可选字段{w,h,x,y,单位,方向,pdfFormat}的可选pdfOptions对象。 w = 100 ( Width in pixels - defaults to the width of the element ) h = 50 ( Height in pixels - ...
  • 法定计量单位

    2020-11-07 14:30:22
     (3)国际单位制中具有专门名称的导出单位(见表3);  (4)国家选定的非国际单位制单位(见表4);  (5)由以上单位构成的组合形式的单位;  (6)由词头和以上单位所构成的十进倍数和分数单位词头(见表5)。
  • 1:安装SolidWorks to URDF exporter... 在Solidworks中定义好零件的材质等参数后,在工具→File→Export as URDF中打开导出对话框:  File在工具的最下方,需要点击工具里的下拉键找到File。    4:在ros中加载模型
  • 单位根检验是指检验序列中是否存在单位根,因为存在单位根就是非平稳时间序列了。 2、输入输出描述 输入:1个时间序列数据定量变量输出:序列数据在几阶差分时达到平稳 3、学习网站 SPSSPRO-免费专业的在线数据...
  • solidworks导出成.stl修改单位

    千次阅读 2020-01-06 18:47:56
    今天,问机械的同事要机械臂末端手爪的3D文件,给我了一个solidworks格式的文件。 我和他说我要的是.stl,一...将零件另存为,选择.stl格式,点击下方的选项,可以修改单位,也可以将所有零件导出到一个.stl文件里...
  • Postman系列之测试用例管理(二)

    千次阅读 2020-12-23 07:39:51
    实验目的Postman 测试集(Collections)管理的相关内容,它用来保存我们的 Request ,可以嵌套,可以批量运行,还可以导出到本地。本文仅介绍简单的用法,更深入的了解可以参考 Postman官网 的资料。实验流程1. 新建...
  • Allegro之测量时显示两种单位(mil & mm) 首先确认你工程默认的单位是mil还是mm 例子为mils 在下面的选项中选择另外一项mm即可(如本身是mm,这里选择mils) 点击Apply,然后OK,操作测量功能,如下图...
  • 默认情况下,布局采用物理单位(默认情况下为毫米),导出到图形文件的目标是直接打印列。 但是,如果最终目标是数字显示,它的表现同样出色,可以轻松控制屏幕空间的使用。 Panel 结合了几个 Matlab Central 用户...
  • buffer:下载数据缓冲区,以字节为单位,缺省依赖操作系统 consistent:下载期间所涉及的数据保持read only,缺省为n direct:使用直通方式 ,缺省为n feeback:显示处理记录条数,缺省为0,即不显示 file:输出文件...
  • 如下错误:1、用CAD打开板框,删除板框多余部分,只留需要的部分(注意:从左边拖动鼠标选中,再删除,如果从右边拖动鼠标选中无法全选)2、设置原点,选中整个...双击滚轮即可显示所有板框3、导出生成DXF,再导入PADS...
  • 案例目的:如果你有一堆收上来,表结构相同的Excel表格,把他们放在了一个文件夹下,向批量导入...将Scott账户下的emp表格导出成Excel表格。复制几份。命名随意。(注:表格"HIREDATE"字段下年月日格式为yyyy/mm/dd...
  • Blender的单位:一图弄懂Blender的单位

    千次阅读 2017-12-28 14:16:00
    Blender的单位:一图弄懂Blender的单位 1设置单位,在右边的场景设置里,可以设置公制,英制。下面还可以设置基础单位长度,就是单位网格对应的长度。 2显示单位,按N出现在右边的属性栏里,可以设置...
  • 3dmax导出缩放

    千次阅读 2018-01-13 14:55:04
    参考 http://blog.dou.li/unity3d-import-3dmax-model-scale.html ... max2015,unity2017.2 3dmax相关单位设置 显示单位:  ...决定栅格显示的单位, ...修改位置:自定义(U)->单位设置 
  • 一般在导出Excel中,在创建工作表sheet后,初始化的sheet中row都是一行一行的,每个单元格都是最小单位,所以问题1什么时候将单元格合并? 方案:先将数据组装成json格式方便插入Excel时进行遍历,接着以巡检项为每...
  • 使用 Animate CC 导出图形和视频

    千次阅读 2021-06-29 11:14:20
    导出应用程序首选参数您可以在专家和初学者首选参数之间切换。您还可将自己的应用程序设置(包括工具栏设置、键盘快捷键和其他应用程序设置)导出为单个文件。只需进行简单的文件导出和导入操作,即可跨设备应用您的...
  • 在传统的数据库中,信息被分割成离散的数据段,而在文档数据库中,文档是处理信息的基本单位。一个文档可以很长、很复杂、可以无结构,与字处理文档类似。一个文档相当于关系数据库中的一条记录。 文档存储一般用...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 90,993
精华内容 36,397
关键字:

导出单位