如果两栏之外的单元格包含特定文本，我如何从另一个表格中的单元格拉出文本？

问题描述：

所以基本上我试图做的是在电子表格中为我在单独的电子表格中创建的考勤表制作名称标签。我在一列中填写了他们的全名，并且我有两列分配了他们的颜色。我为名称标签的每种颜色都有单独的电子表格。如果两栏之外的单元格包含特定文本，我如何从另一个表格中的单元格拉出文本？

我想要将公式写入单独的电子表格中，我们称之为“绿色20”。所以绿20将有包含执行以下公式多个单元格：

检查是否单词“红粉”是在细胞D6:D100之间在电子表格
如果“粉红”是该单元格，我想公式看看行“粉红色”是在打印出单元格B？（？意味着任何行）包含与会者的名字。

所以基本上公式具有从单独的电子表格中获取数据，检查柱d特定文本包含颜色，如果文本是在细胞中则列需要检查该行中的一个的文本是并打印出B列对应于行该颜色是文本（名和姓）。

外观与MATCH索引来查找该行。 –

你好戴安娜，欢迎来到这个网站。我们喜欢把问题放在问题和答案的问题上，所以我继续前进并修正你的问题。随意再次编辑它。 – MackM

答

所以其实我去前进，写了一个宏观与我的同事之一，这是它结局如下：

公共子名称标签（）

'名称标签宏 ' 3月20日

昏暗RNG作为范围设置RNG =范围（ “$ B $ 5：$ E $ 100”）

昏暗行数，colselect作为整数行数= 1 colselect = 2

Sheets("March 20, 2017").Range("$B$4:$E$100").AutoFilter Field:=4, Criteria1:="Green" 


For Each Row In Rng.Rows 
    'MsgBox Row.Row 
    If Cells(Row.Row, 2).EntireRow.Hidden = False Then 

     If Cells(Row.Row, 2).Value <> "" Then 
      copystring = Cells(Row.Row, 2).Value & " " & Cells(Row.Row, 3).Value 
      Sheets("Green 20").Cells(rowcount, colselect) = copystring 

      Sheets("Green 20").Activate 
      Cells(rowcount, colselect).Select 
      Set mergecellrng = Cells(rowcount, colselect) 
      Set mergecellrng2 = mergecellrng.Offset(0, 3) 
      Range(mergecellrng, mergecellrng2).Merge 
      mergecellrng.Font.Name = "Segoe UI" 
      mergecellrng.Font.Size = 22 
      mergecellrng.HorizontalAlignment = xlCenter 
      mergecellrng.VerticalAlignment = xlCenter 

      If colselect = 8 Then 
       rowcount = rowcount + 7 
      End If 
      Select Case colselect 
       Case 2 
        colselect = 8 
       Case 8 
        colselect = 2 
      End Select 
     End If 
    End If 
    Sheets("March 20, 2017").Activate 
Next

的重复它为每个颜色

如果两栏之外的单元格包含特定文本，我如何从另一个表格中的单元格拉出文本？

相关推荐