Tag: 脚本

如何使用Powershell更改Word和Powerpoint 2013的自动保存间隔?

我使用PowerShell脚本并将自动恢复保存间隔更改为2或3分钟。 我得到它在Excel 2013上工作,但似乎无法使其在Word或PowerPoint上工作。 这是Excel 2013的: $a = New-Object -comobject Excel.Application $a.AutoRecover.Time = 2 这是Excel的,它的工作原理。 这是我的Word和PowerPoint的: $a = New-Object -comobject Excel.Application $b = New-Object -comobject Word.Application $c = New-Object -comobject PowerPoint.Application ## Enable Autorecover if it happens to be disabled $a.AutoRecover.Enabled = True $b.AutoRecover.Enabled = True $c.AutoRecover.Enabled = True ## Change the timer $a.AutoRecover.Time = 2 […]

自动执行批量复制/粘贴作业

我希望自动执行任务,因为编写脚本工作的速度更快,并且可以将未来实例的任务自动化。 我知道Java所以逻辑在这里(我认为:X),但是我对这个脚本的实际语法和实现感到非常失望。 我有一个称为: Pc_Profile.xls Pc_Profile(N)的.xls Pc_Profile(N + 1)的.xls 我有一个主文档叫: db.xls 每个PCconfiguration文件都有我需要粘贴到主文档中的内容。 这里是内容: A5:D5,A8:B8,A13:B13,A15:D17,A24:E26,A28:B30,A43:B43,A45:B45 上面列出的单元格的内容需要分成单独的表单,因此每个pc概要文档的内容都不会驻留在主文档(db.xls)中的同一张表单中。 每张纸需要重新命名为单元格A5的内容为每个相应的工作表。 这是我的伪代码: set screen updating to false set application updating to xlManual //1st run: open pc_profile.xls copy desired contents to clipboard open db.xls paste clipboard to A1 Copy A5 to clipboard Rename sheet > paste from clipboard //second run (loop) $number=1 […]

如何使用PowerShell从另一个Excel创build新的Excel

我试图从电子表格中获取数据,这些数据给了我办公室里人们的名字和姓氏,但是我对脚本和PowerShell并不熟悉,所以我完全不知道如何做到这一点。 我想要新的电子表格打印这样的电子邮件: lastnamef@company.com 我看了一些类似的例子,但是由于我对这个很陌生,所以我不确定如何把它变成我的,但是这里是我所拥有的(几乎和我在这里看到的最后一个例子一样): $xlCellTypeLastCell = 116 $startRow,$col=2,1 $excel=new-object -com excel.application $wb=$excel.workbooks.open("Libraries\Documents\Emails for UAC.xls") for ($i=1; $i -le $wb.sheets.count; $i++){ $sh=$wb.Sheets.Item($i) $endRow=$sh.UsedRange.SpecialCells($xlCellTypeLastCell).Row $email=$sh.Cells.Item($startRow,$col).Value2 $address=$sh.Cells.Item($startRow+1,$col).Address() + +$sh.Cells.Item($endRow,$col).Address() $sh.Range($rangeAddress).Value2 | foreach { New-Object PSObject -Property @{City=$city;Area=$_} } } $excel.Workbooks.Close() Next objExcel.Workbooks(1).Close objExcel.Quit

excel vba – 根据另一列中的空白删除变体中的单元格

我有一个像这样的Excel表: HEADING <–A1 HEADING <– this is B1 dhg kfdsl 56 fdjgnm hgf fdkj tr 465 gdfkj gdf53 ry 4353 654 djk 354 <– a12 blah <– this is B12 我试图将列A中的单元格范围放入一个变体中,并且如果列B中的单元格(对于列A中的同一行)为空,则从该变体中删除任何数据。 那么我想复制这个变种到一个新的列(即col c) 所以我的预期结果是: HEADING <–C1 dhg 56 hgf 465 ry 654 354 <– C8 这是我到目前为止的代码: Dim varData As Variant Dim p As Long varData […]

从不带for循环的CSV文件获取列值

我有一个很大的CSV文件在我面前。 10列,3000行。 我正在寻找一个PHP库,让我只是得到一个给定的列中的所有值。 像这样的东西: $columnValues = $file->getColumnValues('F'); 我看过: http : //pear.php.net/package/Spreadsheet_Excel_Writer/ 但这似乎并没有我所需要的….我可能是错的。 我不在寻找的是一个foreach解决scheme。

应用条件格式化后,Excel 2007拒绝了粗体命令

