/VBA/Excel vba copy values range to another range

Excel vba copy values range to another range

Sub TransferValuesOnly()
  	Worksheets("Sheet1").Range("A1:Z100").Copy
	'PasteSpecial Values Only
  	Worksheets("Sheet2").Range("A1").PasteSpecial Paste:=xlPasteValues
	'Clear Clipboard (removes "marching ants" around your original data set)
  	Application.CutCopyMode = False
End Sub

Source: thespreadsheetguru.com

Excel vba copy range with filter

Sub ExtractVisibleCells()

    Dim wsSource, wsExtract As Worksheet

    Set wsSource = ThisWorkbook.Sheets("Source Data")
    Set wsExtract = ThisWorkbook.Sheets("Filtered")

    wsSource.Range("A1:A10").SpecialCells(xlCellTypeVisible).Copy
    wsExtract.Cells(1, 1).PasteSpecial

End Sub

Similar codes

0 vote326 views1 answer
Vba exit while
VBA
0 vote361 views2 answers
Excel vba number format file size
VBA
0 vote336 views1 answer
Vba check if class implements interface
VBA
1 vote322 views1 answer
Excel vba close form escape key
VBA
9 votes479 views2 answers
Excel vba convert 2 Short integers to a Long integer
VBA
0 vote335 views1 answer
Vba change named range address
VBA
0 vote339 views1 answer
How to extract a file from an ISO:
VBA
0 vote346 views1 answer
Vba test optional argument
VBA
0 vote349 views1 answer
Add text to combobox drop down vb
VBA
0 vote341 views1 answer
Vba leading zeros in string
VBA