提取数据位以生成Excel图形

Question

我有几个填充了数据的列，它们的标题如下：

RP hEPO Gradient Elution Optimization004:10_Cond
RP hEPO Gradient Elution Optimization004:10_pH
RP hEPO Gradient Elution Optimization004:10_Pressure

这是原始数据，我不会创建这些标题。我对它的最后一点感兴趣：Cond，pH和压力。我想创建一个具有电导率，pH值和压力的图表，我希望我的程序能够识别绘图标签的正确列。有没有办法在该单元格中搜索“Cond”，以便我可以在if函数中使用它？

Answer 1

如果您只是在下划线后面看部分代码：

 Sub Macro1()
     mystring = Cells(1, 1)
     mytitle = Right(mystring, Len(mystring) - InStr(mystring, "_"))
 End Sub

这将在破折号后提取字符串的一部分。如果在原始字符串中找不到“_”，请注意InStr函数将返回0。我将让你修改单元格引用和错误检查。

要在工作表中使用此功能而不是在VBA功能中，请使用“FIND”功能替换“InStr”。这是工作簿和VBA之间的不匹配之一。