ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Copy a spreedsheet (https://www.excelbanter.com/excel-programming/431717-copy-spreedsheet.html)

Sofia Grave[_2_]

Copy a spreedsheet
 
Hej to all.
I am using Excel 2007 SP2.
I have a command button in my spreedsheet to copy a select area.
But when I copy to a word document it copies also the gridlines. To avoid
this I have to remove always the gridlines in excel before pressing the
button.
the button is only
selection.copy.

How can I copy without THE GRID but keeping the grid in the excel
spreedsheet.

In word I make a paste special - windows enchanted file

Thanks for the time.
Sofia grave


joel

Copy a spreedsheet
 
I odn't know if PasteSpecial into word and select Text only will work. If
not try this code

'performing a copy without after/before will create new workbook
set newsht = activesheet.copy
with newsht
'add you code here to delete the gridlines on new worksheet
end with
'kill new workbook
newsht.parent.close savechanges:=false


"Sofia Grave" wrote:

Hej to all.
I am using Excel 2007 SP2.
I have a command button in my spreedsheet to copy a select area.
But when I copy to a word document it copies also the gridlines. To avoid
this I have to remove always the gridlines in excel before pressing the
button.
the button is only
selection.copy.

How can I copy without THE GRID but keeping the grid in the excel
spreedsheet.

In word I make a paste special - windows enchanted file

Thanks for the time.
Sofia grave



John

Copy a spreedsheet
 
I am no expect copying data from Excel to word but in a quick play, I came up
with this - see if it gives you some ideas.

Hope helpful

Sub ExcelWord()
' requires a reference to the Word Object library:
' in the VBE select Tools, References and check the
' Microsoft Word X.X object library

Dim appWord As Word.Application

Set appWord = New Word.Application

appWord.Visible = True

Range("D6:G10").Copy

appWord.Documents.Add.Content.PasteSpecial Link:=False, _
DataType:=wdPasteText, _
Placement:=wdInLine, _
DisplayAsIcon:=False

Application.CutCopyMode = False

Set appWord = Nothing

End Sub
--
jb


"Sofia Grave" wrote:

Hej to all.
I am using Excel 2007 SP2.
I have a command button in my spreedsheet to copy a select area.
But when I copy to a word document it copies also the gridlines. To avoid
this I have to remove always the gridlines in excel before pressing the
button.
the button is only
selection.copy.

How can I copy without THE GRID but keeping the grid in the excel
spreedsheet.

In word I make a paste special - windows enchanted file

Thanks for the time.
Sofia grave




All times are GMT +1. The time now is 09:50 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com