Welcome Guest ( Log In | Register )

Outline · [ Standard ] · Linear+

 Excel expert come here

views
     
TSNathing
post Apr 22 2018, 10:21 PM, updated 6y ago

Getting Started
**
Junior Member
159 posts

Joined: Aug 2009
I'm writing excel macro.

Range("A2:Z12").Select

i would like to configure the Z12 in dynamic. Instead of fix it at Z12, i would like it to get the value from one of the cell.

example, the value of A1 cell is 23. Then i would like the macro be in this way, Range("A2:Z23").Select


Please help.
Thanks
RookieDaddy
post Apr 23 2018, 01:52 PM

Getting Started
**
Junior Member
160 posts

Joined: Nov 2008


try below...
CODE

Sub selectRange()
   Dim endRow As Integer
   Dim selRange As String
   
   If ActiveWorkbook.ActiveSheet.Range("A1").value <> "" Then
       If (IsNumeric(ActiveWorkbook.ActiveSheet.Range("A1").value)) Then
           endRow = ActiveWorkbook.ActiveSheet.Range("A1").value
           selRange = "A2:Z" & endRow
           ActiveWorkbook.ActiveSheet.Range(selRange).Select
       End If
   End If
End Sub

TSNathing
post Apr 24 2018, 09:12 PM

Getting Started
**
Junior Member
159 posts

Joined: Aug 2009
QUOTE(RookieDaddy @ Apr 23 2018, 01:52 PM)
try below...
CODE

Sub selectRange()
   Dim endRow As Integer
   Dim selRange As String
   
   If ActiveWorkbook.ActiveSheet.Range("A1").value <> "" Then
       If (IsNumeric(ActiveWorkbook.ActiveSheet.Range("A1").value)) Then
           endRow = ActiveWorkbook.ActiveSheet.Range("A1").value
           selRange = "A2:Z" & endRow
           ActiveWorkbook.ActiveSheet.Range(selRange).Select
       End If
   End If
End Sub

*
thanks expert

 

Change to:
| Lo-Fi Version
0.0127sec    0.22    5 queries    GZIP Disabled
Time is now: 28th March 2024 - 04:32 PM