Checks values in a range 10 rows by 5 columns with nested for loop : Cell Value « Excel « VBA / Excel / Access / Word

VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Java

Java Tutorial

Java Source Code / Java Documentation

Illustrator Tutorials

GIMP Tutorials

C# / C Sharp

C# / CSharp Tutorial

C# / CSharp Open Source

SQL Server / T-SQL Tutorial

Oracle PL / SQL

Oracle PL/SQL Tutorial

Flash / Flex / ActionScript

XML

XML Tutorial

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Excel » Cell Value

Checks values in a range 10 rows by 5 columns with nested for loop


 

Sub CheckValues2()

    Dim rwIndex As Integer

    Dim colIndex As Integer

    For rwIndex = 1 To 10

         For colIndex = 1 To 5

             With Cells(rwIndex, colIndex)

                 If Not (.Value = 0) Then Cells(rwIndex, colIndex).Value = 0

             End With

         Next colIndex

    Next rwIndex

End Sub

Related examples in the same category

1.	Define a string type variable and set to Cell(1,D)
2.	StrConv("ALL LOWERCASE ", vbLowerCase)
3.	Format("ALL LOWERCASE ", "<")
4.	Checks values in a range 10 rows by 5 columns
5.	Place the value (result) of a formula into a cell rather than the formula.
6.	Validation with a Spreadsheet Cell
7.	Assing value in Cells to array, do the bubble sort and assign them back
8.	transposes the values of a group of cells in a worksheet
9.	Determining a cell's data type
10.	Calculate cell

www.java2java.com | Contact Us

All other trademarks are property of their respective owners.