Tag: excel 2003

如何删除Java中的Excel工作表的内容？

如何使用Java SE和Apache POI删除Excel工作簿中Excel工作表的内容？

XML数据导入后Excel 2003 VBA错误1004

我构build了一个macros，它使用不同的XMLinput文件，并将每个文件导入到工作簿中的不同工作表中。 然后保存工作簿。 这对于成百上千的用户来说是98％的工作时间，但是当用“错误1004：Microsoft Office Excel不能访问文件”C：\ SymmPiT“保存工作簿时有时会失败。 我发现它涉及到当某个XML文件太大，导致Excel导入“ImportDisks：”部分。 尝试将SYMDISK.XML文件手动导入到空白工作簿（使用“数据导入 – XML”）会导致Excel错误“XML导入错误：某些数据无法导入”。 我正在尝试让Excel VBA忽略此XML导入错误。 这在macros的阶段工作，但在代码中进一步保存工作簿（以红色标记）时失败。 即使存在导入错误，如何在保存文件时避免Excel“barfing”？ 或者可以在导入之前检查XML文件，所以我可以避免尝试导入？ 代码exceprts在下面，非常感谢回复！ 🙂 Sub ImportData() On Error GoTo SPErrorHandler Application.DisplayAlerts = False Sheets("SymmPiT").Select Range("F15").Select Dim SaveName As String Dim Section As Integer ImportDisks: Section = 7 On Error GoTo ImportLocks Sheets.Add.Name = "Disks" Application.ScreenUpdating = False Range("A2").Select ActiveCell.FormulaR1C1 = "from symdisk […]

通过虚拟机查看时，Excel 2003工作簿表单控件有时会resize

我为在Windows XP系统上仍然使用Excel 2003的客户开发。 因此，我们在运行XP和Office 2003的虚拟机内开发。 我经常使用Form Control对象（主要是button控件）在文件内创build菜单或控制表。 有时当我打开这些工作簿时，控件会自行resize（更大，更小和/或不成比例）。 有时我有一个控制，当你点击它，它变得越来越小。 如果在发生这种情况后保存文件，下次打开工作簿时将保留更改。 最大的问题是，如果最终用户机器迁移到不同版本的Windows并在虚拟机中使用devise的工作表，也可能发生在最终用户机器上。 任何build议不胜感激。

如何使wpf应用程序作为ole服务器

我想插入我的wpf应用程序在Excel表格就像一个OLE对象。 可能吗？ 如果是的话，我们如何做到这一点。 在Excel 2003中，当我们点击Insert-> Object菜单项时，我们得到'Object'diloag。 这个dilaog的“Create New”选项卡包含varios OLE对象。 我想在此列表中显示我的DotNet exe应用程序，以便当我select并单击此对话框的“确定”button时，EXE应像其他列表中的OLE对象一样执行。 谢谢，阿米特

如何在VBA中打开使用不正确的字符编码写入的Excel文件

我用文本编辑器阅读Excel 2003文件来看看一些标记语言。 当我在Excel中打开文件时，它显示不正确的字符。 在检查文件时，我发现编码是Windows 1252或其他的。 如果我手动将其replace为UTF-8，我的文件打开罚款。 好的，到目前为止，我可以手动纠正这个问题。 现在诀窍是这个文件是自动生成的，我需要使用桌面上的有限工具自动处理（无需人工交互）（无需perl或其他脚本语言）。 有没有简单的方法来打开这个XL文件在VBA中正确的编码（并忽略文件中指定的编码）？ 请注意，Workbook.ReloadAs对我不起作用，它会出错（并且需要手动操作，因为文件已经打开）。 或者是纠正文件通过一些箍的唯一途径？ 或者：input文本，检查编码string，如果需要replace，将每行写入新文件…; 或者导出到csv，然后再从csv导入特定的编码，保存为xls？ 任何提示赞赏。 编辑： ADODB没有为我工作（XL说用户定义的types，没有定义）。 我解决了我的问题，解决方法： name2 = Replace(name, ".xls", ".txt") Set wb = Workbooks.Open(name, True, True) ' open read-only Set ws = wb.Worksheets(1) ws.SaveAs FileName:=name2, FileFormat:=xlCSV wb.Close False ' close workbook without saving changes Set wb = Nothing ' free memory Workbooks.OpenText FileName:=name2, […]

Excel 2003 DSUM不起作用

