Tag: 全局variables

使用范围函数优于variables

我想使用范围函数中的variables来指定excel VBA中的自适应范围select。 Range("A"&aa+4":C5"&bb+4).Select 其中aa和bb是variables。 谢谢 !

有variables在VBA中执行一个操作

我正在VBA上进行速成课程。 我知道一般编码的基本知识。 我试图学习什么variables和function。 我想要做的是如下所示: Sub test() Dim actionName As [action] actionName = Application.SendKey ("^v"), True … Sleep 500 actionName 'does an action of paste Sleep 1000 actionName … End Sub 我的目标是节省时间input像Application.SendKeys()或ActiveCell()长命令。 我如何去做呢? 我看到有人这样做的解决scheme,我试图做的variables,但没有奏效。 我昨天问了一个更具体的问题,但没有回答,给了我一个完全不同的解决scheme,我不能适用于我想要做的其他行动。 先谢谢你。

SUMIF与可变范围

我想做这个简单的代码,但我没有find任何解决scheme。 我有一个循环迭代我的工作表的所有行,并为每一次迭代,我想做一个sumif,但范围是可变的。 所以我想要这样的东西: Dim row,MaxColumn as Integer MaxColumn = 5 For row= 1 to 5 ActiveSheet.Cells(row, MaxColumn + 1).Select ActiveCell.Formula = "=SUMIF("B2:D(here I want a variable D1 to 5 range with row variable),""=1"")" next row 我不知道该怎么做 我知道我可以用它来select一个variables的范围,但是我不能在SUMIF上使用它。 ActiveSheet.Range("B" & row & ":D" & row)

使用dynamic名称访问Matlab工作区variables

快速的问题。 我有一个列出不同名称的Excel文件。 我将这些名称导入Matlab,执行计算,然后将数据保存为.dat文件。 例如: Apple.dat: 2, 5, 50, 2993 Orange.dat: 5003, 292, 29, 2994 Banana.dat: 3992, 3, 39, 2995 然后,我用eval读取每个单独的.dat文件,并将数据/matrix作为单个variables加载到主工作区中。 此时,我拥有WorkSpace中的所有variables以及包含此列表(ListofVariables)的单元格文件。 我的主要目标是在不知道名字的情况下访问每个variables – 因为我的Excel文档将随着时间而改变! 但是,如果我input: ListofVariables(i,1) 它只会拉起“苹果”,而不是与variables苹果相关的数据。 有没有知道他们的个人名字访问variables的数据? 感谢您的帮助!

使用variables来selectvba中的Excel表格

我有以下Excel VBA代码。 我已经从另一个Excel文档中复制了一些数据。 我需要将这些date粘贴到第二个包含每周Excel表单的文档中。 Excel工作表被称为“第01周”,“第02周”,“…”,“第52周”。 现在我需要select具有正确编号的工作表,将复制的数据粘贴到那里。 Sub Macro1() Dim number As String Dim year As String number = Application.InputBox(Prompt:="insert week number (01-52))", Type:=2) year = Application.InputBox(Prompt:="insert year (YYYY)", Type:=2) Workbooks.Open Filename:= _ "F:\documents\" & year & "\example " & number & ".xlsm" Sheets("Week" number).Select Range("M4").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End Sub 我知道下面的代码是不正确的。 […]

Excel连接多个单元格,其中一个是相同的其他更改

我有一个Excel文件。 B1具有文本值ME 。 B2有一个数字值01 。 从C1到C100的值是shot001到shot100 。 我想在G1中连接一个公式: B1+B2+C1然后在G2我需要B1+B2+C2然后在G3我需要B1+B2+C3 。 我在G1 = CONCATENATE(B1,B2,"_",C1)做了一个公式。 如果我沿G列拖动公式,则B1和B2的值在B3和B4变化,然后在B5和B6 。 我的问题是我不知道如何强制公式在每个公式B1和B2中都使用ALWAYS。

VBA SUMvariables范围

如果满足某些条件,我想要一个代码将variables行加起来。 例如,如果A12是数字并且B12是空的,则在单元格C12中插入一个公式来求和C3:C11。 然后在C22和C30执行相同的操作。 我有的问题是不知道如何定义起始行。 Sub Test() Dim y As Variant Dim r As Variant Dim StartRow As Variant LastRow = Range("C" & Rows.Count).End(xlUp).Row For y = 3 To 500 For r = 1 To LastRow If InStr(1, Cells(r, 1), "Amount") Then StartRow = r If IsNumeric(Cells(y, 1)) And IsEmpty(Cells(y, 2)) Then Cells(y, 3).Formula = "=SUM(C" […]

意外重新定义的VBAvariables – Dim Copy

我不小心声明了一个variables,它是: Dim copy 我很快意识到会导致我的代码问题。 对于当我试图将工作簿中的单元格复制到工作簿时,.CurrentRegion.Copy函数将不再起作用,并且每次键入代码行时,“复制”将被写为 ActiveWorkbook.Worksheets(1).Range("A1").CurrentRegion.copy 代替 ActiveWorkbook.Worksheets(1).Range("A1").CurrentRegion.Copy 'note the variation in caps 所以,就这样说,我删除了我的声明variables,再次尝试,但仍然以相同的结果结束。 我转移到同一个项目中的不同模块,同样的事情继续发生。 即使直到我试图在一个单独的Excel文件上重新input我的整个代码,“复制”function仍然不起作用,即使在我的商业实例化之前的情况下,它仍然工作得非常好。 如果任何人有关于如何解决这个问题的想法,你的回应将是最有帮助的。 谢谢。

R的Excel虚拟variables

我希望这个问题不是题外话。 我知道如何在R中编写一个虚拟variables,但是,我想知道是否可以在Excel中创build它。 比方说,我有一个颜色variables下的3种颜色(红色,蓝色,黄色)列表。 R会把这个作为一个3级的因素导入。 现在,如果我想在Excel中做到这一点,我可以做出3个新的预测variables(而不是颜色,他们现在变成红色,蓝色和黄色),如果它是红色的,红色的列中放置1,否则为0,等等? 或者R会继续把这个解释为3个单独的因素,每个都有2个等级?

调用一个包含多个下划线的variables名

目前我正在开发一个子版本,如果一个单元格的值匹配工作表的名称,那么将会激活其中一个已经写入的子文件。 所以如果我在一个有数据validation的单元格中select了“索引”,子将会激活子索引名称“索引”,它将创build表格“索引”的pdf文件。 创buildPDF文件的子“索引”起作用。 如果在子名称中没有下划线,则激活子“索引”的子程序也起作用。 但是我确实希望它可以使用下划线,因为有些表的名字中有空格。 例如; 表“材料检查”与“Material_检查”或“Material_test_report”表单中的“材料检查报告”组合在一起。 代码只有在重置子名称后才有效。 码: Sub CreateSomePDF() Dim iMyValue As String iMyValue = Worksheets("Invulformulier").Range("A96").Value Application.Run iMyValue End Sub 是否有可能使其工作? 我几乎可以肯定的是,由于单名的工作,下划线是问题。