Pergunta : Como faz a posição de I uma lona do desenho em MS Word 2010

Eu tive um macro na palavra 2007 que despejou um desenho particular atrás de minha página. O mesmo macro em 2010 encolheu o desenho, e posicionado o canto esquerdo superior aproximadamente uma polegada fora do código real de page.

My está abaixo. Eu adicionei nas linhas de ancoragem, mas não estão mudando anything.
 class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
1:
2:
3:
4:
5:
6:
7:
8:
9:
shpCanvas notpretty do >Dim " do class= " de " codeSnippet801745 do id= do
class= do

Resposta : Como faz a posição de I uma lona do desenho em MS Word 2010

Oops. Está aqui o código.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

InsertPicture secundário ()
    Doc não ofuscante como Word.Document
    Sh não ofuscante como a forma
    PicFile não ofuscante como a corda
    Rng não ofuscante como a escala
    
    Application.ScreenUpdating = falso
        Ajustar doc = ActiveDocument
        Ajustar o rng = o doc. Parágrafos (1). Escala
        PicFile = “J:\My Pictures\Al\DSCF1882.jpg”
        Sh ajustado = doc. Shapes.AddPicture (PicFile, falso, verdadeiro, rng)
        Com Sh
            .RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
            .RelativeVerticalPosition = wdRelativeVerticalPositionPage
            .LockAspectRatio = retificam
            . Esquerda = 0
            . Parte superior = 0
            . Largura = rng.PageSetup.PageWidth
            .WrapFormat.Type = wdWrapBehind
            . Nome = de “foto 1.jpg David Bailey”
        Extremidade com
    Application.ScreenUpdating = retificam

Submarino da extremidade
Outras soluções  
 
programming4us programming4us