Tag: search

从ubound数组范围开始: 为了在一列中search（B列），我使用这个代码 Private Sub TextBox1_Change() txt = TextBox1.Text lt = Len(TextBox1.Text) If lt = 0 Then Exit Sub x = Range("b1", Cells(Rows.Count, 1).End(xlUp)).Value For i = 1 To UBound(x, 1) If InStr(x(i, 2), txt) Then s = s & "~" & x(i, 1) & " >>>>" & x(i, 2) Else End If Next i ListBox1.List = […]

在第一次出现之后，在工作簿中searchstring“datatoFind”: 我只是昨天发布了一个不同的问题，这个问题简单地解决了（谢谢！）。我试图使用macros来search某个string的Excel文档。我想要获取string的单元格的地址，并把它们一个接一个地放在当前工作表的第i列中。我的问题是macros只识别string的第一次出现，并不识别其他实例，即使我知道它们存在。我的代码如下。 Option Explicit Sub Find_Data() Dim datatoFind As String Dim rangeSearch As Range Dim rangeLast As Range Dim foundRange As Range Dim strFirstAddress As String Dim sheetCount As Integer Dim sheetCounter As Integer Dim currentSheet As Integer Dim foundmatrixCounter As Integer foundmatrixCounter = 2 'initialize this to the second row so […]

在VBA中search和查找: 我需要帮助写一个macros在Excel中使用。基本上我正在使用的是大量的财务数据，几乎总是独一无二的。我需要能够比较每个单元格在一列（ B ）到另一个整列（ H ）来search匹配的值。 find匹配的值后，我需要macros将与原始find的值相关的值打印到search值旁边的单元格中。（ G栏的标题是指单元格H的值）基本上我需要能够比较列B的每个单元格的单个值到整个列H ，并且如果并且当匹配时，列G的值出现在列B原始单元格旁边的列B 。对不起，可怕的解释。在列HsearchB2值匹配。如果H30 = B30 ，则在A2打印G30 。

包含string的EXCEL SUM单元格: 我想在Excel中编写一个公式，它将在列中运行，并search该列中的每个单元格，以查看是否存在string（可能位于另一个string的中间）。如果findstring，则移到另一列，并将该单元格中的值添加到正在运行的总数中。任何大师愿意帮忙吗？太感谢了！

从列表中search一个单元格以获得多个标准值，并从列表中返回相应的值: 这个例子应该清楚地解释我的问题我有一个巨大的表格（50,000+行）在这种格式 PHRASE 1 | PHRASE 2 | VALUE Sun | Blue | North Moon | Green | South Star | Red | West 我有一个格式的短语列表（再次50,000+行） AB 1| Moon Fun Light Green | 2| Star Amazing Ball Red | 3| Sun Cat Inside Blue | 4| Star Dog Red Watch | 我需要沿着以下几行search – searchA1，如果您发现一个行PHRASE 1和PHRASE 2都存在的行返回相应的VALUE […]

search后从下一列的单元格input数据: 我无法find我需要的解决scheme，所以我正在寻求帮助。我有3列数据，我需要sorting通过我的项目。列A包含我的search词，列B是我的数据库，列C是另一组数据，列D是我的输出。所以一个例子是这样的：单元格A1包含apple 。我想通过列Bsearch短语apple 。假设在单元格B50find它，那么我想将C50的值输出到D1 。目前我有这个： =if("A1"=B:B,1,0) 但是我不知道如何将C50输出到D1因为find了这个短语。只是要清楚，没有价值的重复任何地方。谢谢。

VBA Excel单词search和复制公式: 我正在寻找Excel的VBAmacros，它可以在列A中检测单词“mean”。之后它将复制带有C到J公式的黄色行。公式计算在最后“意味着”到下一个=平均（C1323：C1437）每六分之一之后还有需要区域和150个复制两行之后的意思，I和J需要更改。因此，在这种情况下，I和J将引用单元格A1441（= G1439 / C1439 * $ A $ 1441）直到文件结尾。我不太确定这是否容易，但我完全被挑战。我会非常感激的帮助。 Sub Makro1() ' ' Makro1 Makro ' ' Tastenkombination: Strg+q strSearchWord = "Mean" i = Application.WorksheetFunction.CountIf(Range("A:A"), strSearchWord) Y = 2 For x = i To 0 i = Application.WorksheetFunction.Match(strSuchWort, Range("A:A"), 0) Range("C" & i).Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=AVERAGE(R[-147]C:R[-1]C)" ' that's […]

按顺序查找事件 – VBA: 我正在使用从本网站获得的代码，查找所有使用VBA的实例。一切工作正常，但由于某种原因，它开始第二次出现循环到文件的结尾，然后获得第一个。例如： – 样本数据： Origin XY S 45 65 W 78 7 S 45 5 D 6 3 B 75 68 S 19 87 T 23 98 S 33 94 Q 21 105 S 17 117 T 12 128 当我试图find所有出现在字母“S”的起源，然后我通过Debug.Print (rng.Address)检索地址，它会提供$A$4,$A$7,$A$9,$A$11,$A$2 。为什么最后显示$ A $ 2？这发生在我所有不同的excel文件中。这里是代码： Sub FindAll() 'PURPOSE: Find […]

代码以突出显示Excel中特定列中的特定单词: 我正在寻找在特定列中search特定关键字并将其突出显示为黄色的Excel代码。并能够做到这一点的多个列，每个与它自己的不同的关键字。例： search关键字“河”的列A search关键字“ocean”的B列 search关键字“海”的C列每次只有特定列中突出显示唯一关键字，即使它也可能出现在其他列中。该代码将包含从“列A”到“列CV”的100列，并允许为每列插入唯一关键字。这可能吗？通过search论坛，我发现在Excel中突出显示特定单词的代码，但是没有一个将search范围缩小到一列，并从其他列中排除该关键字。这个代码，find一个字，并把它的颜色变成红色，有一个类似的核心思想： Sub colorText() Dim cl As Range Dim startPos As Integer Dim totalLen As Integer Dim searchText As String Dim endPos As Integer Dim testPos As Integer ' specify text to search. searchText = "river" ' loop trough all cells in selection/range For Each cl […]

Excel – 在一列中search值，但将值复制到结果的左边: 我已经尝试了（我熟悉的）excel函数，并没有find办法做到这一点。我想在Y列中search“Foo”，无论我在哪里得到结果，我都想将内容复制到包含“Foo”的每个单元格的左边（X列）。这是我必须通过CSV转换？即下面，我想只复制ab＆sa到一个新的价差，同时保持它们作为单独的单元格（顺序并不重要） XY ab Foo bd Bar se Bar sa Foo ge Bar