Copy data with filter applied using Excel VBA

Question

Using Range, I discovered that. Range and Copy. SpecialCells(xlCellTypeVisible). I'm not sure why copy produces the same outcome; what is the real distinction between the two?

Using the following spreadsheet as a simple illustration (from A1:C6)

 B C
1 1 1
2 2 2
3 3 3
4 4 4
5 5 5

If I filter out 3, then the visible data becomes:

A B C
1 1 1
2 2 2
4 4 4
5 5 5

When I was trying to copy the above data with the filter applied to another range, I tested the following two methods had the same results, which only copied the data with "3" filtered out, but why?

Answer 1

Try this:

Private Sub CommandButton1_Click()
   Dim v As Variant, r As Range, dest As Range
   Set r = Me.Range("A1:C6")  'filtered range to copy
   v = r
   Set dest = Me.Range("D10").Resize(r.Rows.CountLarge, r.Columns.CountLarge)
   dest = v
End Sub