Concatenating a string and an integer

  • Thread starter Thread starter aswini.ks
  • Start date Start date
A

aswini.ks

Hi,

I am trying to move down a column by varying a counter for the row.
Whether I use "B" & Str(RptRowCounter) or "B" + Str(RptRowCounter), the
resulting string is B 5. As a result, Range(B 5).Value is giving me
errors.

How do I avoid the blank in between so that I get B5?

Dim RptName As String
Dim RptRowCounter As Integer
Dim CellRefer As String

RptRowCounter = 5
CellRefer = "B" & Str(RptRowCounter)
RptName = Range(CellRefer).Value

Thanks for your help.
Aswini
 
Excel is pretty nice:
cellrefer = "B" & rptrowcounter

Or you could drop the CellRefer completely:

rptname = cells(rptrowcounter,"B").value

(and you may want to dim RptRowCount as Long--for those large numbered rows)
 
Back
Top