试图创build代码,允许在一个页面中input数据excellogging在第二页创build一个报告

我正在创build一个跟踪表(Sheet1),在一个logging中跟踪信息,然后使用一个button,“更新”它将这个信息传递给“Sheet2”,这将是一个月度报告。 我有第2页8栏标题。 页面一是我在更新button所在的单元格中input数据的位置。 这是我的代码,我只使用了一列: Private Sub CommandButton1_Click() Dim SerialNumber As String Worksheets("Calibration Record").Select SerialNumber = Range("E5") Worksheets("Monthly Due Report").Select Worksheets("Monthly Due Report").Range("A2").Select If Worksheets("Monthly Due Report").Range("A2").Offset(1, 0) <> "" Then Worksheets("Monthly Due Report").Range("A2").End(x1down).Select End If ActiveCell.Offset(1, 0).Select ActiveCell.Value = SerialNumber Worksheets("Calibration Record").Select Worksheets("Calibration Record").Range("A2").Select End Sub 我也尝试了所有8列无济于事。 使用上面显示的代码,我能够使其工作一次。 当我input第二行信息的数据时,它给了我“运行时错误'1004'。应用程序定义或对象定义的错误。 我一直在这个工作了近一个月,我无法弄清楚我做错了什么。 我甚至在YouTube上观看了Dinesh Kumar Takya的video,无济于事。 我已经遵循了他做了很多次的所有事情,而且我仍然能够使其工作一次,但是之后我得到了运行时错误。

用C#testingEssbasemacros

我正在尝试自动化一些Excel报告。 目前我需要从Essbase服务器中检索一些数据,为了实现这个function,我创build了一个macros来检索和设置Excel工作表中的数据,我的VBA代码如下: Option Explicit Declare Function EssVRetrieve Lib "ESSEXCLN.XLL" (ByVal sheetName As Variant, ByVal range As Variant, ByVal lockflag As Variant) As Long Declare Function EssVConnect Lib "ESSEXCLN.XLL" (ByVal sheetName As Variant, ByVal userName As Variant, ByVal password As Variant, ByVal server As Variant, ByVal application As Variant, ByVal database As Variant) As Long Declare […]

从asp.net后面的代码调用jquery函数是行不通的

