Tag: visual studio macros

countif在macros中给出0个结果: 我正在尝试在名为First Name的B列中使用不同名称的countif，但结果返回0。这是我的代码： Public Sub counting（）Dim lastcell As String Range("B2").Select Selection.End(xlDown).Select lastcell = ActiveCell.Address ActiveCell.Offset(1, 0).Select ActiveCell.Value = "=countif(B2:" + lastcell + ", John)" End Sub 如果我检查在活动单元格中写入的公式，它是： = COUNTIF（B2：$ B $ 16，约翰）请帮忙。我试图改变线路 ActiveCell.Value =“= countif（B2：”+ lastcell +“，John）” 至 ActiveCell.Value =“= countif（B2：”+ lastcell +“，”John“）”仍然不工作。

在IE.navigate里面访问excel的VBAvariables: 我需要在Excel VBA中的IE.navigate调用中传递一个variables。例如，我的示例应用程序将是这样的。 Enter the first name: "SACHIN" Enter the last name: "TENDULKAR" 我在我的Excel VBA中存储variables的FN和LN的值。我需要导航到谷歌search结果的第一页。我能够成功导航到第一页，如果我硬编码值。如果我给下面的东西， ie.Navigate "http://www.google.com/search?hl=en&q=sachin+tendulkar+wiki&meta=" 而不是硬编码，我需要从下面的应用程序给我的价值。 ie.Navigate "http://www.google.com/search?hl=en&q=&FirstName+&LastName+wiki&meta=" 但是，上面的方法是没有把excel的VBA值传入我的ie.Navigate调用。有人可以帮我在这里吗？请让我知道，如果你需要更多的信息。感谢和问候，Ramesh

Excelmacros从列A中获取随机数据: 我有列A中的数据列表，同样也有重复的数据。我必须创build一个macros才能获得10％的数据。我尝试了兰德（）和其他几个function，但没有成功。请任何帮助。 A栏砖约翰砖马特砖特德目标约翰进球马特目标泰德目标泰德老虎泰德老虎约翰老虎马特老虎马特代码泰德代码马特代码马特代码泰德代码约翰现在从上面的列表中，我必须得到10％的随机样本，如果我得到重复，但我必须从所有的砖块，老虎，代码和目标得到。请帮忙

Excelmacros修剪单元格值: 我必须通过macros来修整单元格的值。我有一个单元格，我得到像“20170411 675432”的值。在这里你可以看到1到6之间有一个空格。我想删除这个空间，这样我就可以得到字段值为“20170411675432”谢谢

如何使用macros打开和保存notepad.exe: 我是编程新手，所以我来这里寻求帮助。我需要从Excel中复制文本字段并将其粘贴到记事本中，然后将具有特定名称的记事本保存到特定位置。这些事情应该在macros的帮助下完成。任何帮助将不胜感激我能够从Excel复制文本并粘贴在记事本中，不知道如何将其保存在新的位置 sub Macro2() Range("A5").Select Selection.Copy Shell "notepad.exe", vbMaximizedFocus SendKeys "^V" End Sub

如何禁用/重新启用Excel中的macros？: 我一直在使用Excel中的一个macros来放大任何工作表中的图表。问题是，如果我想编辑一个图表，我必须点击它，触发缩放。出于这个特殊的原因，我需要禁用macros，并想知道是否有一个容易到达button或键盘快捷键来切换它。

为每个循环在excelmacrosvba跳跃交替行: 我在vba下面的代码。 sheet5中列a5至a20中的行是： A5 =瑞典 A6 =西class牙 A7 =俄罗斯 A8 =意大利 A9 =德国 A10 =芬兰 A11 =挪威 A12 =瑞士 A13 =法国 A14 =比利时 Set fillcolumnrange = Sheet5.Range("A5:A20") i = 1 For Each Row In fillcolumnrange.Rows If Not Sheet5.Range("A" & i + 4) = "" Then MsgBox Row(i) End If i = i + 1 Next Row […]

C＃的外部Excel库运行macros: 你知道任何外部MS Excel库的C＃（它应该没有安装在计算机上的MS Office工作）有可能运行macros？可以使用“Microsoft.Office.Interop.Excel”运行它，但为此您需要MS Office。 scheme：我有MS Excel文件模板与macros。以编程方式将部分数据添加到该模板，运行写入excel模板的macros，并添加另一部分数据。提前致谢！

如何select从第一个非黑色到最后一个非空白单元格（VBA）的单元格区域？: 我试图从excel工作簿中导出表格到pipe道分隔的txt文件，这些文件的命名方式与相应的工作表相同。问题是我无法让我的macros遍历工作簿中的不同工作表来将所有非空白单元格导出到txt文件。以下是我的代码： Sub TableExtract() Dim myFile As String, WS_Count As Integer, x As Integer, rng As Range, cellValue As Variant, i As Integer, j As Integer WS_Count = ActiveWorkbook.Worksheets.Count For x = 1 To WS_Count myFile = "C:\Users\mohamednuri.beitelma\Desktop\" & ActiveSheet.Name & ".txt" Set rng = Sheets(x).Range("A1").CurrentRegion Open myFile For Output As #1 For i […]

对象_global的方法“范围”在什么都不做时失败: 我有一个macros基本上处理一些列和基于一些访问2003年数据库的交叉检查吐出的结果。它工作绝对好 – 没有任何结果。不过，我最近不得不对它进行修改。代码的一行字面意义上将“8”改为“9”。但是我下次运行它时，抛出了1004: Method 'Range' of object '_Global' failed错误的1004: Method 'Range' of object '_Global' failed 。 Excel 2003是一件很有趣的事情 – 我曾经为此纠缠过几个小时，试图find可能导致错误的有害代码行，但唉，没有用。我做了一些我不希望触发的事情：从原始的macros开始（100％确认工作），如果我只是打开代码，然后保存，所以'最后更新'元数据将更新以反映保存，虽然没有任何改变，它会再次抛出错误在开幕式上。就好像它太脆弱了，保存macros观将会破坏它。有任何想法吗？更新：这是我最初造成这个问题的变化 iOutputCols = 9 'this was changed to 9 from 8 ReDim Preserve sOutputCols(iOutputCols) sOutputCols(0) = "Policy No" sOutputCols(1) = "Client" sOutputCols(2) = "Trans" sOutputCols(3) = "Effective […]