VBA Current Region Property

     

  • It selects all the adjacent cells which are not blank
  •  

  • Whenever blank cell exists in a row or column region breaks the chain
  •  

    #1)Find the current region from Range"C3" cell:

     

    Private Sub CommandButton1_Click()
    'Current Region starting from C3 cell
    Range("C3").CurrentRegion.Select
    End Sub

     

     

    #2):Find the current region from Range"C3" cell:


    Private Sub CommandButton1_Click()
    'Selection of current region when break happend
    Range("C3").CurrentRegion.Select
    End Sub

     

     

    #3):Find the current region from MIDDLE of row:

     

    Private Sub CommandButton1_Click()
    'selection of current region from middle of row
    Range("E3").CurrentRegion.Select
    End Sub