Skip to content

Instantly share code, notes, and snippets.

@ganesh092929
Created December 25, 2017 10:53
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ganesh092929/2adc260a487d00439f8a562e8835fe7d to your computer and use it in GitHub Desktop.
Save ganesh092929/2adc260a487d00439f8a562e8835fe7d to your computer and use it in GitHub Desktop.
Sub Sheet2RowValues()
Dim wb As Workbook
Dim ws2 As Worksheet
Set wb = ThisWorkbook
Set ws2 = wb.Sheets("Sheet2")
lastRow = ws2.Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To lastRow
Debug.Print ws2.Cells(i, 1).Value
Next i
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment