Tag: 查找

Excel定义名称列表在索引下拉列表中: 我有单元列出以下 **MyList** 1 green 2 blue 3 red 4 yellow 5 special 6 special 我有一个特殊的列表定义为特殊的 **Special** apple banana grapes 我有一个公式，寻找一个匹配，并显示在下拉列表中的值，所以如果2列在最左边的列蓝色将是唯一的下拉select。 =INDEX($A$15:$B$20,MATCH($E20,$A$15:$A$20,0),2) 但是对于5和6的单元格的下拉说“特殊”，它不下拉定义的列表名称（特殊）的内容。我怎样才能在这个公式中包含一个定义的名字？

VBAmacros – 如果单元格匹配单元格在第三张表复制从工作表部分行到新工作表: 所以我对编码不是很了解，但是我很快就学会了，通过捎带现有的代码来创build其他代码，但是这个代码对于我来说太多了。我需要一些帮助，为excel电子表格写一个VBA，这将为我节省大量的时间来比较和汇总数据。另一种方法是在工作表中创build多个VLookup＆If命令，大家都知道这会导致工作表中的不稳定。任何帮助将不胜感激。这里是电子表格的布局：工作表1 =“3年” 工作表2 =“5年” 工作表3 =“10年” 工作表4 =“15年” 工作表5 =“组合” 工作表6 =“合格资金” 第1行在所有工作表中都是相同的单元格A2是使用= COUNTA（A3：A1048576）的计数器单元格，任何行之间都不应该有中断不知道这是否需要，因为我已经看到在macros中这样做的代码（如果是这种情况，我将删除该行）工作表1-5中的第2行是相同的。单元格A2：BF2是列标题工作表5有5个来自BG：BL的附加列工作表6包含工作表1-4将要交叉引用的数据如果有匹配，工作表5将成为复制数据的目标工作表，从第3行开始这是我想要做的：在工作表6的行F中逐行search“WMC不符合条件”或“不符合条件的共享类”，如果发现其中任何一个文本，则删除整行在工作表6的A列中查找工作表1的B列中的文本的匹配（从第3行开始），逐行如果find，则search工作表5的列B以查看该行是否已经存在如果该行不存在，则将该行（从Worksheet 1）的列A2：BF2中的单元格复制到Worksheet 5中的第一个空白行，在BG列中input“1”，“= SUM（BG3：BJ3）”在列BK中，然后将工作表6中find的行的列D中的文本复制到Worksheet 5中新行的列BL 对于工作表2，在列BK中input“1”，在列BK中input“= SUM（BG3：BJ3）”，然后将工作表6中find的行的列D中的文本复制到工作表中新行的列BL五对于工作表3，它将在列BK中的列BI“= SUM（BG3：BJ3）”中input“1”，然后将工作表6中find的行的列D中的文本复制到工作表5中新行的列BL 对于工作表4，它将在列BK的列BJ“= SUM（BG3：BJ3）”中input“1”，然后将工作表6中find的行的列D中的文本复制到工作表5中新行的列BL 如果该行存在，则不要再次复制该行，而是input：该行BH列中的“1”（如果在工作表2中查找）该行的BI列中的“1”（如果search工作表3）该行BJ栏中的“1”（如果正在search工作表4）移到工作表1中的下一行并重复search 一旦达到工作表1的末尾，移动到工作表2，然后工作表3，最后工作表4 再次，任何帮助将不胜感激。

在Excel VBA中查找和如果语句: 我正在尝试编写一个脚本，通过位于名为“数据库”的工作表中的Excel数据库执行search。 search结果将被呈现在名为“结果”的表格中。可以根据用户input的一定标准进行search，即“国家”，“类别”和“子类别”。这些被定义为依赖于用户的variables，如下所示： country = Sheets("Results").Range("D5").Value Category = Sheets("Results").Range("D6").Value Subcategory = Sheets("Results").Range("D7").Value 我希望强制填写“国家/地区”字段，以便进行search。如果此条件得到validation，则search将根据用户提供的其余条件运行。为了实现这一点，我写了以下内容： finalrow = Sheets("Database").Range("A200000").End(xlUp).Row For i = 2 To finalrow 'If the country field is left empty If country = "" Then Sheets("Results").Range("B10:J200000").Clear MsgBox "You must select a country in order to search the database. Please do so in the […]

VBA范围查找1列中显示/隐藏另一列: 这个让我很生气，希望你们中的一个能告诉我我做错了什么。我想要做的就是如果列I中的任何单元格包含值“Y”，则列J被隐藏。如果您从任何单元格中删除Y，则J列再次出现。这是我的代码： Private Sub Worksheet_Change(ByVal Target As Range) Dim rng As Range Set rng = Range("I:I") Set cell = rng.Find(What:="Y") If cell Is Nothing Then Columns("J").EntireColumn.Hidden = True Else Columns("J").EntireColumn.Hidden = False End If End Sub 基本上，代码完全没有。这让我更难过，因为我不知道我做错了什么。

