ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Quotes in VBA Code (https://www.excelbanter.com/excel-programming/313182-quotes-vba-code.html)

frank

Quotes in VBA Code
 
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.

Don Guillett[_4_]

Quotes in VBA Code
 
how about
cells(10,"a")
or
range("a"&10)


--
Don Guillett
SalesAid Software

"Frank" wrote in message
...
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.




Tom Ogilvy

Quotes in VBA Code
 
In a worksheet formula:
=Indirect("A" & 10)

or if B9 will hold the number 10

=Indirect("A" & B9)

------------------

If you mean in code

set rng = Range("A" & 10)

or

lrow = 10
set rng = Range("A" & lRow)



--
Regards,
Tom Ogilvy

"Frank" wrote in message
...
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.




frank

Quotes in VBA Code
 
Tom,

How do you handle the range reference in code to allow
changing numbers like the following scenario:

With ActiveChart.Parent
.Width = Range("B2:H17").Width
End With

I want to use a loop to add 10 to the reference above to
get something like:

With ActiveChart.Parent
.Width = Range("B12:H27").Width
End With

The outside quotes have me confused. Thanks again for your
help.

-----Original Message-----
In a worksheet formula:
=Indirect("A" & 10)

or if B9 will hold the number 10

=Indirect("A" & B9)

------------------

If you mean in code

set rng = Range("A" & 10)

or

lrow = 10
set rng = Range("A" & lRow)



--
Regards,
Tom Ogilvy

"Frank" wrote in

message
...
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.



.


Bob Phillips[_6_]

Quotes in VBA Code
 
With ActiveChart.Parent
.Width = Range("B2:H" & myRow + 10).Width
End With

--

HTH

RP

"Frank" wrote in message
...
Tom,

How do you handle the range reference in code to allow
changing numbers like the following scenario:

With ActiveChart.Parent
.Width = Range("B2:H17").Width
End With

I want to use a loop to add 10 to the reference above to
get something like:

With ActiveChart.Parent
.Width = Range("B12:H27").Width
End With

The outside quotes have me confused. Thanks again for your
help.

-----Original Message-----
In a worksheet formula:
=Indirect("A" & 10)

or if B9 will hold the number 10

=Indirect("A" & B9)

------------------

If you mean in code

set rng = Range("A" & 10)

or

lrow = 10
set rng = Range("A" & lRow)



--
Regards,
Tom Ogilvy

"Frank" wrote in

message
...
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.



.




Tom Ogilvy

Quotes in VBA Code
 
for i = 0 to 3
With Activechart.Parent
.width = Range("B2:H17").Offset(10*i,0).Width
End With
Next

But since you are always looking at Columns B:H, the width should be the
same.

But just to illustrate:

Sub Tester8()
For i = 0 To 3
' With ActiveChart.Parent
Debug.Print i, Range("B2:H17") _
.Offset(10 * i, 0).Address
' End With
Next

End Sub

Produces:

0 $B$2:$H$17
1 $B$12:$H$27
2 $B$22:$H$37
3 $B$32:$H$47

--
Regards,
Tom Ogilvy

"Frank" wrote in message
...
Tom,

How do you handle the range reference in code to allow
changing numbers like the following scenario:

With ActiveChart.Parent
.Width = Range("B2:H17").Width
End With

I want to use a loop to add 10 to the reference above to
get something like:

With ActiveChart.Parent
.Width = Range("B12:H27").Width
End With

The outside quotes have me confused. Thanks again for your
help.

-----Original Message-----
In a worksheet formula:
=Indirect("A" & 10)

or if B9 will hold the number 10

=Indirect("A" & B9)

------------------

If you mean in code

set rng = Range("A" & 10)

or

lrow = 10
set rng = Range("A" & lRow)



--
Regards,
Tom Ogilvy

"Frank" wrote in

message
...
I would like to refer to

=range("A10")

similar to the following

=range(""A" & 10")

so that I can increment the number reference. I know I
have the quotes set up wrong. How do you refer to
changing letters or numbers that need to appear within
quotes? Thanks for your help.



.





All times are GMT +1. The time now is 10:26 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com