Find Inserted Column - Paste Into

First there's an error. NC should equal .Column + 1, not .Row

Option Explicit

Sub FindColumn()
Dim NC As Long
NC = Sheets("Count").Range("A1").End(xlToRight).Column + 1

   Sheets("Number").Range("E4:E20").Copy
   Sheets("Count").Cells(4, NC).PasteSpecial xlPasteValues
   
End Sub

[/code]
Rookie mistake, my apologies.

As for your second line of code, I don't use that offset syntax, nor the way you're using xlpastevalues. Does fixing my error above allow you to use the code I gave you? My code attempts to paste the copied cell into the the next empty column starting in row4. It should work with the fix above.