Question

I need to simply go through all the cells in a Excel Spreadsheet and check the values in the cells. The cells may contain text, numbers or be blank. I am not very familiar / comfortable working with the concept of ‘Range’. Therefore, any sample codes would be greatly appreciated. (I did try to google it, but the code snippets I found didn’t quite do what I needed)

Thank you.

Answer 1

Sub CheckValues1()     Dim rwIndex As Integer     Dim colIndex As Integer     For rwIndex = 1 To 10             For colIndex = 1 To 5                 If Cells(rwIndex, colIndex).Value <> 0 Then _                     Cells(rwIndex, colIndex).Value = 0             Next colIndex     Next rwIndex End Sub 

Found this snippet on http://www.java2s.com/Code/VBA-Excel-Access-Word/Excel/Checksvaluesinarange10rowsby5columns.htm It seems to be quite useful as a function to illustrate the means to check values in cells in an ordered fashion.

Just imagine it as being a 2d Array of sorts and apply the same logic to loop through cells.