Excel Macro

chris198002 

It looks like there is an issue with the way you are trying to copy and paste the values. You can rearrange the code to directly refer to the ranges without using Select and Copy.

Here is an example:

Vba code is untested, please backup your file.

Dim frontSheet As Worksheet
Dim resultsSheet As Worksheet
Dim lastRow As Long

Set frontSheet = ThisWorkbook.Sheets("Front Sheet")
Set resultsSheet = ThisWorkbook.Sheets("Results")

' Find the last row in column I of Front Sheet
lastRow = frontSheet.Cells(frontSheet.Rows.Count, "I").End(xlUp).Row

' Copy values from column AZ in Front Sheet
frontSheet.Range("AZ6:AZ" & lastRow).Copy

' Find the next available row in column I of Results Sheet
lastRow = resultsSheet.Cells(resultsSheet.Rows.Count, "I").End(xlUp).Offset(1, 0).Row

' Paste values to the next available row in column I of Results Sheet
resultsSheet.Range("I" & lastRow).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

' Clear the clipboard
Application.CutCopyMode = False

This code finds the last row in column I of the "Front Sheet," copies the values from column AZ, and pastes them to the next available row in column I of the "Results" sheet. The Application.CutCopyMode = False line clears the clipboard after the paste operation. The text and steps were edited with the help of AI.

My answers are voluntary and without guarantee!

Hope this will help you.

Was the answer useful? Mark as best response and Like it!

This will help all forum participants.