Excel VBA – 如何从2个相交范围创build单元格范围？
我有一个脚本，在列A中查找angular蛋白值，在第1行中也是一个不同的值。
我需要为两个相交的单元格创build一个新的Range值。 这可能吗？ 如果是这样，我该怎么做？
这是我的代码到目前为止：
Set DayRng = ws.Range("1:1").Find(What:="*", LookAt:=xlWhole, MatchCase:=False, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious) Set ActionCell = ws.Range("A:A").Find(What:=ActionString, LookAt:=xlWhole, MatchCase:=False, SearchOrder:=xlByRows, SearchDirection:=xlNext) If DayRng.Value = Date Then ' Set New Due Date Worksheets("ActionPlan").Range("E" & (ActionCell.Row)).Value = NewDate ' Add Updates to Update field Worksheets("ActionPlan").Range(DayRng.Column & "" & ActionCell.Row).Value = Me.txtUpDes.Value Else "Do something else" 如果从上面的代码中不清楚的话，我现在需要在DayRng的列字母的单元格和ActionCell的行号中添加一个新的值。
例如，如果DayRng = E1和ActionCell = A4，那么我需要一个新的值放在E4中
如果DayRng = E1和ActionCell = A4那么我需要一个新的值放在E4中
ThisWorkbook.Worksheets("ActionPlan").Cells(ActionCell.Row, DayRng.Column).Value = "WhatEver"
尝试这个：
Worksheets("ActionPlan").Cells(ActionCell.Row, DayRng.Column) _ = "Hello World"