» »

Problem z macrotom v Wordu

Problem z macrotom v Wordu

vidi ::

Mam problem z Macrotom v Wordu.

Želim ustvariti macro, ki bo dodal sliko, ki bo "behind text". Zadeva deluje približno tako, da ko začnem recordat macro, lahko lepo dam insert picture from file, prtisnem control+back (jo označim) - mi celo računalnik odpre picture toolbar, da bi kao lahko urejal sliko, vendar ne morem zbrati nobenih opcij (vse je svetlo sivo) - ne morm izbrat, da bi bila slika behind text. Običajno to deluje, vendar ne pri snemanju macrota.

Končna zadeva, če zaženem macro zgleda tako, da mi sliko importira in označi in to je to.

Macro pa zgleda takole:
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 9.12.2005 by XYZ
'
Selection.InlineShapes.AddPicture FileName:= _
"\\SERVER\Users\XYZ\My Documents\My Pictures\2005-12-08\Scan10002.JPG", _
LinkToFile:=False, SaveWithDocument:=True
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
End Sub

Ali imate kakšne ideje, kako bi to zadevo čimelegantneje speljal.
Prodajam bučke!
Dej kup si liziko!

darkolord ::

Dim slika As InlineShape
Dim tmpSlika As Shape
Set slika = Selection.InlineShapes.AddPicture("F:\My Documents\My Pictures\sample.jpg")
Set tmpSlika = slika.ConvertToShape
tmpSlika.ZOrder msoSendBehindText

Set slika = Nothing
Set tmpSlika = Nothing

vidi ::

Hvala 100x!

Mam pa še eno vprašanje. Če se nahajam na začetku teksta in to pritisnem, potem zadeva deluje, če pa se nahajam nekje vmes mi pa dostikrat ne deluje in v Microsoft Visual Basic oknu napiše tole zadevo:

Run-time error '-2147467259 (80004005)':
Method 'ConvertToShape' of object 'InlineShape' failed
Prodajam bučke!
Dej kup si liziko!


Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Programiranje problem android

Oddelek: Programiranje
51103 (868) g333kk
»

Word 2003 VBA problem

Oddelek: Programska oprema
10973 (860) mimax
»

Ms word in funkcija branje

Oddelek: Programska oprema
91278 (1278) Blond
»

[Excel] problem z makrojem, visual basic (strani: 1 2 )

Oddelek: Programiranje
585434 (4897) steev
»

[VBA Excel]

Oddelek: Programiranje
81090 (1024) Muzo

Več podobnih tem