首页 > 解决方案 > 如何在循环中引用同一列中的单元格,vba

问题描述

我需要遍历数组中的所有单元格,然后在满足条件时输入一组值。问题是我不知道如何用我当前的代码引用单元格。

我需要将所有单元格值与今天的日期进行比较。如果今天的日期等于特定的单元格值。在与单元格相同的列中的第 50 行中插入某些措辞。

Sub Macro 1

Dim ws As Worksheet
Dim c As Range
    Set ws = Worksheets("CDR")

        For Each c In ws.Range("$G$13:$T$40")
            If c.Value = ws.Range("G6") Then ______
        Next c

End Sub

例如,如果单元格A3中的日期是今天的日期 ( G6),则在单元格中插入“是” A50

标签: vba

解决方案


推荐阅读