nbuddhi
New Member
- Joined
- Jun 23, 2020
- Messages
- 29
- Office Version
- 365
- Platform
- Windows
Dear Team,
I need to copy the value of V80 into next empty cell of range A80:A89. Could you please help me to specify the cell range A80:A89 with below code or new code.
Thanks & Best Rgds,
Nuwan.
I need to copy the value of V80 into next empty cell of range A80:A89. Could you please help me to specify the cell range A80:A89 with below code or new code.
VBA Code:
Private Sub CBCoppysummary_Click()
Application.ScreenUpdating = False
Dim copySheet As Worksheet
Dim pasteSheet As Worksheet
Set copySheet = Worksheets("Test Report")
Set pasteSheet = Worksheets("Test Report")
copySheet.Range("V80").Copy
pasteSheet.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
Thanks & Best Rgds,
Nuwan.