Excel Hlookup函数返回表中的第一个字符: 我使用Hlookup在行中查找值为“A”，然后在同一列中取一个二进制值，并将其用作选定的单元格值。我只使用这个部分的公式栏。单元格公式是： "=HLOOKUP("A",A13:Z19,1)" 第13行：SNPHUATVBKWJZYMQGXFCROEILD（每个字符分配给一个单独的单元格）。在第19行中，每个单元格被5个二进制数字占用，所以为了保持整洁，我将写入十进制数字： 10 3 2 20 18 6 24 2 12 21 30 4 6 26 19 22 9 13 5 24 0 31 12 15 24 9 问题是，虽然我的公式应该返回6，因为这是与字母“A”相同列中的相应值，它返回9，这是search条件表的右上angular的第一个单元格。另外值得注意的是，如果我在不同的单元格中发布类似的公式，但可能会将search条件更改为不同的字符（例如“H”），则会发生相同的错误，返回9。提前谢谢你！

查找并replace – XML到Excel: 正如标题所示，我有一个包含许多关键字（即数字1-30）的xml文件，我想用Excel表格（即31-60）中的其他关键字replace。 31-60在同一行中。我试图打开xml文件，在xml中find1-30的位置，依次replace它们，使得1被replace为31，2被replace为32等。然后，我想要将新文件保存到新的文件位置给它一个新的名字。如果可能的话，我想循环处理多行数据，最终我会得到许多不同数据的xml文件。这是迄今为止的代码。我也得到一个path/文件访问错误“打开sFileName输出为iFileNum”。我会很感激任何帮助。感谢您抽时间阅读。 Sub replace_strings（） Option Explicit Dim string_name(1 To 30) As Variant Dim file_name As String Dim sBuf As String Dim sTemp As String Dim iFileNum As Integer Dim sFileName As String Dim count As Integer count = 1 Windows("Excel File Name.xlsm").Activate Range("B4").Activate file_name = ActiveCell Do While ActiveCell […]

Excel VBA – 查找function – 查找variables: 我的代码段如下; Dim Column1 As String Worksheets("Graph").Activate Column1 = Cells(1, "P").Value Dim Column2 As String Worksheets("Graph").Activate Column2 = Cells(2, "P").Value Cells.Find(What:=Column1).Activate StartP3Column = ActiveCell.Column Cells.Find(What:=Column2).Activate StartP4Column = ActiveCell.Column EndP3Column = StartP4Column – 1 Cells.Find(What:="End Column").Activate StartEndColumn = ActiveCell.Column EndP4Column = StartEndColumn – 1 我试图做到这一点，所以P1和P2中的值将决定macros运行时select哪些列。所以在前两个Cell.Find(What:=)函数中，我想让“Column1” Cell.Find(What:=) Column1variables（P1中的值）。当我运行的macros，我得到错误“运行时错误：91块variables未设置的对象variables”，当我debugging，问题是行Cells.Find(What:=Column1).Activate 有任何想法吗？

Excel：跨电子表格数据查找和显示: search表/工作表在不同的工作表上分别显示图1是我想成为search表，我想要一个下拉列表为每个标题（我可以做），但我努力显示来自不同的工作表的所有数据。每个工作表具有相同的布局和标题，但存储的数据不同。从网站导入的数据不能在表格中。当“姓名”下的单元格（所有名称都有一个下拉列表）可以说select了“约翰”时，它将在所有的“约翰”页面上显示数据，以便显示： – John | Manchester| 32 | 131| 1234| 123 | Money – John | Manchester| 32 | 1 |23213| 423 | Debt – John |Manchester |234 |34 | 23 | 2 | Income 当我在（表单下拉列表）中select收入时，它将显示： – Tim |London |34 |45 |435|22134|Income – Dave|Scotland | 34 |23 |234|42 |Income – Jake|Walse […]

在另一张表格中查找单元格: 我为申请付款计划的学生创build了一个数据库。我有3张： “查询” – 这是数据存储在等待学生注册的地方。 “确认” – 这个数据有3行标题：学生证（B1），计划证（B2）和工资证（B3）。这是学生注册后我将input的额外数据。 “Masterlist” – 确认付款计划的学生的最终名单。这个想法是我手动input“确认”表中的数据，然后运行一个macros，在“查询”表中search学生ID（B1）的值。然后，我希望它在“查询”表中的B和E栏中复制计划ID（B2）和工资ID（B3）。一旦数据被填充，我需要将整行转移到“Masterlist”工作表。我试过录制Marco，但是当我录制它时，它发现它只是单元格的当前值。我用公式很好，但之前没有真正完成macros。 Range("B1").Select Selection.Copy Sheets("Enquiry").Select Cells.Find(What:="4536092", After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate Rows("29:29").Select Application.CutCopyMode = False Selection.Copy Sheets("Masterlist").Select ActiveWindow.LargeScroll Down:=-7 Rows("2:2").Select Sheets("Enquiry").Select Range("A29").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "4536092" Rows("29:29").Select Selection.Copy Sheets("Masterlist").Select Rows("2:2").Select Selection.Insert Shift:=xlDown