我有一个button点击事件 protected void btndwnReport_Click(object sender, EventArgs e) { try { save("Report1"); } catch (Exception ex) { Log.Errlog("Error Occured in btndwnReport_Clickof UI_Report Page : " + ex.Message.ToString()); } finally { Page.ClientScript.RegisterClientScriptBlock(typeof(Page), "HideLoading", "HideLoading2();", true);//this function is not triggering } } 使用这个我想使用reportviewer下载一个excel文件。 点击这个button,我显示一个加载图标(通过调用ShowLoading2()),它被定义为一个jQuery的function。 function ShowLoading2() { try { if (parent.document.getElementById('dvProgress')) $("#dvProgress", parent.document).hide(); } catch (e) { } […]

更好的方式从Excel文件中读取数据

我必须从一个大约有40列的Excel文件中读取数据,我正在使用列索引逐个读取它。 即: Cell cell = row.getCell(0); if (!(cell == null || cell.getCellType() == Cell.CELL_TYPE_BLANK)) { cell.setCellType(Cell.CELL_TYPE_STRING); // set in setter } 但是这种方法与Excel文件的结构紧密结合,因为如果在它们之间添加了新列,那么将需要主要代码(列的索引值)。 请build议我从Excel文件中读取数据的有效方法,这应该与Excel的结构松散地耦合,或者如果有任何其他方式可以提供与Java对象的字段的列绑定。

Excel公式引用它自己的列

我有以下数据集: Name Class Amount Position 1 I1 A 10 P 2 I1 OR 3 I1 A -5 R 4 I2 OP 5 I2 A 7 P 6 I2 A -11 R 通常金额缺less数据。 我想填写匹配我的姓名和职位logging的logging中缺失的数据。 所以在第二行我想-5和在第四行我想7.如果我结合名称和位置来创build一个键列,那么我可以做一个索引匹配或查找或只是一个索引匹配与多个标准。 我想知道什么是最明智的方法呢? 我是否创build一个新的列,比如说Amount-2,并在其中写入一个从Amount中提取数据的函数,如果缺失则执行索引匹配? 我不想这样做,因为我不想添加更多的列到我的数据集。 我应该对数据集进行sorting,以便将所有空白单元格聚集在一起,然后在其中编写一个公式,在同一列中引用下面填充的单元格? 这种方法是强大的后来sorting在其他领域的数据集或将我的公式引用干扰? 写一个macros来填充丢失的单元格? 矫枉过正? 我要问的原因是,我不想通过添加更多列(如Key或Amount-2)来增大表单的大小,而且我想知道填充空白的方法是什么。

基于具有不同值的相同列名创build列

我有一张桌子: 如上图所示,还有许多其他的meta_appl_id。 现在我想运行一个SQL查询,以便根据“meta_value”的值创build列。 我试过了: SELECT * , if (`meta_value` = 'physically challenged' , 'yes', '') as PH, if (`meta_value` = 'kannada medium' , 'yes', '') as Kannada, if (`meta_value` = 'rural' , 'yes', '') as rural, if (`meta_value` = 'woman' , 'yes', '') as woman FROM `applicant_meta` WHERE `meta_value` = 'physically challenged' or `meta_value` = […]

为什么Excel需要很长时间来计算和生成不准确的结果?

我有一个30万行的电子表格BO2009。 只有一列包含公式其他所有值都是粘贴值,因此只需要在整个工作簿中计算一个公式。 这里是公式: =IFERROR(INDEX('RE2009'!H:H,MATCH('BO2009'!A2,'RE2009'!A:A,0)),1)这个公式被复制到底部表,所以300K次。 RE2009表有180k行。 'RE2009'!H:H包含十进制数字和'RE2009'!A:A,'BO2009'!A:A包含ID代码 – 数字和字母的8个字符组合。 “RE2009”!A:A,'BO2009'!A:A格式化为一般。 我一直使用INDEX / MATCH,而我的大多数电子表格不是300k长,60k-100k是典型的。 现在我的CPU需要花费几分钟的时间才能完成计算。 这是正常的吗? 有没有办法提高Excel的performance? 最重要的是,我得到不准确的结果:而不是0.3查找会产生一个错误。 正如所build议的,我已经将BO2009表格过滤到80k行,但仍然有相同的问题。 我决定看一个特别的公式: =IFERROR(INDEX('RE2009'!H:H,MATCH('BO2009'!A108661,'RE2009'!A:A,0)),1)工作正常。 使用MATCH函数查找的ID是查找数组中的第3个条目,但仍不能产生正确的值(0.3)

使用VBA从谷歌检索信息,试图build立一个停止时,谷歌不能按预期工作

Sub test() Dim IE As New InternetExplorer Dim city$, state$ Dim i As Integer Dim dd As Variant Dim doc As HTMLDocument 'variable for document or data which need to be extracted out of webpage Set doc = IE.document i = 2 'start row 'Setting the variables city = Cells(i, 1).Value 'City variable for search […]

带文本variables的macros改变列

macros很好,直到文字的位置改变列。 我使用“查找”文本string,然后想要将光标向右和向下移动2,然后将数据复制到另一个工作表。 该macros很好地工作,直到文本string在后续的电子表格中移动。 如何根据find的文本string将选定范围变为可变的? 在下面的例子中,我如何获得Range("H7:H180").Selectvariables? Range("A1").Select Cells.Find(What:="reg", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , SearchFormat:=False).Activate Range("H7:H180").Select

按一列对多列进行sorting

我在Excel中制作了一个三列的电子邮件列表。 在工作表上,我有两个button,“按名称sorting”和“按添加datesorting”。 我想按所选button对所有三列进行sorting,这样我可以更快地find条目(以后我还会input一个单独的查找函数)。 基本上,我想要在工作表中已经在工具栏上的sortingfunction,你可以按它,它知道哪个列已经sorting。 我已经看到macros和VBA的东西,但所有这些都是由单独的参数sorting列,而我需要这些列链接。