/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 vote388 views1 answer
Set datetimepicker value to null vb
VBA
1 vote350 views1 answer
Highlight selected cell in excel vba
VBA
0 vote340 views1 answer
Returns an array from function vba
VBA
5 votes373 views1 answer
Excel vba low byte from INTEGER
VBA
0 vote343 views1 answer
Open application from vbnet
VBA
0 vote341 views1 answer
Excel vba populate array with cell values
VBA
0 vote354 views1 answer
Remove first character from string vb
VBA
0 vote376 views1 answer
How to mount floppy disks in vb.net
VBA
0 vote318 views1 answer
Vba set vs dim
VBA
0 vote382 views3 answers
Write to text file vb.net
VBA