选择列范围内的特定单元格答案

【问题标题】：Select a specific cell within the range of columns选择列范围内的特定单元格
【发布时间】：2015-05-25 14:03:22
【问题描述】：

我有一个记录学生出勤情况的 Excel 文件。我有一个合并ActiveCell.Range("A1:A50") 并在其中写入“星期日”的宏。我正在尝试做的事情是：

检查活动单元格是否在 D 到 AH 列中。
如果步骤 1 为真，则激活该列的单元格 9（“如果活动单元格是 F20 或 F100，则宏应将其更改为 F9，而不更改用户选择的列）

这是我目前的代码：

Sub Sunday()
Dim myarr(4 To 34) As Integer
Dim col As Integer
col = ActiveCell.Column
If col = myarr Then
   ActiveSheet.Cells(9).Select

   'code to merge range and enter "Sunday"

Else
   On Error Resume Next
End if
End Sub

【问题讨论】：

标签： vba excel

【解决方案1】：

Sub Sunday()

    Dim col As Long
    col = ActiveCell.Column

    If col >= 4 and col <=43 Then

       ActiveSheet.Cells(9, col).Select

       'code to merge range and enter "Sunday"

    Else

    End if

End Sub

【讨论】：