Questione : Come fa la posizione di I una tela di canapa dell'illustrazione in MS Word 2010

Ho avuto una macro nella parola 2007 che ha fatto uscire un'illustrazione particolare dietro la mia pagina. La stessa macro in 2010 ha ristretto l'illustrazione e posizionato l'angolo di sinistra superiore circa un pollice fuori del codice reale di page.

My è sotto. Ho aggiunto nelle linee d'ancoraggio, ma non stanno cambiando anything.
 class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
shpCanvas notpretty del >Dim " del class= " " di codeSnippet801745 del id= del
class= del

Risposta : Come fa la posizione di I una tela di canapa dell'illustrazione in MS Word 2010

Oops. Qui è il codice.
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 secondario ()
    Documento fioco come Word.Document
    SH fioco come figura
    PicFile fioco come stringa
    Rng fioco come gamma
    
    Application.ScreenUpdating = falso
        Regolar documento = ActiveDocument
        Regolare il rng = il documento. Paragrafi (1).Range
        PicFile = “J:\My Pictures\Al\DSCF1882.jpg„
        SH stabilito = documento. Shapes.AddPicture (PicFile, falso, allineare, rng)
        Con SH
            .RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
            .RelativeVerticalPosition = wdRelativeVerticalPositionPage
            .LockAspectRatio = allineano
            . Parte di sinistra = 0
            . Parte superiore = 0
            . Larghezza = rng.PageSetup.PageWidth
            .WrapFormat.Type = wdWrapBehind
            . Nome = “foto 1.jpg di David Bailey„
        Estremità con
    Application.ScreenUpdating = allineano

Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us