/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

22 votes384 views1 answer
Excel vba check if directory exists
VBA
0 vote271 views1 answer
Vba find sub dictionary
VBA
0 vote291 views1 answer
Excel web scraping
VBA
1 vote269 views1 answer
Excel vba compare 2 rows
VBA
0 vote261 views1 answer
Vba declare 64-bit ptrsafe
VBA
0 vote301 views1 answer
Move bindingnavigator vb
VBA
1 vote264 views1 answer
Excel vba last row of range
VBA
0 vote264 views1 answer
Vba line feed
VBA
0 vote267 views1 answer
Windows Presentation Foundation dark title bar
VBA
1 vote223 views1 answer
Vba exit do while
VBA