title: Concatenate a range with a single value
body: <p>I'm trying to Concatenate a range with a single value.</p>
  
  <pre><code>Sub Macro1()
       Dim rngOne As Range, strngOne as String, combos As Range
  
       'finds the last row and sets it as the ending range
       Dim LastRowColC As Integer
       LastRowColC = Range("C65536").End(xlUp).Row
  
       Set rngOne = Worksheets(1).Range("C3" &amp; LastRowColC)
       strngOne = "00000"
       combos = rngOne &amp; strngOne
  
       Range("D3").Select
       Insert combos
  End Sub
  </code></pre>
  
  <p>Why does this not insert the variable "combos" into the cell?  </p>
  
  <p><strong>More Explanation (Copied from comments)</strong></p>
  
  <p>Basically I want to take the values in each Cell of column C and add 00000 to the end of all of them. so if C1 was 50 I want the end result to copy over the 50 and replace C1 with 5000000, if C2 was 575 then replace that with 57500000, all throughout the range of data in C. </p>
  
  <p>I would prefer to have it paste over the values in the same column, if that isn't possible. Then for the example you gave I'd want D1= AAA00000, D2=BBB00000, D3 =CCC00000, etc              </p>