/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

1 vote313 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
2 votes301 views1 answer
Excel vba date to string conversion
VBA
6 votes343 views1 answer
Excel vba check if a string only contains letters
VBA
3 votes323 views2 answers
Vba active workbook path
VBA
0 vote335 views1 answer
Vbnet revrese the order of character in string
VBA
5 votes350 views1 answer
Excel vba low word from Long Integer
VBA
0 vote317 views1 answer
Excel vba ternary
VBA
7 votes348 views1 answer
Excerl vba array to range
VBA
8 votes416 views1 answer
Excel vba make word
VBA
0 vote296 views1 answer
Vb streamreader
VBA