VBA example - Excel 2007: color pattern 10


VBA code to colors pattern 9

In this VBA example code, you will learn to generate a colored pattern as shown below. It is a combination of four half-matrixes of color patterns.
To run this example VBA code, you will need a Form, and a CommandButton.


VBA MS Excel: VBA loop example code to generate color pattern-pattern 10

VBA code for this example:


Option Explicit
Private Sub CommandButton1_Click()    
  
Dim i, j, l, m As Integer
  
   l = 6
   m = 6    
   For l = 1 To 6
 
      For m = 1 To 6
           
        
If (l = m) Then
               
            
Cells(l, m + 7).Interior.Color = RGB(200, 10, 10)
                           
         ElseIf (l > m) Then
               
            
Cells(l, m + 7).Interior.Color = RGB(10, 10, 200)
                           
         ElseIf (l < m) Then
   '
No filling
         End If            
     
Next

     Next
 
    For i = l + 1 To 14
   
      
For j = 6 To 1 Step -1
           
          
If (i + j = 14) Then
               
             
Cells(i, j + 7).Interior.Color = RGB(200, 10, 10)
                           
           ElseIf (i + j > 14) Then
    '

Comments





This website intents to provide free and high quality tutorials, examples, exercises and solutions, questions and answers of programming and scripting languages:
C, C++, C#, Java, VB.NET, Python, VBA,PHP & Mysql, SQL, JSP, ASP.NET,HTML, CSS, JQuery, JavaScript and other applications such as MS Excel, MS Access, and MS Word. However, we don't guarantee all things of the web are accurate. If you find any error, please report it then we will take actions to correct it as soon as possible.