Excel VBA：分配键盘快捷键以运行程序
当我在VBA编辑器中按F5时，我总是希望运行我的“Sub Skynet（）”过程。有没有办法为此过程分配键盘快捷方式。 解决方案 要将键盘键分配到工作表上的按钮，您可以使用此代码，只需将此代码复制到包含按钮的工作表。 这里返回指定键， get_detail 是程序名称。 Private Sub Worksheet_SelectionChange（ByVal Target As
..
Office
Excel：使用数组公式搜索特定字符串中的字符串列表？
我想搜索单元格以查找单词列表。 我以为这可以作为数组公式工作： {= FIND（，）} 但它只找到一个匹配我正在搜索的单元格中的单词位于我正在搜索的单词列表的第一行中。有没有办法编写整个列表中的公式？而且，如果它不只是返回TRUE / FALSE，我更愿意。我知道如何搜索单元格的单词列表，并根据单元格中是否存在一个单词，返回
..
使用Excel 2010中的VBA代码调用Web服务
我正在Excel 2010中编写一些将使用Web服务的VBA代码。我无法在互联网上找到相关资源。有人可以告诉我如何做到这一点。 解决方案 我不认为标题为答案的帖子是对的 - 指向基于MS Office Web Services Toolkit的Excel 2003解决方案的链接。该解决方案不再有效，因为工具包不再受支持。请参阅： MSDN - 在Excel 2007中使用Web服务。该链接
..
使用VBA查找Excel表单中的非空白列数
如何使用VBA查找Excel表格中使用的列数？ Dim lastRow As Long lastRow = Sheet1.Range（“A”& Rows.Count）.End（xlUp）.Row MsgBox lastRow 使用上述VBA，我可以找到行数。但是如何找到我给定的excel文件中的列数？ 解决方案 您的示例代码获取当前列中最后一个非空白单元
..
将日期字段转换为Excel中的文本
我有一个Excel文件，格式为日期格式为 dd-mm-YYYY 。 我需要将该字段转换为文本。如果我更改字段类型excel将其转换为一个奇怪的值（如 40603 ）。 我尝试了文本功能，但它给我错误508。 任何帮助？ 解决方案 您不需要转换原始条目 - 您可以在连接公式中使用TEXT功能，例如在A1中的日期使用这样的公式 =“今天是”& TEXT（A1，“dd-m
..
将Excel电子表格数据导入到包含VBA的另一个Excel电子表格中
我们需要编写一个带有VBA代码的Excel电子表格;代码读取并对第一个工作表中的数据执行操作。 用户将收到包含数据但不包含VBA代码的电子表格。我们需要能够将数据从包含数据的电子表格导入包含VBA代码的电子表格。包含数据的工作表与包含数据的电子表格的工作表具有相同的列格式和数据类型。 理想情况下，您将打开包含VBA代码的电子表格，提供了一个UI，允许用户导航到包含数据的电子表格，单击确
..
如何将参数传递给SQL（Excel）中的查询
我将“Excel”链接到Sql，它工作正常 - 我写了一些SQL脚本，它的工作很棒。我想做的就是将参数传递给查询。像每次刷新一样，我希望能够将参数（过滤条件）传递给Sql Query。 在“连接属性”参数按钮被禁用。所以我无法进行参数查询。 任何人可以帮助我吗？ 解决方案 这取决于您尝试连接的数据库，该方法您创建的连接以及您正在使用的Excel版本。 （也可能是您的计算机上相关ODBC
..
将大xlsx文件导入R？
我想知道有没有人知道从“大”xlsx文件（〜20Mb）导入数据的方式。我试图使用xlsx和XLConnect库。不幸的是，两者都使用rJava和我总是获得相同的错误： >图书馆（XLConnect） > wb图书馆（xls
..
源代码管理Excel VBA代码模块
我想能够控制我的Excel电子表格的VBA模块（目前使用Excel 2003 SP3），以便我可以共享和管理一堆不同的电子表格使用的代码 - 因此我想重新在打开电子表格时，从文件中加载它们。 我有一个名为Loader.bas的模块，我用来做大部分的驴工作（加载和卸载所需的任何其他模块） - 我想在电子表格打开后立即从文件加载。 我有将以下代码附加到Workbook_Open事件（在Th
..
基准VBA代码
什么被认为是最准确的基准VBA代码的方法（在我的情况下，我在Excel中测试代码）？有没有其他的技术，除了下面的2以外的基准代码，如果是，该方法的利弊是什么？ 这里有两种流行的方法。 p> 首先：计时器 Sub TimerBenchmark（） Dim benchmark As Double benchmark = Timer '你的代码在这里 MsgBo
..
Excel参考当前单元格
如何获取当前单元格的引用？ 例如，如果要显示列A的宽度，我可以使用以下内容： / p> = CELL（“width”，A2） 但是，我想要的公式是这样的： = CELL “width”，THIS_CELL） 解决方案 创建一个名为THIS_CELL 在当前工作表中选择单元格A1（这很重要！） 打开姓名经理（Ctl + F3
..
Excel日期到字符串转换
01/01/2010 14:30:00 我想将该日期转换为文本，并希望文本看起来像日期。所以日期值 01/01/2010 14:30:00 应该看起来像 01/01/2010 14:30:00 但在内部应该是Text。 如何在Excel中执行？ 解决方案 = TEXT（A1，“DD / MM / YYYY hh：mm：ss”） （24小时）
..
代码高尔夫：数值相当于Excel列名
挑战 按字符数计算的最短代码将输出Excel列字符串的数值。 例如， A 列为1， B 为2，依此类推。一旦您点击 Z ，下一列将变为 AA ，然后 AB 等等。 测试用例： A： 1 B：2 AD：30 ABC：731 WTF：16074 ROFL：326676 代码计数包括输入/输出（即完整程序）。 解决方案 h2> P
..
从excel工作表生成sql插入脚本
我可以从这个excel工作表中生成一个SQL插入脚本吗？ 解决方案 我认为使用所提到的方法之一导入是非常理想的，如果它真的是一个大文件，但可以使用Excel创建插入语句： / p> =“INSERT INTO table_name VALUES（'”& A1&“'，'”& &“'）” 在MS SQL中，您可以使用： SET NOCOUNT ON
..
在Excel中循环遍历范围的每一行
这是我确信有一个内置函数之一（而且我以前可能已经被告知了），但是我正在抓住我的头脑记住它。 如何使用Excel VBA循环遍历多列范围的每一行？我一直在搜索的所有教程似乎只提到通过一维范围工作... 解决方案 Dim a As Range，b As Range 设置a =选择 每个b在a.Rows MsgBox b.Address 下一个
..
检查一个单元格是否包含一个子字符串
是否有内置函数来检查单元格是否包含给定的字符/子字符串？ 这意味着您可以应用文本功能，如 Left / Right / 中间在条件基础上，当不存在定界符时不会发生错误。 解决方案 尝试使用这个： = ISNUMBER（SEARCH（“Some Text”，A3）） 如果单元格 TRUE > A3 包含一些文本。
..
生成独特的2列随机数的5000条记录
例如： AB ---------------- 1 98 1 23 37 98 6 56 93 18 。 。 。 。 。 。 谢谢 解决方案 这是一个使用公式的简单的方法。 首先在“公式”选项卡中将计算选项设置为“手动”。 = RANDBETWEEN（1,100） B将成为一个帮助列
..
如何将单个单元格分割成多行并添加另一行
我有一个表有两列。日期和测试名称。 我想要发生的是一个单元格中的文本字符串被分成多行。此外，我需要与每组文本相关联的日期。我已经尝试文本列，然后转置，但它只能一次处理1组字符串，而不是整个数据集。 解决方案 循环通过列A然后循环通过它旁边的字符串。 结果将在列D Sub ChickatAH（） Dim rng As Range，Lstrw As Long，c As Rang
..
访问VBA中用户定义函数时的#Value错误
当我从VBA访问函数时，代码工作正常，但是当我在excel单元格中调用相同的函数（ postalcode（“23.0776120,72.6538530”）时，我得到#Value错误。我的代码是： 功能PostalCode（latlng As String）As String Dim xmlDoc As MSXML2 .DOMDocument60 Dim xEmpDetails A
..
在宏/ VBA中使用3个条件的条件格式
我想在Excel中编写一个宏，如果满足以下条件，则会将整行显示为绿色： 紧急类型（列B）=“”“” 在窗口（列N）=“准时” 状态（列O）=“成功” 范围是动态的，但为了这个例子的目的，它是 A2：P236 。 br> 我希望有任何帮助。谢谢。 解决方案 以编程方式尝试这样： Sub ApplyConditionalFormatting（） Dim
..