50 visitors to this thread..

not able to understand what you want to say...
Please let us know that where you want to paste cell G6...

Here is code to copy cell G6 and paste special

Sub Cpypst()
    Range("G6").Copy        ' Copy range G6
    Range("B46").Select      ' Change to required destination to paste
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False         ' Past special coding
End Sub