range selection rows code replace

**bezbid** · 01-20-2015, 05:59 AM

Sheets("Main").Select
    Range("A1301:F2101,S1301:X2101,AD1301:AI2101,AO1301:AT2101,AZ1301:BE2101,BK1301:BP2101,BV1301:CA2101").Select    
    Selection.ClearContents
    Range("A1301").Select

cell M13 = 1301
cell M14 = 2101

how to code this so i can enter the start row and end row in M13 and M14，

**YasserKhalil** · 01-20-2015, 06:08 AM

Try this

Sub Test()
    Dim StartRow As Long, EndRow As Long
    StartRow = 1301
    EndRow = 2101
    Sheets("Main").Select
    Range("A" & StartRow & ":F" & EndRow & ",S" & StartRow & ":X" & EndRow & ",AD" & _
    StartRow & ":AI" & EndRow & ",AO" & StartRow & ":AT" & EndRow & ",AZ" & StartRow & _
    ":BE" & EndRow & ",BK" & StartRow & ":BP" & EndRow & ",BV" & StartRow & ":CA" & EndRow & "").Select
    Selection.ClearContents
    Range("A" & StartRow).Select
End Sub

**bezbid** · 01-20-2015, 06:25 AM

    
Sub Test()
    Dim StartRow As Long, EndRow As Long
    StartRow = Range("M13").Value                                           
    EndRow = Range("M14").Value
    Sheets("Main").Select
    Range("A" & StartRow & ":F" & EndRow & ",S" & StartRow & ":X" & EndRow & ",AD" & _
    StartRow & ":AI" & EndRow & ",AO" & StartRow & ":AT" & EndRow & ",AZ" & StartRow & _
    ":BE" & EndRow & ",BK" & StartRow & ":BP" & EndRow & ",BV" & StartRow & ":CA" & EndRow & "").Select
    Selection.ClearContents
    Range("A" & StartRow).Select
End Sub

Thank you

**YasserKhalil** · 01-20-2015, 06:47 AM

you're welcome thanks for the feedback

range selection rows code replace

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

range selection rows code replace

Re: range selection rows code replace

Re: range selection rows code replace

Re: range selection rows code replace

Thread Information

Users Browsing this Thread

Similar Threads

Hide rows in range 2 based on filter selection in range 1

Selection.Replace replaces in entire workbook despite Range.Select

code selection range

Replace Values in range selection

VBA Code for selection rows

Bookmarks

Bookmarks

Posting Permissions