Tag: 查找

自动更新SP基础列表

我真的希望有人可以帮助我在这里…我正在为我的雇主使用SharePoint Foundation开发数据库。 该数据库包含26列和约100,000行(业务联系人数据库)。 我们使用列表中的内容导出到MS Excel中以加载到电子邮件pipe理器程序中,以执行电子邮件发送。 我遇到的问题是 – 电子邮件pipe理器程序将logging电子邮件的收件人已取消订阅,但这可能是一次成千上万。 我需要能够“自动”更新SharePoint列表与电子邮件pipe理器(在MS Excel中)返回的“取消订阅”数据。 我试图创build一个工作stream来查找/replace定义的字段。 任何人都可以帮忙吗?

如何在R中查找和填充(如在Excel中)?

我有一个105000行和30列的数据集。 我有一个分类variables,我想把它分配给一个数字。 在Excel中,我可能会做一些与VLOOKUP和填充。 我怎么会在R做同样的事情呢? 基本上,我有一个HouseTypevariables,我需要计算HouseTypeNo 。 以下是一些示例数据: HouseType HouseTypeNo Semi 1 Single 2 Row 3 Single 2 Apartment 4 Apartment 4 Row 3

VBA查找范围内的多个项目并基于其他条件在行复制并粘贴到另一个工作表的相邻单元格

我有3个选项卡,用于尝试使用VBA自动化的特定问题。 “表单”选项卡:用户从下拉列表中select最多10个他们需要访问的不同实体(范围A25:A34) FLS Hiearchy:这个标签是公司内所有从第一级(最高/父级)到第十级(最低的子级)的实体的层次结构。 范围A:D(列A是级别,B是与在“表单”选项卡上的下拉列表中select的各种实体匹配的实体,列C是实体描述,列D是需要复制到表1的秒类) 。 Sheet1:该选项卡用于pipe理员,用于根据“表单”选项卡中选定的实体从“FLS Hiearchy”选项卡查找必要的安全类。 范围A1:J1。 安全类将被复制到从“表单”选项卡派生的每个variables下(最多10个实体,与Sheet1上的J列相关联)。 我知道我需要创build一个循环来完成这个任务。 简而言之,VBA脚本需要从“表单”选项卡中标识实体(最多10个),根据需要将它们粘贴到范围A1:J1中,然后经过一个循环,以A1开头的相应实体并查找FLS Hieararchy选项卡中的实体。 一旦findHierarchy选项卡中的每个实体,就需要在Hierarchy选项卡上确定其级别(A列)。 例如,如果级别是6级,VBA脚本需要获取实体所在行的安全级别,然后为其下面的实体获取安全级别,直到find下一级安全级别,然后才需要停在那里(上一行不包括下一级6)。 在这个例子中,如果你find一个级别6,下面的实体也是6,VBA脚本只需要获取一个安全类(第一个variables的列d)。 以下是我到目前为止,但我显然需要更多的帮助完成。 Sub SecurityClasses() ' ' SecurityClasses Macro ' Based off entity selected in Form tab determine the security classes needed for user. ' Sheets("Sheet1").Range("A:AZ").ClearContents Sheets("Form").Activate Range("A25").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Sheets("Sheet1").Cells(1, 1).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True

如何在Excel中按行查找重复项

我一直在寻找一种方法来查看哪些行中有重复的单词。 如果一个单词在列A中匹配,并且CI想要向列B添加“X”,则整个单元不应该完全相同,例如,John Miller和Miller,J这只需要匹配同一行,而不是整列。 我有5万行加上行,所以我正在寻找一个更好的方式,任何帮助,真的不胜感激 以下是它的样子: A Jf Wepener . Lourens Johannes Stephanus Me Horn x Horn Maria Elizabeth Jg Waldeck x Waldeck Johan George Pj Du Preez x Preez Paulus Jacobus Du

在vba中查找具有共同值的单元格

我正在尝试编写一个macros,它将循环遍历一列,并取出每个单元格,并find所有其他近似匹配的单元格,并将它们移动到另一个电子表格。 我想使用find方法,但我不确定如何实现它。 我粘贴了迄今为止所做的,这并不多。 我很新vba,所以任何帮助将不胜感激。 Sub Extract() Dim i As Long, count As Long, rng1 As Range Set rng1 = Sheet1.Range(Range("N1"), Range("N1").End(xlDown)) count = 2 For i = 1 To Sheet1.Range(Range("N1"), Range("N1").End(xlDown)).Rows.count Sheet1.Cells(count, 14).Select count = count + 1 Next i End Sub