我的一个客户有一个主要的应用程序在Excel 2003中编写和运行（我知道，他们知道这是一个错误，他们正在等待它被正确地合并到他们的SAP应用程序中，他们已经等了很多年）。 大多数时候它工作正常，但是这个星期他们有一个问题，并且数据正在返回#value条目。 当我看着这个时，我发现一个DSUM函数正在返回#value，然后被分散到其他地方（我提到在VBA代码中没有数据validation？）当我查看函数，这是在一个单独的表格中加上一个条件，在数据中标识了一些问题，但是即使我修正了它们，并且函数分析表明没有错误，它仍然返回#value。 我会张贴一些代码，但是涉及到一个4700行的表单，这是不切实际的。 任何人都可以build议我可以做什么来推动这个？ 当源表单中没有任何错误时，为什么DSUM返回#value问题？ 我已经通过列search，所有的值都是有效的数字。 对不起有些模糊，但如果任何人都可以给我build议如何进步，这将不胜感激。 Excel和VBA不是我真正的专长。

使用aspose.cells或MS-Excel将一个工作表单元格区域引用设置为另一个工作表

我想使用aspose.cells或MS-Excel将一个工作表单元格区域引用设置为另一个工作表。例如，我有两个工作表（wrk1和wr2）。 我有一些关于wrk1和wrk2的数据balnk.Now on wrk2我想要wrk1的细胞参考（如wrk1表单A1：wrk2上与wrk1相同样式的单元格参考）。 请build议。

C＃是Microsoft.Office.Interop.Excel.Range.Cell.Count一个计算每个调用或一个常量

我有一些代码，我通过检查属性Excel.Range.Cells.Count检查我的Excel.Range中是否有任何单元格。 从我的分析来看，这似乎是一个瓶颈（注意，这个方法被称为很多次）。 有谁知道如何实现计数属性，是通过遍历所有细胞在每次调用计算，或者是一个常量？ 在Microsoft的文档，StackOverflow或Google中，我找不到这方面的内容。 任何帮助表示赞赏。 非常感谢你。

XL2003：更改ThisWorkbook.Windows（）。Workbook_BeforeClose事件过程中的Visible属性可防止工作簿closures

如题。 这让我发疯，在networking上的其他任何地方我都找不到任何引用。 我有一个VBA-laden工作簿通常隐藏通过使用： ThisWorkbook.Windows(1).Visible = False 但是，当工作簿closures时，我需要它恢复到一个默认状态，其窗口是可见的，并显示一个“特殊的”工作表，指示用户启用macros。 这是为下一个用户在禁用macros的情况下打开工作簿提供指导。 当工作簿打开并启用macros时，Workbook_Open事件会负责隐藏此消息，此时正常操作将继续。 我的问题是，当我从工作簿的_BeforeClose事件中更改.Windows().Visible属性（只有在Excel退出时才会发生），工作簿仍保留在屏幕上。 我已经确认，它确实设置了导致这种行为的.Windows().Visible属性。 我已经尝试使用ThisWorkbook.IsAddin属性，因为这与从用户视图中“隐藏”工作簿具有相同的效果，但这会导致完全相同的行为。 我也尝试过不以任何方式更改窗口的可见性，希望随后打开禁用macros的工作簿将导致该属性被忽略，但事实并非如此。 我唯一能做的就是让ThisWorkbook.Close作为_BeforeClose事件本身的最后一行，但这会导致不稳定，这种情况偶尔出现“Excel意外closures，你想恢复/重启？” Excel退出后的错误消息。 任何帮助/指针感激地接受。 我无权访问Excel的更高版本。 我的代码： Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.ScreenUpdating = False Call cleanUp Application.ScreenUpdating = True End Sub 和 Private Sub cleanUp() Dim s As Worksheet shtZNM.Visible = xlSheetVisible For Each s In ThisWorkbook.Sheets If Not s Is shtZNM Then […]

从datex开始并在datey结束创build单元格

我有一个我正在处理的Excel电子表格，它根据date/时间从数据库中查找数据。 我有一个设置的开始date/时间的行，并希望创build一个脚本或macros，将自动复制该行，我将它称为引导行，并添加x分钟，直到它达到一个结束时间。 我需要复制整个引导行（第5行）添加x分钟（您可以在单元格D3中定义）并复制它们，直到时间值（位于每行的G列）等于结束时间（位于G2）。