/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 vote212 views1 answer
Vba userform textbox wrap text
VBA
2 votes162 views1 answer
Vba uppercase first letter of each word
VBA
0 vote178 views2 answers
Vba remove line breaks
VBA
1 vote175 views1 answer
How to check is the value enterd is a number or text in vba
VBA
-1 vote193 views1 answer
Code for reading letters only in vb 6
VBA
3 votes181 views1 answer
Vba double quote
VBA
3 votes207 views2 answers
Vba date to string
VBA
0 vote163 views1 answer
Change whcih control a user has selected vb
VBA
4 votes183 views1 answer
Excel vba Imitating the "IN" operator from python
VBA
0 vote172 views1 answer
Vba collection key list
VBA