我有以下代码可以根据标题选择列。
Dim rng1 As Range
Set rng1 = Range(Range("A1:Z1").Find("Name"), Range("A1:Z1").Find("Name").End(xlDown))
尝试使用此范围并在图表上设置X轴值时
ActiveChart.SeriesCollection(5).XValues = rng1
我看到标题也出现在列表中。
想知道一种根据标题选择列的方法,然后从中删除标题元素。
Set aCell
行也可以按照下面的方式编写,以便从当前工作表中更加动态地提取:Set aCell = .Range(Cells(i, 1), Cells(i, ActiveSheet.UsedRange.Columns.Count)).Find(What:=Name, LookAt:=xlWhole, MatchCase:=True)
- Shrout1