Tag: 取消select

select命令在VBA中变为小写

当我的同事写入一个带有Selection引用的macros时,出于某种原因它将Selection的字改为小写字母s并停止它的工作。 例: Selection.Copy 改变 selection.Copy 有人可以build议发生什么事吗? 我猜猜他的设置在某个地方,因为他以前没有写过任何macros。

创build一个表格,显示另一张表格中的选定行

我有一个Excel工作簿的工作表,看起来像这样: Apple | 15 | Bob Banana | 20 | Tim Apple | 19 | Mary Banana | 25 | Kate 我想创build另一个工作表,只显示第一列中具有“Apple”的第一列的行: Apple | 15 | Bob Apple | 19 | Mary 从某种意义上讲,这类似于SQL SELECT查询,我们在第一个表(表)中select具有给定值的所有条目。 问题是我不想不断维护第二张纸。 如果我改变第一张纸 – 例如,把第一行中的“苹果”改为“葡萄” – 我希望第二张纸自动更新,以便只显示“苹果”行 – 在这个例子中,只有“玛丽”现在将显示行。 这似乎是一个常用的function。 有没有可能做到这一点,而不使用Visual Basic脚本?

在VBA复制粘贴过程中导致运行时错误1004的“Application.Calculation = xlCalculationManual”语句

我有VBA代码复制第一行,并将值粘贴到多行。 下面的代码运行良好,并按预期粘贴行: Sub Macro1() Dim i As Long Application.Calculation = xlCalculationManual Range("A1:M1").Select Selection.Copy For i = 1 To 50 Range("A" & i).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Next i End Sub 但是,如果我将Application.Calculation = xlCalculationManual下移两行,则代码将引发1004运行时错误: Sub Macro1() Dim i As Long Range("A1:M1").Select Selection.Copy Application.Calculation = xlCalculationManual For i = 1 To 50 Range("A" & […]

如果按下命令button时单击checkbox,则删除单元格的内容

我正在构build订单configuration电子表格。 各种产品类别有不兼容的选项,所以我在列A中创build了一些checkbox。我想做一个控制button,从列H:L的每一行中select一个checkbox并删除它,然后取消selectcheckbox。 我真的不知道如何编写这样的代码。 你的帮助真的很感激。 Sub EliminateCheckBoxes() Dim CB As CheckBox, n As Long, x As Long n = ActiveSheet.CheckBoxes.Count For x = n To 1 Step -1 Set CB = ActiveSheet.CheckBoxes(x) If CB.Name <> "Check Box 1" Then Next x End Sub

IF ELSE与Select Case

我想知道在处理大量数据时这将如何影响我的编码,以及如何构build我的逻辑参数 两个问题: 1)IF-ELSE和Select CASE的主要区别是什么? select案例是否同时评估所有案件? 如果我有一种情况,就其性质而言,需要同时满足两个或两个以上的情况,例如, int = 5 Select case int Case >0 Case 5 Case <0 在哪里我需要“触发”案件“1”和“2”的行动,我是否使用IFE ELSE? 2)现在对于另一种情况,如果我有一个variables会触发更多的一个案例,但我想只限于一个案件的优先权,说我只会喜欢案件“1”的行动,排除其余的,是我有权说IF-ELSE会在这方面取得胜利吗? 编辑 – 我意识到我的问题措辞不佳。 我对代码做了一些编辑

如何查找具有特定字符的文件名

我有几百个文本文件,名称如下: D14 J4N4-BAPN_633nm_20x_100%_30accu_10s_point 1和D14 J4N5-NOBAPN_633nm_20x_100%_30accu_10s_point 3如下图所示: 我想select名称中包含BAPN作为一个组和NOBAPN作为另一个组的文件。 但BAPN和NOBAPN包含与BAPN相同的字符。 我怎样才能做到这一点?

使用VBAmacros从Excel工作簿中取消select所有checkbox

我有一个超过100个checkbox的工作簿。 他们是表格控制checkbox 我想一下子取消所有的select 这是他们设置为false。 Sub clearcheck() ActiveSheet.CheckBoxes.Value = False End Sub 这适用于活动工作表。 我想这个代码是整个工作簿 我已经尝试寻找代码,并搞清楚checkbox,但我都不明智。 如果有人能指导我,我将不胜感激 谢谢