我有一个与Excel(2007)电子表格交互的AutoHotkey脚本。 它执行以下操作:input条目,在条目中select性地加粗字,移动到第二个单元格并input另一个条目,移到第三个单元格并停止。 这完美的工作,但第二个单元格包含偶尔由第二个条目触发的条件格式。 任何时候格式都被触发,Excel将开始拒绝select性的粗体。 我曾尝试使用长时间睡眠和SetKeyDelay时间无济于事。 当我做慢testing运行,它看起来像大胆的风格正在申请,并保持在Excel退出“编辑模式”后。 由于某种原因,在“发送{右边3}”到“顶部”select“单元格”开始时失败。 我无法用手动input复制错误。 有谁知道发生了什么? 谢谢! :*:007\:: send XXX!{enter}Hooligan!{enter}007 send {F2}+{left 4}^b ; enter Edit Mode and bold end number send {left 1}+{left 8}^b{F2} ; bold name and exit Edit Mode send {right 3} ; go to top 'choice' cell send {enter} ; down to 'option' cell send {enter}{right 11} ; […]

我可以使用VBScript获取现有的CSV并使其成为单个Excel工作簿的选项卡吗?

我正在尝试自动化一个过程,在该过程中,我从一个目录中获取多个CSV,并在Excel工作簿中将它们分别设置为自己的选项卡,以便可以将数据等转换为数据。 我试图避免使用macros,如果可能的话…是否有可能在VBScript中做到这一点? 这是我迄今为止所尝试的,请原谅我的编程习惯,因为我刚刚才了解了VBS的基础知识: Call createWkbk() Function createWkbk() strFileName = "c:\test1.xls" Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True Set objWorkbook = objExcel.Workbooks.Add() 'Adds one spreadsheet to book for each command objExcel.ActiveWorkbook.Worksheets.Add objExcel.ActiveWorkbook.Worksheets.Add objExcel.ActiveWorkbook.Worksheets.Add 'This renames all the sheets to 'int#' objExcel.Sheets(1).Name = "int1" objExcel.Sheets(2).Name = "int2" objExcel.Sheets(3).Name = "int3" objExcel.Sheets(4).Name = "int4" objExcel.Sheets(5).Name = "int5" objExcel.Sheets(6).Name […]

使用Microsoft Shell COM Library复制到zip文件时覆盖文件

我正在使用VBA中的Microsoft Shell Controls And Automation COM库。 我有一个zip文件,我正在复制一个文件到zip文件。 问题是该文件已经存在,它会抛出一个对话框,说:“你已经有一个在这个位置具有相同名称的文件,你想a)复制和replace或b)不要复制”。 我想以编程方式说复制和replace(覆盖!)。 我认为在.NET框架上的等价物有一个文档页面在http://msdn.microsoft.com/en-us/library/windows/desktop/ms723207%28v=vs.85%29.aspx但我已经尝试了多种这些。 此外,我会接受删除原来的项目,使添加成功没有问题; 可悲的是我找不到删除项目的方法。 我正在使用Windows 8,64位版本。 我在Excel(14)VBA(7)和我正在使用的库是在C:\ Windows \ SysWOW64 \ shell32.dll 这是我正在谈论的types库的IDL的头 // Generated .IDL file (by the OLE/COM Object Viewer) // // typelib filename: shell32.dll [ uuid(50A7E9B0-70EF-11D1-B75A-00A0C90564FE), version(1.0), helpstring("Microsoft Shell Controls And Automation") ] library Shell32 { // TLib : // TLib : OLE Automation […]

命令行实用程序根据其内容和date复制文件

我有一个在地点超过10,000个Excel文件的列表 我需要一个免费的实用程序(因为我需要使用Windows任务计划程序每隔x分钟运行一次),这将扫描这些文件并search文件中的特定string/内容。 该文件还应该在特定date后创build/修改。 如果文件符合这些标准,则必须将其复制到位置B. 我发现一个名为Ultrafile Search的免费程序,它能够识别这些文件,但是它不能运行参数等,所以我不能在调度器中使用它。 我也尝试WinGrep这似乎做我所需要的,但它始终冻结可能是由于文件的数量。 一个命令行工具或batch file脚本将是伟大的。 谢谢

计算并突出显示短语中的关键字

我有一个两列的Excel表。 第一列是关键短语,第二列是消息。 关键短语可能出现在消息列中。 我需要知道消息列中出现了多less次关键短语。 请build议一些好的和简单的方法find。 关键短语是一列,消息是第二列。 消息列是1个或多个关键短语的组合(连接)。 我需要找出每条消息包含多less关键短语。