エクセルVBAで、フィルターで表示されてる行のうち、特定の列だけ値を書き換えたい。

Question

前提・実現したいこと

データ分析に使うマクロを作成しています。
フィルターをかけて、
項目名が書かれてる1行目を除き、
2行目以降で可視行となっている行のうち、
特定の列のセルの値のみ、特定の値に書き換えたいのですが、
マクロがうまく動きません。
どのようなコードを書くと、
この処理が可能になるのでしょうか？

具体的には、
D列とB列でフィルターをかけた後で、
表示されている全ての行において、
項目名である一行目を除いたC列の値を、ある一定の値に書き換えたいです。

以前にも同じ質問をさせて頂いたのですが、
「項目名が書かれてる1行目を除き」
を書き忘れており、
自力で修正が上手くできなかったため、
再度質問させて頂けたらと思います。

発生している問題・エラーメッセージ

「項目名が書かれてる1行目」も、値が上書きされてしまいます。

該当のソースコード

 Dim masterSheet As Worksheet
 Set masterSheet = Worksheets("master")

 With masterSheet
        .Activate
        .Range("A1").AutoFilter Field:=2, Criteria1:="4"
        .Range("A1").AutoFilter Field:=4, Criteria1:="FALSE"
        For Each c In .AutoFilter.Range.Columns(3).SpecialCells(xlCellTypeVisible)
               c.Value = Worksheets("block4正答").Range("F1")
        Next c
 End With
 Worksheets("master").ShowAllData

試したこと

「項目名が書かれてる1行目を除き、ソート後表示されている全ての値を削除する」
ことはできたのですが、
各セルの値を、同一の特定の値に書き換えることは、できていません。

補足情報（FW/ツールのバージョンなど）

ここにより詳細な情報を記載してください。

Answer 1

一つの方法としては、

If c.Row > 1 Then c.Value = Worksheets("block4正答").Range("F1")

Comments

[YYJP]

できました！
ありがとうございます！！