Excel VBA – For循环。find具有值的单元格

我正在努力编写一个有效的macros,它将find列中出现错误的单元格,然后用第一个非空单元格的值replace该单元格,并在其下面没有错误(可能会有连续的错误单元格),然后循环12列。 下面的代码replace了所有12列中的每个错误单元格,但不是一致的方式:一些单元格将确实由包含数字的下一个单元格填充,但是一些单元格的值将是第二个包含一个数字的单元格。 我不知道我的代码中的问题在哪里。 Option Explicit Sub ClearError() ThisWorkbook.Sheets("WorkSheet1").Activate Dim c, x, z As Integer Dim y As Long For z = 3 To 14 Step 1 ' Start with column 'C' and do for total of 12 columns x = 999 For c = 1 To x Step 1 If IsError(Cells(c, z)) Then Cells(c, z) […]

在包含特定文本的所有单元格中find具有特定文本,多次出现和过去活动单元格的单元格

我目前正在编写一份源自Infoview(SAP业务对象)的报告, 这是一个每周提供有价值信息的报告,以提高对当前店铺绩效的认识。 像post的瓦片可能表明我想find具有特定文本的单元格。 它有多个事件,我想要在所有这些实例中通过先前select的单元格。 我可以通过Ctrl-F,“全部search”(对于“特定文本”)和粘贴(之前select的单元格)来达到相同的结果( http://www.extendoffice.com/documents/excel/816-excel -select-cells-with-specific-text.html )但是我想自动化这个。 我想用: Cells.Find(What:="[ö]", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , SearchFormat:=False).Activate 和 Cells.FindNext(After:=ActiveCell).Activate 但是我不能把这两个macros合并成一个macros,它给了我上面描述的结果。 之前选定的单元格包含一个公式,其中包含索引(匹配)以及对与“特定文本”相同行上的单元格的引用。 在我看来,这样做的东西节省了我dynamic单元格引用等很多麻烦。 我希望你能帮上忙

基于Excel公式的查找跨多个工作表的多个条件?

我有一系列统一格式的选项卡,其中包含要合并到一个主数据表中的数据。 我想这样做,而不索引/查找每个工作表单独。 我创build了一个示例来说明我在多个选项卡上search数据以创build主数据转储时遇到的挑战。 鉴于下面显示的4个工作表, 摘要选项卡具有预填充值,我试图填写标记的值??? 如果可能的话。 约翰: | Month 1 | Month 2 | Month 3 ————————————— Sales | 500 | 1000 | 800 Expenses | 200 | 300 | 250 Total | 300 | 700 | 550 乔: | Month 1 | Month 2 | Month 3 ————————————— Sales | 400 | 800 | […]

excel vba代码在列中查找值很慢,我如何使它更快?

我的vba代码如下,如何更快? (obs:我有+ – 33000行的价值)我从产品search代码到我的公司,我需要帮助做得更快。 Private Sub TextBox1_Enter() Dim FindString As String Dim Rng As Range FindString = TextBox1.Text If Trim(FindString) <> "" And Len(TextBox1.Text) = 6 Then With Sheets("CADMAT").Range("B:B") 'searches all of column B Set Rng = .Find(What:=FindString, _ After:=.Cells(.Cells.Count), _ LookIn:=xlValues, _ LookAt:=xlWhole, _ SearchOrder:=xlByRows, _ SearchDirection:=xlNext, _ MatchCase:=False) If Not Rng Is Nothing […]

匹配和索引从多个工作表中查找数据,并在一个工作表上汇总

我有大约两年的每日股票数据。 股票数据在556个文件中,但以相同的方式排列(注意在此期间已经列出大约5个额外的股票)。 我想通过使用匹配和索引以及我的股票代码清单(名为“匹配范围”)从556个文件中select股票价格,来总结一个工作表中的股价变动。 我已将556个文件的文件名放在摘要工作表的第2行上。 我已经使用了下面的代码,但不能正常工作。 它只是打开文件并closures它们。 有没有人有关于如何改善代码的任何提示? Sub NSEMerger() Dim SummarySheet As Worksheet Dim FolderPath As String Dim i As Long Dim n As Long Dim c As Long Dim FileName As String Dim WorkBk As Workbook Dim MatchRange As Range Dim LookupRange As Range Dim IndexRange As Range 'Define where data is being copied […]