Tag: excel formula

Excel VBA公式variables查找数据不工作

我通过vba应用下面的公式,它会抛出错误。 Cells(MyRow1 + 4, 3).Formula = "=RIGHT(" & Cells(MyRow1 + 2, 2).Address & ",LEN(" & Cells(MyRow1 + 2, 2).Address & ")-FIND(" & Cells(MyRow1 + 3, 3) & "," & Cells(MyRow1 + 2, 2).Address & ")-2)" 我在单元格中获得的输出是 =RIGHT($B$31,LEN($B$31)-FIND(CA,$B$31)-2) 如果我在Find函数中应用“”,它将起作用: =RIGHT($B$31,LEN($B$31)-FIND("CA",$B$31)-2)

Excel将文本评估为逻辑

我试图通过连接操作数和运算符来评估逻辑expression式。 在Excel 2016中是否有一个从文本转换为逻辑的公式,类似于VALUE()如何将文本转换为数字? 我正在寻找这样的解决scheme,所以我可以dynamic改变条件,而无需改变实际的Excel公式。 我已经search并阅读了Excel函数的描述,但是没有任何东西可以作为解决scheme跳出来。 'The operands and operator A1: 1 A2: > A3: 0 'Concatenation B4: =CONCAT(A1:A3) 'This evaluates to 1>0 B5: =A1&A2&A3 'This also evaluates to 1>0 'Some checks C4: =ISTEXT(B4) 'This evaluates to TRUE. C5: =ISTEXT(B5) 'This also evaluates to TRUE D4: =ISLOGICAL(B4) 'This evaluates to FALSE D5: =ISLOGICAL(B5) 'This also evaluates […]

Excel索引匹配小 – 公式只能在手动模式下工作

我正在尝试为我的需要调整公式,但由于某种原因,我似乎只能在手动计算模式下才能使其工作。 如果select自动模式,则公式在每一行都返回0。 在本质上,公式是在表格DIL-2018-08-14的列H中匹配基于列I中的蓝色关键字的所有匹配。它们都只在手动模式下工作良好,并且仅在每个单元格手动重新计算之后才起作用。 有人可以build议,如果有避免这种情况,并使其在自动模式下也wortk。 公式是: =IFERROR(INDEX('DIL-2018-08-14'!$H$9:$H$502,SMALL(IF(ISNUMBER(SEARCH(LEFT(I8,FIND(" ",I8)-1),'DIL-2018-08-14'!$H$9:$H$502)),ROW('DIL-2018-08-14'!$H$9:$H$502)-ROW('DIL-2018-08-14'!$H$9)+1),COUNTIF($J$7:J8,"*"&LEFT(I8,FIND(" ",I8)-1)&"*")+1)),"")

Excel – 将公式复制到X列的一个字段中,直到VBA中的最后一行

假设我在B2单元中有这个公式 =IFERROR(MID($A2,FIND("|",SUBSTITUTE($A2,"@","|",B$1)),IFERROR(FIND(" ",$A2,FIND("|",SUBSTITUTE($A2,"@","|",B$1))),LEN($A2)+1)-FIND("|",SUBSTITUTE($A2,"@","|",B$1))),"") 在VBA中<我将如何将其复制到最后一行并跨越(并包括P列) 我已经看过例子,它显示了一列,但不是多个,例如VBA填充公式,直到列的最后一行

Excel VBA – 将date戳记添加到每个其他列或行

基本上它很简单(我想),但我似乎无法得到它! 本质上,我正在build立一个跟踪器,每当一个单元格被修改,我需要一个date戳。 我可以放入代码,所以当列b中的任何内容被修改为在列C中放置一个date,但是我不能重复列D中的数据在列E中inputdate。 基本上我会想在每一个其他列date戳。 如果更容易成为其他所有行,那么我只需要改变标题。 如果它的行必须从放入第2行(标题)的数据开始,如果它的列数据从列B(标题再次)input。 谁能帮忙? 我看了网上,但似乎无法find答案…

VBA – 打开一个用户表单后回到一个子表单

我挣扎着一个基本的问题,我没有find答案在线…我正在加载一个用户窗体(我没有使用Excel库创build的进度栏)后,回到我原来的子。 代码如下所示: 模块代码: Sub Original_Sub() 'Some code here Userform1.Show 'Some code here I can't reach End sub 用户代码: Private Sub UserForm_Initialize() With UserForm1 .StartUpPosition = 0 .Left = Application.Left + (0.5 * Application.Width) – (0.5 * .Width) .Top = Application.Top + (0.5 * Application.Height) – (0.35 * .Height) End With End Sub 代码的第一部分运行正常,但运行用户窗体代码后,它会停止…为什么不会像我调用macros时继续? 即: Call […]

使用Excel VBA将所有变化的数据从一个单元格捕获到另一个单元格

我的工作簿的Sheet1 A1单元格不断更新新的数据,我的需求被捕获所有的变化,并保存到sheet2“B”列(新的数据将被添加到一个新的行,如B1,B2,B3等)使用下面的代码I我能够使用工作表更改function来实现它 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = Range("A1").Address Then Dim intLastRow As Long intLastRow = Sheet2.Cells(Sheet2.Rows.Count, "B").End(xlUp).Row Sheet2.Cells(intLastRow + 1, "B") = Target.Value End If End Sub 如果我手动input数据到原始单元格(sheet1 A1),此代码完美工作。 但是,如果我使用任何公式说“= C2”,这是行不通的。 任何使用公式得到更新的数据都不会被捕获到sheet2上B.想知道是否还有我可以使用公式捕获更新的值

跟踪Excel中的任务依赖关系

我在我的Excel表中有两个选项卡。 选项卡1 :包含跨多个function区域的所有依赖项的列表。 这些列是function区,依赖项描述,依赖项ID,计划结束date,目标结束date。 选项卡2 :包含具有以下列的任务列表: function区域,交付名称,交付物描述,目标date,预计date,依存关系ID 例如 Functional Area Dependencies Plan end date Target End date F1 D1 8/22 8/22 F1 D2 8/23 8/23 F2 D3 8/24 8/24 F2 D4 8/25 8/25 Functional Area Deliverable Dependencies Target Date Projected Date F1 de1 D1, D2 8/20 F1 de2 D1 8/20 F2 de3 D3, D4 8/20 […]

2列之间的部分匹配,并导致另一列

我有2列(A和B),我想在列C中获得这两列的部分匹配。 例如 : A Lore: Excavator Lore: Scribe Athletics: Strong Back Healing: Medicine Melee: No Mercy Insight: Sixth Sense Melee: Strong Man Parry: Stage Fighting Healing: Cure Wounds Craft: Journeyman Craft: Master Crafter Discipline: Courageous Discipline: Jaded Linguistics: Accent Stealth: Living Shadows B —- Lore Healing Parry Stealth Craft C (Should be) —- Lore: Excavator […]

如何禁用复制chartarea中存在的形状?

我在Excel中有一个图表,我的macros在图表区域的右侧填充了10个形状。 我只想复制图表的权力,并找不到方法来禁用复制的形状到目前为止。 如果我复制图表,它也复制形状。