Paste data into open coulmn

[qfield]

good day

i have the following code to paste data in the first open line in a different sheet and it works great


Dim lst As Long
WSIM.Range("P2:T2").Copy
With Sheets("Result")
lst = .Range("A" & Rows.Count).End(xlUp).Row + 1
.Range("A" & lst).PasteSpecial xlPasteColumnWidths
.Range("A" & lst).PasteSpecial xlPasteValues
WSIM.Range("P2:T2").Clear
End With



how can this code be changed to rather paste the data in the first open column in the other sheet

[Uncle Gizmo]

2 things to note, first you have posted this in the MS Access section, hence you're probably not getting any views for from anyone that knows much about XL! Secondly your question is a little bit confusing? It might pay to have a think about what you want and repost it in the correct section.