Microsoft Recorder Needs to go on a Diet!

Originally Posted by AlvaroSiza

...Continuing from above, it could look something like this:

Sub RngToRngValueExample()

Dim rngSource As Range
Dim lngColCount As Long

   Set rngSource = Range("B11:L11")
   lngColCount = rngSource.Columns.Count

   Range("AO57").Resize(1, lngColCount).Value = rngSource.Value

End Sub

No copying, no pasting...

Ok, but the point is that I want B11 to be the only thing copied over, Or is that what the re size does is take out all the other fields so it only copies over a single cell instead of multiple?