查找"Cells.Find“函数的单元格引用
"Cells.Find"函数是Microsoft Excel中的一个函数，用于在工作表中查找指定的值，并返回该值所在的单元格引用。
该函数的语法如下： Cells.Find(What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, MatchByte)
参数说明：
- What: 要查找的值。
- After: 在哪个单元格之后开始查找。可以是一个单元格引用或一个范围。
- LookIn: 指定要在哪里查找。可以是xlValues（查找单元格的值）或xlFormulas（查找单元格的公式）。
- LookAt: 指定查找时是精确匹配还是部分匹配。可以是xlWhole（精确匹配）或xlPart（部分匹配）。
- SearchOrder: 指定查找顺序。可以是xlByRows（按行）或xlByColumns（按列）。
- SearchDirection: 指定查找方向。可以是xlNext（向下或向右）或xlPrevious（向上或向左）。
- MatchCase: 指定是否区分大小写。可以是True（区分大小写）或False（不区分大小写）。
- MatchByte: 指定是否区分全角和半角字符。可以是True（区分）或False（不区分）。
该函数返回一个Range对象，表示找到的单元格。可以使用该对象的Address属性获取单元格的引用。
在云计算领域，"Cells.Find"函数通常用于Excel文件的处理和数据分析。例如，在数据表中查找特定的值或条件，然后进行进一步的计算或操作。
腾讯云提供了云服务器CVM和云数据库MySQL等产品，可以用于存储和处理Excel文件，以及进行数据分析和计算。您可以通过以下链接了解更多相关产品信息：
相关·内容
如果你们能帮我，那就太好了，因为这真的会帮到我。
我想做的是：
搜索具有特定术语的单元格
如果找到，请复制单元格所在的整个行，并将其粘贴到其上方的一行中。
如果找不到，什么也不做，继续执行代码。
这是我的密码：
Sub Test()
'
' Test Macro
'
' Keyboard Shortcut: Ctrl+b
'
Range("A5").Select
Cells.Find(What:="PL 1", After:=ActiveCell, LookIn:=xlFormulas
浏览 3提问于2016-05-31得票数 1
回答已采纳
1回答
在工作表A中创建一个将接受cell.value (字符串)的宏，然后转到工作表B，使用cells.find方法找到与该字符串匹配的单元格。
示例
SheetA.activecell.value = "Harry Potter"
set myvar = SheetA.activecell.value
sheetB.select
Cells.Find(What:=myvar, After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlN
浏览 3提问于2013-07-30得票数 0
1回答
我使用Find函数来查找"apple“单元格，当"apple”单元格不与其他单元格合并时，它工作得很好。
Cells.Find("apple")
我的问题是，当“苹果”单元被合并时，我找不到它。我试着遵循if语句，但它保留返回“未找到”。任何回答都是感激的。
Set obj = Cells.Find("apple")
If obj Is Nothing Then
Debug.Print "Not found"
End If
更新于2014/02/17 15:30 2014
我发现了问题，我想可能是虫子。如果合并的单元格包
浏览 3提问于2014-02-17得票数 1
回答已采纳
3回答
我有这样的代码：
localise = Cells.Find("Hello" , lookIn:=xlValues).Address
MsgBox localise
msgbox给了我$A$10，但是我想要在这个之前的单元格，我如何在VBA上编程呢？
浏览 6提问于2016-07-21得票数 1
回答已采纳
这是我的第一个S.O.问题，所以如果我过分使用文字墙/缺少相关的信息‘，很抱歉。
我认为宏碁是由市场和销售代表为P&L的前雇员建立的，他们从其他软件包中提取数据，这些包的格式因使用中的版本不同而有所不同。还有一个法语市场。所有的东西都只适用于英语(勉强)，但现在他们想要法语市场。
我正在从多个外部文件中的单元格中提取一个值，除了它附带的标签文本之外，这些文件是不固定的。使用Cells.Find，我正在搜索一个英语短语，并激活相邻的单元格将该值复制到主Excel中。这个很管用。
现在，他们希望在这个过程中包含法语版本，而我试图对英语和法语短语进行并行搜索，找出其中一个或另一个，但我在尝试
浏览 1提问于2019-10-08得票数 0
3回答
我的老板有一个很小的excel文件，它模仿了我们用来记录工作中随机事件的桌面日历，比如小时数和发送报告的数量。它的布局是7x5的网格(大概是5，最后一行只有几个单元格，因为月份通常不能被7整除)。
日期和这样的工作是第一个单元格，A1，有一个月的第一个日期。每一个随后的单元格都是我的老板手工编码的，取它前面的块中的日期单元格的值并加1。但是，这些单元格不是并排的，它们是分开的。我试图让它对每周的总小时数(和报告)求和，但当我尝试调用Cells.Find方法时，它没有返回任何结果。
我想可能是因为这些单元格是以美国的mm/dd/yy格式设置的，所以我尝试搜索05/12/14，但没有找到结果。因此
浏览 12提问于2014-05-28得票数 1
回答已采纳
我试图在工作表“此工作表”上找到一个带有公式"CAL跳转强度“的单元格。下面的代码可以工作。
worksheets("this worksheet").activate
Set target = Cells.Find(What:="CAL JUMP INTENS", After:=ActiveCell, _ LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=True, SearchFormat:=False
浏览 1提问于2015-06-19得票数 2
回答已采纳
1回答
这个宏是基于我录制的一个宏，但已经进行了调整，以应对可能缺少的4个排序标准中的3个。当范围条件是特定的时，我不知道为什么我的宏可以工作，但当我引用单个单元格并进行外推时就不能了。
使用这一行，排序工作是.SetRange Range("A1:W162")
在这一行中，它不能排序。.SetRange Range("A1").End(xlDown).End(xlToRight)我已经检查过了，可以确认是否选择了正确的范围
我不想对特定的单元格使用行，因为将来的导出将是不同大小的。
这是完整的子例程(相关的位在底部附近)。
谢谢!
Sub SortByScoreAnd
浏览 0提问于2017-12-09得票数 0
FindOptions opt = new FindOptions();
opt.setRegexKey(true);
opt.setLookAtType(LookAtType.ENTIRE_CONTENT);
Cells cells = workbook.getWorksheets().get(1).getCells();
String regex = "<.*>";
System.out.println(ce
浏览 3提问于2017-03-08得票数 0
基本上，我是比较前几年的销售数字，并想要一个宏时，当一个新的月份的数据是添加将比较这与去年的同一个月。
我已经设置了一个宏来查找包含数据的最后一个单元格，以提取本年度的最近几个月的数据。但是，有没有办法让它在不同的工作表上选择相同的单元格？我不能使用相同的系统来查找数据的最后一行，因为在前几年，所有数据都是完整的。
我希望这是有意义的！谢谢!
浏览 0提问于2014-04-20得票数 0
1回答
我需要输出包含特定单词或短语的单元格的行号和列号。
它可以位于工作表上的任何单元格(任何行、任何列)中。
若要输出行，请执行以下操作：
=ROW(INDEX(INDIRECT("'"&$AA$2&"'!"&"A:ZZ"),MATCH("MY WORD",INDIRECT("'"&$AA$2&"'!"&"A:ZZ"),0)))
在第一栏中：
=COLUMN(INDEX(INDIRECT("'
浏览 0提问于2017-05-08得票数 1
回答已采纳
我有一个excel文件，其中包含文本"Income from Trans“，其中我需要删除整个列。
这是我在VBA2010中的当前代码，它会一直工作，直到不再有"Income from Trans“的单元格为止；我不能让它跳出循环。
知道为什么吗？
Dim rng1 As Range
Dim target1 As String
target1 = "Income From Trans"
Set rng1 = Cells.Find(What:=target1, _
After:=ActiveCell, _
LookIn:=xlFormulas, _
Loo
浏览 3提问于2018-04-26得票数 0
我正在尝试解决一个到目前为止还没有使用Excel VBA的问题。我在一个工作簿中有几个工作表，其中只有两个令人感兴趣-让我们称它们为WS1和WS2。两者都包含一个表格，每个表格都填充了文本和数字。现在我想做的就是从WS1中获取一次单元格，并在WS2中找到具有相同内容的单元格所在的行，如下所示(exerpt)： Dim temprow as Long
temprow = Worksheets("WS2").Cells.Find(Worksheets("WS1").Cells(1, 1)).Row 只要WS1中的单元格(1，1)中只有一个字母或数字，就可以执行此操
浏览 3提问于2021-04-08得票数 1
我希望获得excel工作表中最后一个非空单元格的单元格地址。基本上，我需要最后一个非空单元格的行和列号/名称。我几乎没有找到在最后一个非空单元格中的值，但我需要的是单元格的入口，而不是内容。
浏览 0提问于2014-11-22得票数 3
1回答
我需要比较列“主厨”的每个单元格和列"nom“的每个单元格，这样我就可以找到正确的"matt”并将其存储在“matt”中，我尝试了以下VBA代码：
Sub compare()
Dim p As Integer
Dim q As Integer
Dim Nom As String
Dim Nomchercher As String
Dim Matr As String
p = 0
q = 0
For j = 1 To 10
p = p + 1
Cells.Find("Chef&#
浏览 1提问于2015-06-09得票数 2
回答已采纳
我已经编写了一个宏，它将在Excel工作簿的所有工作表中搜索字符串。此宏将激活第一个工作表以及工作表中包含搜索字符串的单元格。如果未找到，则会显示一条消息。
我希望将此功能扩展到包含此字符串的所有工作表，而不仅仅是第一个。所以我修改了宏，但它并没有像预期的那样工作。我已经给出了下面的代码，并在它显示错误的地方进行了注释。
Dim sheetCount As Integer
Dim datatoFind
Sub Button1_Click()
Find_Data
End Sub
Private Sub Find_Data()
Dim counter As Integer
浏览 0提问于2011-01-19得票数 7
回答已采纳
我目前正在尝试编写代码，以查看第一个单元格在左边，第一个单元格位于该单元格的右侧，并返回这些单元格的列号值。我目前使用的代码是.Find方法，它只会立即将单元格返回到所讨论的单元格的右/左。从屏幕截图中，如果我在循环中的单元格G2中，我希望分别返回iFirst和iLast的第4列和第9列。我实际上是返回6和8。怎么了？这是我的代码：
Public iLastRow As Long
Public iLastColumn As Long
Sub Interpolate()
Dim iFirst As Long
Dim iLast As Long
'Find L
浏览 3提问于2015-05-07得票数 1
回答已采纳
1回答
我在VBA做作业。我记录了一个宏，它找到带有搜索标准“central”的单元格，然后把它涂成蓝绿色，得到以下宏：
Sub Color()
' Color Macro
' Color a region
'
' Keyboard Shortcut: Ctrl+m
'
Cells.Find(What:="central", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
浏览 0提问于2018-02-09得票数 0
1回答
我有以下VBA代码：
Sub test2()
Dim w1 As Worksheet
Dim w2 As Worksheet
Dim k As Long
Dim c As Range
Dim d As Range
Dim strFA As String
Set w1 = Sheets("Sheet1")
Set w2 = Sheets("Sheet2")
w2.Cells.Clear
k = 1
With w1.Range("A:A")
浏览 1提问于2015-12-04得票数 0
我有一个对象单元格，然后在画布上绘制多个单元格，这会创建网格，但后来我不得不访问每个单元格的邻居，arrayOfCells.find将如何工作(1和2. idndex返回未定义的)。
PS:我已经检查过测试它的细胞是否在中间。
let cellWidth = 25;
class Cell {
constructor(x, y) {
this.x = x * cellWidth;
this.y = y * cellWidth;
this.width = cellWidth;
this.neighbors = [
浏览 0提问于2020-12-30得票数 0
回答已采纳
1回答
我在网上找到了一种使用以下代码在图表中查找最后一行的方法
Cells.Find("*", Range("A1"), xlValues, xlWhole, , xlPrevious).Row
我如何调整它来找到粒子列中的最后一个单元格，例如G，我尝试改变范围，但是它没有产生预期的结果。
浏览 1提问于2014-08-07得票数 0
回答已采纳
1回答
我发现了许多与我试图实现的目标类似的帖子，但没有任何我能够修改和工作的帖子。我有两个电子表格，我需要一个VBA脚本，它可以找到一个具有特定名称的单元格，比如spreadsheet2中的“灯泡”，然后将相邻的值(在它下面)复制到spreadsheet1上的单元格A2中。会非常感谢任何人的帮助
浏览 0提问于2013-05-08得票数 0
1回答
好日子
我正在使用VBA Excel，我是这里的新手，我对这段代码有问题。
Sub setEVAFieldValue(pattern As String, fval As Variant)
Dim lrange As Range
Dim lrange2 As Range
Dim lrange3 As Range
Dim rowpos As Integer
Dim colpos As Integer
Set lrange = Worksheets("EVA").Cells.Find(pattern)
If (lrange.
浏览 3提问于2022-10-31得票数 2
回答已采纳
1回答
如何在vba中调用单元格才能使求解器工作？我想构建一个循环，其中行发生了变化，但我似乎没有在单元格中得到任何应该发生变化的输出(通过让"a“增长)。为什么会这样呢？
我要做的就是挑选出列中的某些值，并要求宏查找文本，然后查找它们下面的值。
Sub CalculateValues()
SolverReset
a = 1
SolverOptions Precision:=0.00001, AssumeNonNeg:=False
SolverOk SetCell:=Cells.Find("Total energy"
浏览 3提问于2013-08-21得票数 0
1回答
我想将单元格值设置为变量an，然后使用ctrl+f在电子表格中找到它，但是我得到了这样的消息:对象变量或块变量未设置。
例如，单元格A2的值为1，我希望VBA使用变量名查找1。
请参阅我的代码如下：
Sub find ()
Range("A1").Select
Dim amount As String
amount = Range("A2")
Cells.find(What:="amount", After:=ActiveCell, LookIn:=xlFormulas2, _
LookAt:=xlPart, SearchOrder:=xlB
浏览 1提问于2022-06-13得票数 0
回答已采纳
我对VBA非常陌生。目标是在Workbook1.Sheet1的单元格A3中查找数值。这是搜索字段：
我需要在Workbook2.sheet1的A列中搜索该值的匹配项，然后查找该行中具有匹配搜索值的最后一个空列，并将其选中。
我一直在搜索可能类似的cells.find公式，并帮助我完成代码，但我搜索的公式只提供了一个已经指定的值。
我正在寻找的是一个vba代码，它将搜索当您单击宏时在workbook1.sheet1的范围(“C3”)中输入的任何值，而不管workbook2.sheet1中是否存在匹配。
这是我到目前为止拥有的代码。cells.find给我一个运行时错误91，&
浏览 2提问于2018-09-17得票数 1
2回答
我试图通过两个不同的单元格的内容来定义一个范围，每个单元格都包含间接的单元格地址。我不确定这是否可能，但这里有一个例子：
$A$1Cell $C$5 Y200包含 X100值
有什么方法可以使用Range()和单元格X100和Y200到达Range("$A$1:$C$5")？
我尝试过使用Cells.Address，但我无法确定应用程序的正确格式。任何帮助都是非常感谢的！
谢谢
编辑
谢谢汤姆！我还有一个问题要问你。在我的例子中，X100单元实际上是可变的，我使用了以下公式来找到它：
Cells.Find("ID").Offset(1,0).Address
有没
浏览 2提问于2019-10-11得票数 2
回答已采纳
我需要在一个现有的宏中添加一个部分，它接受一个单元格的地址并查找该地址(作为字符串？)从工作表上其他单元格范围内的值-然后偏移一列，以使用该单元格的值替换搜索到的单元格地址的原始值。
我的代码正在寻找未合并的单元格，当它找到一个未合并的单元格时，它需要获取正确的值以放入其中。并非我的范围mCell中的所有单元格都是未合并的，因此这是一个循环中的查找/替换。
我不能对单元格进行硬编码，也找不出一个函数循环来成功地遍历我的范围，并使用工作表的另一部分的值来查找/替换。我是VBA的新手，不断收到错误，最后定义了十几个范围和字符串，试图传递数据。任何帮助都将不胜感激！
例如：
row Colu
浏览 1提问于2012-10-17得票数 1
1回答
我正在设法找到带有#na的行，这样我就可以复制该行并在另一个选项卡中通过它，这样就可以分析错误。
到目前为止，我有以下几点，但我有一些问题
Dim iCntr As Long
Dim lastColumn As Long
For iCntr = Cells(Rows.Count, "A").End(xlUp).Row To 1 Step -1
For lastColumn = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column To 1 S
浏览 1提问于2017-02-23得票数 1
回答已采纳
我有一组工作簿，需要在其中找到值为"LAB #“的单元格。在我找到“实验室#”单元之后，我需要找到第一个带有底部边框的单元格。边框单元格将始终位于同一行，并且总是位于"LAB #“单元格之后，但在不同的工作簿中可能有不同的间距。“实验室#”单元在不同的工作簿中总是处于不同的位置。
示例：
WS1:实验室#= P100，边界= S100
WS2:实验室#= AC12，边界= AG12
WS3:实验室#= M111，边界= Q111
等!
我不能改变工作簿本身使之更加统一(我希望如此！)
我已经有了要查找和引用“实验室#”单元格的代码，但是要找到正确的边界单元是很困难的。
我的想法
浏览 2提问于2022-01-12得票数 0
回答已采纳
4回答
下面是一个子复制动态数据范围，从Sheet1到Sheet2 (后者是一个受密码保护的工作表)。
除了lRowSh2和lColSh2，如果Sheet2完全是空白的话，它就会产生一个关键的错误。
我是否可以使用某种If语句，以便在单元格为空白的情况下跳过清除Sheet2的部分(注意:它们过去可能有一个值)？
为了清晰起见，第6行是两个工作表中的标题行。
Sub CopyData()
Application.ScreenUpdating = False
Dim lRowSh1 As Long, lColSh1 As Long, lRowSh2 As Long, lColSh2 As Long
Di
浏览 3提问于2014-12-04得票数 1
回答已采纳
如何将变量传递给cells.find并将单元格地址作为结果返回？
For Each cellName In activeListBoxelements
Cells.Find(What:=cellName, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Select
CellAddr = Selection.Address(False, False,
浏览 1提问于2015-07-26得票数 0
回答已采纳
1回答
我是VBA的新手，我想编写一个函数来查找存储在变量中的日期，并返回其地址。
这就是我到目前为止所得到的
Dim ran As Range
Dim dat As Date
dat = "01.05.2009 15:42:00"
Set ran = Cells.Find(What:=dat, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)
If ran Is Nothing T
浏览 5提问于2019-10-31得票数 0
回答已采纳
然后双击带有数据验证的单元格，然后尝试从下拉列表中选择，得到错误运行时错误，运行时错误'50290‘。方法“_Evaluate”的对象‘_工作表’失败
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
Case Is < 5
LastRow = 5: CountRow = 0: R
浏览 4提问于2014-06-17得票数 0
回答已采纳
这变得非常复杂，因为我引用单元格作为我的公式。范围第一、第二、第三和第四引用动态单元格位置。这是我遇到麻烦的密码。
Dim first As Range
Dim second As Range
Dim third As Range
Dim fourth As Range
Dim i As Long
Dim k As Long
For i = 0 To -170
For k = 0 To 170
Set first = ws.Rows(3 + k).Cells.Find("QQQ").Offset(0 + i, -12)
Set second = ws.Row
浏览 4提问于2016-08-15得票数 0
回答已采纳
在我的工作簿中，我经常需要通过使用它们的CodeName来激活一些工作表，然后在该工作表中搜索一些文本，使用包含我要查找的文本的单元格的行或列号。
在这种情况下，我使用的代码如下：
Sheet16.Select '(Using codename)
Cells.Find(What:="FIRST TEXT I'M LOOKING FOR", After:= _
ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirectio
浏览 3提问于2017-05-24得票数 2
回答已采纳
2回答
我对VBA很陌生，我正试图编写一个宏，它使用带有几张数据的工作簿，并对其进行格式化以供打印。每张表都有信息表(如营业/损益表)。我希望这段代码能够为任何人创建但具有相同基本信息的工作簿工作。这意味着我需要在每个工作表上找到数据的开始和结束，因为它并不总是在同一个位置(有人可能从"A1“开始，另有人从"B4”开始，等等)。
我查看了许多网站，寻找定位使用的第一行和最后一列的不同方法。到目前为止，我所得到的信息有时会正确定位起始行、结束行、起始列和结束列，而其他时候则不正确。
Sub FormatWorkbook()
Dim ws As Worksheet
Dim rowStart
浏览 4提问于2013-09-07得票数 1
回答已采纳
1回答
使用: Excel 2007/Win 7
首先，我创建了一个子例程来查找名为“WIP”的工作表的动态范围：
Sub GetWIPRange()
Dim WIPrng1 As Range
Dim WIPrng2 As Range
Sheets("WIP").Activate
Set WIPrng1 = Cells.find("*", [a1], , , xlByRows, xlPrevious)
Set WIPrng2 = Cells.find("*", [a1], , , xlByColumns, xlPrevious)
If Not WIPrn
浏览 3提问于2011-11-28得票数 1
回答已采纳
1回答
我有一个带有代码的工作表，它从一列中提取一些值并进行小计。这些单元格是不一样的，所以我使用.Find来定位它们。一旦它们被选中，目的就是对它们求和，并将结果放在其他单元格列中，该列指定为具有这些小计。我已经使用累加器制作了宏，问题是我找不到一种方法来避免这些小计的总和。有人能帮帮忙吗？为了解释，我附上了这张照片。红色箭头是我想要避免的积聚。感谢所有人！
使用的代码：
Sub Mod9x()
Dim cell As Range
Dim arr As Variant, arrElem1 As Variant, arrElem2 As Variant, arrElem3 A
浏览 2提问于2017-10-30得票数 0
2回答
我对VBA编码很陌生，我想复制同一行的单元格，以获取我搜索的值。
当我想要访问时，我遇到了一个错误。例如，我想在我的xl工作表中找到"abcd“。假设"abcd“是在单元格c12中找到的，我想在单元格E12、F12中复制值。
我得到错误，我试图使用偏移属性。
Private Sub FindingValues()
Dim val As Variant
val = InputBox(" Please Enter the value you want to search for")
Set c = Cells.Find(val, LookIn
浏览 4提问于2014-12-21得票数 0
回答已采纳
我看到有类似的问题，但我无法找到一个VBA，其中包括我的两个查询。我对VBA相当陌生，因此很难将两个代码合并成一个代码，这些代码：
在包含文本"TTDASHINSERTROW“的行上方插入指定数目的行，并从上面的行复制格式和公式。
我的第一段代码插入了许多行，并从上面复制了公式，但是基于“活动单元格”。
Sub insertRow()
Dim Rng, n As Long, k As Long
Application.ScreenUpdating = False
Rng = InputBox("Enter number of rows required.")
If R
浏览 11提问于2015-03-03得票数 1
回答已采纳
我有大约50列200行。例如，大约100个单元格包含文本“坏文本”。
下面的宏在电子表格中查找“坏文本”，记录地址，偏移左1单元格，记下该地址，然后删除两个单元格地址。它只做了一次，我需要它循环，直到它不能再找到电子表格中的文本“坏文本”。
Sub macro1()
Dim StartRange As String
Dim EndRange As String
Cells.Find(What:="badtext").Select
StartRange = ActiveCell.Address
Selection.Offset(0, -1).Select
EndRange = A
浏览 3提问于2016-01-03得票数 0
回答已采纳
我有一个格式化的表格，样式名为"Goals“。我有一个计数器来检查表有多少行。每次添加或删除一行时，计数器都会更新。
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("Goals").Rows(1) = Empty Then
Worksheets("Counters").Cells(2, 1) = 0
Else
Worksheets("Counters").Cells(2, 1) = Range("Goals").Rows.Coun
浏览 0提问于2017-04-02得票数 1
我在使用.Find和.FindNext时遇到了问题。我想准确地搜索字符串"Q1“。目前，当我的.FindNext函数运行时，它在一个值为"Q10“的单元格中找到"Q1”。如何限制.Find和/或.FindNext函数以搜索所需的确切字符串？谢谢你的帮助!
这是我的代码。例如，我想在一系列单元格中查找" Q1“的第三个实例，这些单元格可能包含Q1、Q3、Q5、Q10、Q11、Q1、Q2、Q1等。
Dim findValue As Range
' find first instance of Q1
searchString = "Q1"
浏览 5提问于2015-08-14得票数 0
尝试修复我的电子表格，在N列中粘贴一个公式，基于A列的值。本质上，如果单元格A6 = "Text 1"，那么单元格N6 = "Formula 1"，如果单元格A7 = "Text 2"，那么单元格N7 = "Formula 2"，然后让这个循环遍历所有行。 在VBA中非常业余，所以过多的搜索给了我下面的信息。 Sub Test()
lr = Cells.Find("*", Cells(1, 1), xlFormulas, xlPart, xlByRows, xlPrevious, False).Row
浏览 13提问于2021-07-21得票数 3
我正在尝试创建一个宏来迭代工作表中所有使用过的单元格，并返回平均值。最终目标是获得每个工作表中数字的平均值，并使用这些平均值生成折线图。
我很难理解如何做这件事。我现在的策略(可能不是最优的)包括a)找到包含数值数据的第一行；b)找到包含数值数据的第一列；c)找到包含数值数据的最后一行；d)找到包含数值数据的最后一列；d)在这些单元格上创建一个区域；e)对区域求平均值
这是我当前的代码
Sub AverageAllNumbers()
Dim fRow As Long
Dim fColumn As Long
Dim lRow As Long
Dim lCo
浏览 1提问于2013-06-19得票数 1
回答已采纳
我正在使用Find方法从另一个工作簿中获取单元格值。下面的代码带来了价值。但是我想要擦除激活方法，所以只需要使用块语句和Find方法从另一个工作簿中获取值。'Windows(wb_name).Activate
'Sheets("SheetA").Select
'Set rg =Worksheets("SheetA").Range("C:C")
'With rg
'value1 = Cells.Find(What:="11693", After:=ActiveCell, LookIn:=xlF
浏览 2提问于2021-07-11得票数 0
回答已采纳
我写了以下分文：
Public Sub filterEmployeeSheets(Sheets As Excel.Worksheet, SearchRange As String, Indicator As String, FilterString As String)
'This Sub is used to filter sheets by deleting any rows
'that do not contain the value stated in variable filterString
'@Parameter She
浏览 4提问于2013-09-25得票数 0
回答已采纳
我是VBA的新手。如何识别与包含文本"This Row“的行和包含文本"This Column”的列交叉的单元格，并将其内容设置为称为MyContent的整数？应该在从A1开始的1000行和50列的范围内搜索。
浏览 4提问于2014-03-11得票数 0
回答已采纳
我正试图用excel表来写一个宏。在这个宏中，我是否获取单元格号(B04)的副本并在工作表(3)上搜索，但是我遇到的问题是，当我想更改单元格宏的内容时，也在搜索新的内容。
Range("D6").Select
Selection.Copy
Sheets("3").Select
Cells.Find(What:="Yasser Arafat Ateya ELsayed EL", After:=ActiveCell, _
LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _
浏览 4提问于2014-12-15得票数 0
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
云直播活动推荐
腾讯云开发者
