Tag: excel 2000

插入查找公式时出现错误1004: 我有下面的代码查找Excel 2000中单独的工作表中出现值的date： sSheet.Range(dateColumn & pRow) = _ "=lookup(" & valColumn & pRow & ";'" & _ iSheet.Name & "'!" & tColumn & firstRow & ":" & tColumn & lastRow & ";'" & _ iSheet.Name & "'!" & dateColumn & firstRow & ":" & dateColumn & lastRow & ")" 这失败了，错误1004，这似乎是一个完整的通用。真正的启发是，如果我在值的等号前插入一个刻度标记，如"'=lookup(" ，它工作正常，如果我手动删除刻度标记后，公式工作。拒绝插入？

是否有显示当前date和时间的function？: 我的电脑上有Microsoft Excel 2000。我想在单元格中显示当前的date和时间。我查看了帮助，并find了NOW()函数。它显示当前date，但是对于当前时间，它不显示AM或PM ，它显示： 4/19/2011 11:22 。我明白这是为什么。是否有其他date/时间function，将显示上午/下午，或者这是不可用的东西？

如何使用Excel2000.pas在Delphi 6中更改Excel工作表TabColor？: 我有一个创buildExcelWorkbook的应用程序。在工作簿中有一些工作表，我想改变每个工作表的标签颜色。示例代码如下： ExcelApplication.WorkBooks[1].WorkSheets[1].Name := 'Sheet1'; ExcelApplication.WorkBooks[1].WorkSheets[1].Name.ColorIndex := 3; // Raise in here 有什么build议吗？

发生错误时是否可以自动保护工作表？: 我曾尝试在错误上使用Goto，但即使发生错误，它似乎也跳过了这一点，或者即使没有发生错误，也依赖于将其放置在脚本中的位置。运行时错误发生在这行代码中： Range(Worksheets("Search Engine").Cells(9, 1), Worksheets("Search Engine").Cells(Endcolumn, Endrow + 2)).Select Selection.RowHeight = 20` when `Endcolumn = 0

数据仅在图表上显示为零: 我有一个Excel表中的数据：驱动图表，但图表只显示0作为数据：我的每个细胞都是一个公式。我试图在单元格中写入一个值，并在图表中显示我试图复制数据并粘贴值，但它不显示在图表上。请帮忙。

如果当前没有安装，可以添加对Excel版本的引用吗？: 使用Visual Basic 2008速成版涉及2台PC： PC1安装了VBEE和Excel 2007 PC2（目标机器）没有安装VBEE，并具有Excel 2000 我正在尝试完成的是在PC1上构build一个应用程序以在PC2上使用。当然，当我在构build期间参考12.0库，然后尝试在目标机器上使用9.0运行时，我得到一个“无法find12.0对象库”消息。另外，我不能使用后期绑定（如下所示）：PC2的安全设置显然禁止这… Dim objExcel As Object 'Excel.Application Dim objWB As Object 'Excel.Workbook Dim objWS As Object 'Excel.Worksheet Dim objRng As Object 'Excel.Range Try 'Try to Open Excel, Add a workbook and worksheet objExcel = CreateObject("Excel.Application") 'New Excel.Application etc… 那么，有什么办法可以添加对Excel 9.0的引用，而不需要像VBEE一样安装在同一台机器上？还有别的办法吗？

平均function: 我有一个巨大的数据每月更新。我想查看新的数据是否与以前的月份有所不同。它看起来像这样： month name data jan 551 2 jan 552 20 dec 553 12 jan 553 13 dec 554 9 okt 555 2 nov 555 2 dec 555 2,5 所以5个名字，长达4个月，不同的数据公关。月，公关名称。我想制定一个公式，可以告诉我，如果其中一个名称与前几个月相比i％不同。例如，我想说的是，dec中的“name”555相对于该客户的平均值相差25％。谢谢，安德斯那么我想我不太好解释自己。所以我会尽量做得更清楚。我正在做这个excel函数。所以我正在寻找的公式应该计算公关。命名平均数字（avgN）。这当然每个月都在变化。公式应该find与平均值相比的月度差异。我有大约2000行，900个不同的名字。

更改数据透视表单元: 我有一个数据透视图，跨越X轴数年，每天都有数据。问题在于X轴上每天都有一个标签，所以它们太杂乱无法读取。我只想显示几个月的标签，而不是date，每天仍然可以看到数据点，但是到目前为止，我发现了这些：在常规图表中，通过转到轴格式设置，在“比例”选项卡上，将主要单位设置为“月份”，这样做是微不足道的。数据透视图的相同选项卡中不存在此字段。我可以在数据透视表上设置“刻度线标签之间的分类数量”，但当然不能和月份alignment。我可以设置数据透视表使用月份而不是一天，但是然后很多分辨率丢失。设置Charts(1).Axes(xlCategory).MajorUnitScale = xlMonths似乎没有做任何事情。

从Excel中的多个工作表中返回数据: 你如何创build公式，将返回不同工作表的总计，平均数，计数，最小值，最大值等？列（存在）在它们的标题信息中是一致的，但是可能或不可能不同，从一个表到下一个，列号明智的。比方说，我有7个数据选项卡，其中一些或全部数据可能包含bean的列标题，但列号可能在所有选项卡（如果存在）中可能一致，也可能不一致。他们在工作表中的实际位置是完全dynamic的。我的电子表格有几个原始数据标签，我想在摘要/报告表中比较。我相信这是可以做到的，但恐怕这是远远超出了这个老大脑的能力。我曾经想过，玩过一堆使用间接，索引，匹配的公式，只是无法弄清楚。您的帮助将不胜感激。谢谢

在类debugging中引发的错误，就像在属性调用中引发一样: 我（不幸的是）在Excel 2000 VBA中开发应用程序。我相信我发现在自定义类属性，函数或子debugging中引发的任何错误，就好像在调用属性的VBA代码中引发错误一样。也就是说，VBEdebugging器不会把我带到发生错误的Class属性的位置，而是在第一次input属性的位置（例如，从Module Sub或Function中）。这使得开发任何超过最浅的OO Excel 2000 VBA代码，因为我必须逐行逐行地通过每个Class方法来发现导致错误的指令。我是否错过了一些东西，或者这是一个我必须在Excel 2000中处理的已知错误？这是在2003年还是2007年？示例代码： ''''''''''''''' 'In Module1: Public Sub TestSub1() Dim testClass As Class1 Dim testVariant As Variant Set testClass = New Class1 testVariant = testClass.Property1 'Debugger takes me here… End Sub '''''''''''''' ' In Class1 Property Get Property1() As Variant Err.Raise 666, , "Excel 2000 […]