/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 vote193 views1 answer
Reset border color textbox vba
VBA
1 vote192 views1 answer
If inputbox cancel vba
VBA
1 vote178 views1 answer
Excel vba last column in range
VBA
0 vote194 views1 answer
Vba array dimensions
VBA
0 vote197 views1 answer
Excel vba convert cells address
VBA
1 vote191 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote198 views1 answer
Thread sleep vb
VBA
0 vote188 views1 answer
Pivot data source not accepting table named range vba
VBA
3 votes177 views1 answer
Excel vba read registry key value
VBA
0 vote177 views1 answer
Add items to combobox vb.net
VBA