Tag: 保存

我怎样才能将表单转换为string？ 或者我甚至需要？

我有一个问题采取xlrd文件，并将其放置到一个xlwt文件来保存。 我不断收到错误： decode() argument 1 must be string, not Sheet 我怎样才能将工作表更改为string？ 这里是我的代码： import xlrd import xlwt wb = xlrd.open_workbook("Workbook1.xlsx") sh = wb.sheet_by_name("worksheet") wbk = xlwt.Workbook(sh) sheet = wbk.add_sheet("sheet1")

为什么perl保存两份Excel电子表格？

这与保存后在“我的文档”中创buildExcel Addin的副本类似，只不过我正在使用Perl而不是VBA，而使用xls文件而不使用xlsm，并且行为的负面影响是不同的。 我已经inheritance了作为SYSTEM在Windows 2003 Server上运行的Perl脚本（Perl 5.8.8）。 将Excel 2003模板文件复制到唯一的完全定义的path位置后，它将使用OLE在Excel中打开唯一文件，编辑文件，保存文件并closures文件。 编辑文件的结果是保存在正确的，完全定义的path位置以及默认用户configuration文件的“文档”文件夹中。 这导致数以千计的这些文件积累在C：驱动器上，因为每个要雇用的新pipe理员都会在他的“文档”文件夹中获取副本。 添加设置$ OUT的值的代码： if (!$db->Sql("EXEC GetDetails 'name'")) { while ($db->FetchRow()>0) { @DataIn = $db->Data(); $name = $DataIn[0]; $IN = $DataIn[1]; $OUT = $DataIn[2]; opendir(DIR,"$OUT") || die "$OUT directory does not exist $!\n"; #… loop of proprietary code #… @Completed = $db1->Data(); #… &formatExcelReport #The code that […]

如何在没有用户提示保存文件的情况下保存Excel？

嗨我写了一些代码使用VBScript在Excel表单如下。 现在，每次脚本完成处理时，它都会提示用户Save 。但是我不想要这个，而是希望它自动保存，而不会提示。 码 Option Explicit Dim objExcel1,strPathExcel1,objSheet1,objSheet5 Set objExcel1 = CreateObject("Excel.Application")'Object for Condition Dump strPathExcel1 = "D:\VA\GE_Wing_To_Wing_Report.xlsx" objExcel1.Workbooks.Open strPathExcel1 Set objSheet1 = objExcel1.ActiveWorkbook.Worksheets(1) Set objSheet5 = objExcel1.ActiveWorkbook.Worksheets(5) '===================================================================================== 'Here Bad sheet will be copied by the data from First sheet master data sheet '===================================================================================== ParentPIDFromMasterSheet objSheet1,objSheet5 '===================================================================================== 'Here Bad sheet will be copied by […]

检查是否SaveAs是成功的VBA

我需要什么样的声明来检查SaveAs操作在vba中是否成功？ Sub saveBookAs() wb.SaveAs fileName:="newFile" End Sub

如何使用R-shiny和shinyFiles指定文件和path来保存文件？

我正在与R（shiny），并希望将数据框保存为Excel文件。 为此，我使用“shinyFiles”包，以便用户可以指定excel文件的存储位置： server.R库（shiny）库（shinyFiles） shinyServer(function(input, output, session) { ## ShinyFiles : get the user favorite directory volumes=c(home = '~/'), shinyDirChoose(input, 'dir', roots=volumes, filetypes = c('','xlsx')), output$dir.res <- renderPrint({parseDirPath(volumes, input$dir)}), ## Button to save the file observeEvent(input$button.save, { ## A standard file name A <- "name" B <- "family if( input$text == "File name…" ) outFile <- […]

Powershell：Excel，运行后保存并closures

运行后如何保存下面的脚本？ 脚本来自： Powershell磁盘使用情况报告 $erroractionpreference = "SilentlyContinue" $a = New-Object -comobject Excel.Application $a.visible = $True $b = $a.Workbooks.Add() $c = $b.Worksheets.Item(1) $c.Cells.Item(1,1) = "Server Name" $c.Cells.Item(1,2) = "Drive" $c.Cells.Item(1,3) = "Total Size (GB)" $c.Cells.Item(1,4) = "Free Space (GB)" $c.Cells.Item(1,5) = "Free Space (%)" $d = $c.UsedRange $d.Interior.ColorIndex = 19 $d.Font.ColorIndex = 11 $d.Font.Bold = $True $intRow […]

在尝试保存时，Excel无法使用可用资源完成此任务

我目前正在向以前编写的VBA excel应用程序添加function。 直到最近，当我编辑一个模块时，一直没有exception的问题，而且我现在已经修复了一个错误，导致程序崩溃。 重新打开后，我发现我无法保存文档并收到错误消息“Excel无法用可用资源完成此任务。 select更less的数据或closures其他应用程序“。 closures其他应用程序或重新启动计算机没有帮助。 从那时起，我偶尔可以通过执行以下任意组合来使程序处于可编辑状态： •更改文件名称 •打开该程序，然后取消该过程，然后重新打开 •删除所有模块并重新导入 这里有一些链接到MSDN信息的问题解决这个问题https://support.microsoft.com/en-gb/kb/2779852和https://support.microsoft.com/en-gb/kb/2655178 当我在保存文档的状态下获取文档时。 它会保存正常，直到我closures并重新打开Excel文档，然后经常（但不一致）发生保存问题。 我需要为用户着想，因为这也影响到它们的function。 任何帮助将不胜感激，因为它感觉就像我已经尝试了一切。 有关该计划的更多信息 该程序是一个数据库应用程序，用户可以将数据添加到数据库，也可以以表格的forms查看数据以及graphics表示。 他们无法访问程序背后的Excel表格。 目前共有19张，21个用户表单（相当大），20个模块和8个模块。 它只有超过1600 KB的大小。 当excel文件打开程序时： 隐藏Excel表格 显示用户窗体 作为显示用户窗体的一部分 运行创build频繁访问所需信息的模块（大约15个变体arrays） 对其中一张纸进行sorting 启动一个计时器 要打开Excel并能够查看代码，用户可以selectpipe理button，input正确的密码后，将显示应用程序，并卸载所有用户表单。 在这个阶段，我试图保存程序，并呼吁VBA做我的编辑。 2/9/2015以安全模式打开的其他信息也增加了保存工作簿的可能性

只能将填充的单元格填充为PDF

我目前正在尝试修改一个Visual Basicmacros只保存工作簿中已经填充单元格的电子表格。 当前的macros只是将整个16页工作簿保存为PDF格式，但最多9个这样的页面有时仍未完成，但仍保存。 我希望macros自动检查这些表是否已经填充，一旦点击“保存”button，然后继续只保存填写（完整）表作为PDF。 我会大量appricate任何帮助！ 下面的代码是macros保存整个工作簿时的工作方式。 （在保存为PDF之前，有一个IF语句检查。） Sub SaveAsPDF() With ThisWorkbook.Sheets("COVERPage1PRINT") If (Len(.Range("C24")) = 0) Then MsgBox "Ensure Serial Number or Stamp number are filled." Exit Sub ElseIf (Len(.Range("H17")) = 0) Then MsgBox "Ensure Serial Number or Stamp Number are filled." Exit Sub Else ChDir _ "P:\Cells\Spool & Sleeves Cell\Flow Plot Records\EFA\Saved EFA PDF Archive" […]

Workbook.save – “以下function无法保存在无macros工作簿中…”

我的小组在新的Excel实例中打开一个.xlsm文件，对文件进行更改并保存更改。 但是，尽pipe正在打开的文件是.xlsm，但在workbook.save中，我收到警告消息“以下function无法保存在无macros工作簿中…” 这对我来说没有意义，因为该文件是.xlsm。 有任何想法吗？ 编辑：我相信我find了问题的根源。 尽pipevariables“path”包含C：\ file.xlsm，但wkb.path是空的。 （请参阅下面的Debug.print）。 为什么wkb.path是空的？ Set XL = New Excel.Application XL.Visible = False For Each Path In XLSMPaths Set wkb = XL.Workbooks.Add(Path) Debug.Print Path ' "C:\file.xlsm" Debug.Print wkb.path ' "" Debug.print wkb.name ' "file" wkb.Save '<- alert message "The following features cannot be saved in macro-free workbooks…" Next Path

保存VSTO工作簿的非VSTO副本

我想从一个.NET 3.5 Excel 2007 VSTO工作簿保存一个ListObject到一个新工作表（完成），并保存新工作表（没有工作簿需要VSTO自定义文件（!!!!!）） 。 有没有人有这个运气？ 我获得成功的唯一方法就是保存为一个CSV文件，但在这种情况下，这是不可接受的。 我宁愿不保存到一个CSV只是为了复制回XLS文件。 worksheet.SaveAs（saveDialog.FileName，Excel.XlFileFormat.xlOpenXMLWorkbook）