Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel to Word Run-time error 91
Below is part of a larger routine that copies pages from Excel and pastes
them into Word. This is running on numerous PC's with no problems, but on one particular PC I'm getting a Run-Time Error 91, Object variable or with block variable not set, that stops on wdapp.Selection.PasteSpecial. Sub Page1() 'this subrountine prints the first page of the BOE 'select the range Range("A2:N41").Select 'copy the range Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture 'paste the range in word wdapp.Selection.PasteSpecial Link:=False, DataType:=wdPasteEnhancedMetafile, _ Placement:=wdlinline, DisplayAsIcon:=False End Sub Any ideas why it doesn't work on only one P.C? I'm not sure where to start looking since it it set up with the same applications and directory structure as all of the rest. Thanks, Lee |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel to Word Run-time error 91
Lee,
Something to try. 1. Replace the word constants with their numeric value... wdPasteEnhancedMetafile is 9 wdlinline is 0 2. Tell Excel which ranges and selections you referring to as both applications use that terminology... Excel.Range("A2:N41") and Excel.Selection Even better... Excel.Range("A2:N41").CopyPicture Appearance:=Excel.xlScreen, Format:=Excel.xlPicture -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware "Lee" wrote in message Below is part of a larger routine that copies pages from Excel and pastes them into Word. This is running on numerous PC's with no problems, but on one particular PC I'm getting a Run-Time Error 91, Object variable or with block variable not set, that stops on wdapp.Selection.PasteSpecial. Sub Page1() 'this subrountine prints the first page of the BOE 'select the range Range("A2:N41").Select 'copy the range Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture 'paste the range in word wdapp.Selection.PasteSpecial Link:=False, DataType:=wdPasteEnhancedMetafile, _ Placement:=wdlinline, DisplayAsIcon:=False End Sub Any ideas why it doesn't work on only one P.C? I'm not sure where to start looking since it it set up with the same applications and directory structure as all of the rest. Thanks, Lee |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Error while controlling Word from Excel | Excel Programming | |||
error excel if embedded in word documents | Excel Programming | |||
Error using Word object library in Excel (VBA) | Excel Programming | |||
Excel XP error message Run Time Error 91 | Excel Programming |