Hi Currently using the following vba to copy from one workbook to another, however, this copies with no text formatting.
Some of the text is grey, red or blue and I need to copy that over. But not copying the cell Fill format.
Had a search with no luck. Help appreciated.
Some of the text is grey, red or blue and I need to copy that over. But not copying the cell Fill format.
Had a search with no luck. Help appreciated.
Code:
Sub Copy_Abstract_Grid()
'
' Copy_Abstract_Grid Macro
'
'
Sheets("ABSTRACT GRID").Select
Cells.Select
Selection.Copy
Sheets("ABSTRACT GRID FILE TRANSFER").Select
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub