VBA如何在循环中引用同一列中的单元格

Question

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

我需要将所有单元格值与今天的日期进行比较。如果今天的日期等于特定的单元格值。在单元格所在的同一列的第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中插入“是”。