returns a range object that represents the last non-empty cell in the same row : Range Reference « Excel « VBA / Excel / Access / Word

Home
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
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Excel » Range Reference 
returns a range object that represents the last non-empty cell in the same row
 
Function GetLastCellInRow(rg As Range) As Range 
    Dim lMaxColumns As Long 

    lMaxColumns = ThisWorkbook.Worksheets(1).Columns.Count 

    If IsEmpty(rg.Parent.Cells(rg.Row, lMaxColumns)) Then 
        Set GetLastCellInRow = _ 
            rg.Parent.Cells(rg.Row, lMaxColumns).End(xlToLeft) 
    Else 
        Set GetLastCellInRow = rg.Parent.Cells(rg.Row, lMaxColumns) 
    End If 
End Function 

 
Related examples in the same category
1.Reference a range by name
2.Refer to a range outside the active sheet by qualifying the range reference with a worksheet name from the active workbook
3.To refer to a range in a different workbook
4.Refer to an entire row
5.Refer to an entire column
6.Noncontiguous ranges
7.Select a range A1:A3
8.Activate the Range
9.Use disgonal cells to select a range
10.Use ActiveCell.End to select a range
11.Use the cell reference directly
12.Select a range by using the ActiveCell
13.Refer to the B2 cell in DataInput, while another workbook is active
14.Select Last Cell
15.The Offset method can also use negative arguments. A negative row offset refers to a row above the range. A negative column offset refers to a column to the left of the range.
16.Use 0 as one or both of the arguments for Offset: expression refers to cell A1
17.Using the End Property to Navigate within a Worksheet
18.Using the Range Property to Refer to Groups of Cells
19.Specifying Individual Cells with the Cells Property
java2s.com  |  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.