将数据从表1传输到表2但我想使用IF语句（如果列G为空则不复制）

Question

 Sub NN()
Dim Lastrow As Integer
Lastrow = [b50].End(xlUp).Row
   Range("b3:J" & Lastrow).Copy Sheets("Sheet2").Range("b" & Sheets("Sheet2").[b1000].End(xlUp).Row + 1)
Range("b3:c" & Lastrow).ClearContents
Range("e3:e" & Lastrow).ClearContents
Range("g3:j" & Lastrow).ClearContents

MsgBox ("Date Posted")

Sheets("TRANS").Activate

End Sub

我需要使用带有范围从3g到50g的列的IF语句，如果G列中的单元格为空则不要复制数据。

注意：G列中的数据并非所有时间都达到50g单元格的时间要少一些，但最大值达到50

enter image description here