Tag: dynamic

Exceldynamic范围偏移公式排除#n / a

我有数据根据切片机而变化,我不能找出正确的偏移公式来select只有有效的数据值,换句话说,排除任何#N / A值。 数据看起来像这样: |Column A | Column B |Column C| |———————————-| |Jan | #N/A | #N/A| |Feb | 4 | 40 | |Mar | 5 | 38 | |Apr | 12 | 10 | |May | #N/A | #N/A| |Jun | #N/A | #N/A| 我想要偏移范围只select二月/三月/四月行。 但是,如果数据发生变化,因为我点击不同的filter(下面的例子),我希望它仍然只select非错误数据(1月/ 2月/ 3月/ 4月行): |Column A | Column B […]

擅长12个月的dynamic移动范围

我在这里说的是我想要实现的简化版本。 我在Excel电子表格中有一张表(表1),其中包含2017年1月至2020年12月的date列(实际值+预测值)以及与这些date对应的收入列。 我有另一个表(表2),其中包含1年的数据点,每月更新。 目前的月份是从2017年5月到2018年4月。下个月我会更新它,显示从2017年6月到2018年5月。我想通过使用索引匹配和偏移function来简化这个过程。 我打算不得不在一个单独的单元格中更新当前月份字段,表2将自动更新12个月的数据点。 任何想法如何可以做? 谢谢!

Excel VBA哪个UserForm控件触发共享MouseOver类事件?

如何返回触发mouseover类事件的用户表单控件的名称? 这听起来很简单,但老实说,我一直在试图find正确的语法,我的大脑… 这是我的用户表单模块: Option Explicit Dim dArray() As New Class1 Sub Build_Controls() Dim dImage As Object, i As Integer For i = 1 To 3 Set dImage = UserForm1.Controls.Add("Forms.Image.1", i, True) With dImage .Left = (25 * i) + 20 .Width = 20 .Top = 10 .Height = 20 End With ReDim Preserve dArray(1 To […]

VBA复制和粘贴dynamic范围

我是新的VBA,我卡住了某个地方。 我必须复制列A的最后一行直到列H,并粘贴它,直到列I的最后一行。列的最后一行将总是改变。 例如; 我的数据是在A2:H2和I5是最后一个数据单元格。 我的代码应该是复制A2:H2并粘贴它A3:H5。 第二次运行macros(在向各列添加新数据之后),应该复制A6:H6并粘贴到第一列的最后一行。 我写了两个不符合我需要的代码。 第一个代码是 Sub OrderList1() Range("a65536").End(xlUp).Resize(1, 8).Copy _ (Cells(Cells(Rows.Count, 9).End(xlUp).Row, 1)) End Sub 这段代码跳过A3:H4,只粘贴到A5:H5 第二个代码是 ; Sub OrderList2() Range("A2:H2").Copy Range(Cells(2, 8), _ Cells(Cells(Rows.Count, 9).End(xlUp).Row, 1)) End Sub 它复制A2:H3并粘贴A5:H5,但是当我添加新的数据时,它不会从A5:H5开始粘贴。 它从A2:H2开始,并覆盖到旧的数据。 我可以看到我必须改变,范围应该像第一个代码中的dynamic范围,但我无法设法编写代码。 我真的很感激一点帮助。

Excel VBA – 使用variables来设置数据透视表数据字段function

我试图创build使用VBA创build数据透视表的自定义报告,我遇到麻烦的一个部分是将数据字段设置为基于他的用户的需求。 例如:我有一个下拉菜单,显示每种types的PivotFields函数(sum,min max等),并根据用户select的内容将其存储为stringvariables。 当我运行我的代码时: Dim valueXL As String valueXL = xlSum With Worksheets(sheetPivotName).PivotTables(sheetPivotName).PivotFields(valueType) .Function = valueXL .NumberFormat = "$#,##0.00" End With 我得到一个错误,但是,如果我replace.Function = valueXL与.Function = xlSum它工作正常。 有什么办法可以dynamic设置.Function的值吗? 谢谢

我如何填充一个dynamic的2D数组?

为什么这样做: Dim Arr As Variant p = 1 For i = 1 To LRow If Sheets("Data").Range("U" & 4 + i).Value > 0 Then ReDim Preserve Arr(1 To p, 1 To 2) Arr(p, 1) = Sheets("Data").Range("U" & 4 + i).Value Arr(p, 2) = Sheets("Data").Range("N" & 4 + i).Value p = p + 1 End If Next […]

dynamic访问Excel工作表

我有一个Excel工作簿,其中工作表被命名为“1”,“2”,“3”等 我希望能够dynamic地访问他们的内容,例如,如果我有一个单元格A2中的页面“3”的值等于2,我希望能够做一些像 =IF('(A2)'!L4 = "", 0.0, '(A2)'!L4) 在页面“3”的另一个单元格中访问页面“2”上的单元格L4。 有一个简单的方法来做到这一点? 提前致谢

公式中的Exceldynamic列引用

我想根据“当前date”更新C3中的单元格引用。 例如,如果“当前date”是“星期四”,那么我希望C3是“Z3” 任何build议让我开始? 网页阅读?

excel间接函数来读取date并返回dynamic值

通过论坛看,无法find我所需要的。 我在B列中有100多张带有唯一表格名称和数据的工作表.B列将包含各种结束date。 有些工作表会有1或2个结束date,其他的则有30个结束date。 。 我想创build一个摘要页面,其中包含一个表格,该表格将自动更新,以显示在B列中有结束date的所有工作表名称,在未来30天内过期。 这是需要编码的东西吗? 或使用Excel的间接公式,也许是一个查找缠绕它?

Excel自动化使用C#dynamic

我目前正在Silverlight 4中进行一个项目,在那里我需要将一些数据导出到Excel文件中。 使用dynamic关键字和AutomationFactory,我可以自动化Excel没有问题。 但是现在我想使用一些Excel枚举 – 我该怎么做? 我没有在我的项目中引用任何Interop-DLL,我只是使用dynamic。 例: dynamic xlApp = null; //works without problems xlApp = AutomationFactory.CreateObject("Excel.Application"); xlApp.Visible = true; //doesn't work – 'Excel' does not exist, there are no referenced Interop-DLLs xlApp.Calculation = Excel.XlCalculation.xlCaculationManual