Avatar billede bluwduch Nybegynder
09. september 2003 - 14:58 Der er 8 kommentarer

Makro der indsætter billede i textbox

Hejsa

Jeg har en textbox med et bookmark på. Via en makro skal jeg så vælge denne textbox via dets bookmark, og indsætte et billede i den - Dette billede skal dog også resizes til en anden størrelse.

Bookmarket hedder MitLogo og billedet hedder bare billede.gif - Hvordan gør man dette?

Mvh
Daniel-San
Avatar billede thor.ostergaard Nybegynder
09. september 2003 - 15:11 #1
Du kan bruge
  ActiveDocument.Shapes(1).Select
Den skrifter til textboxen, hvis det er den første du har oprettet - du kan prøve dig lidt frem.
Læs mere om Word VBA her:
http://www.kursusmaterialer.dk/Word%20VBA/Velkommen/Intro.aspx
Avatar billede bluwduch Nybegynder
09. september 2003 - 15:18 #2
Det er nok liiige generelt nok, det der :-)
Avatar billede thor.ostergaard Nybegynder
09. september 2003 - 16:31 #3
ok
Sub IndsaetBillede()
  ActiveDocument.Shapes(1).Select
  Selection.GoTo What:=wdGoToBookMark, Name:="MitLogo"
  Selection.InlineShapes.AddPicture FileName:= _
        "billede.gif" _
        , LinkToFile:=False, SaveWithDocument:=True
End sub

Denne makro vil ikke skalere billedet - hvilket jeg også vil foreslå at du klarer i et billedbehandlingsprogram i stedet.
Avatar billede bluwduch Nybegynder
09. september 2003 - 17:12 #4
Billedet er i et heftigt format, så det gør ikke noget det resizes. Dog skal man da et eller andet sted kunne angive en standard størrelse eller hvad?
Avatar billede thor.ostergaard Nybegynder
09. september 2003 - 18:47 #5
Jo - det kunne man godt bygge, men hvorfor bruger du ikke et billedbehandlingsprogram til at sørge for at billedfilen har den rigtige størrelse på forhånd?
Så slipper du også for at distribuere en kæmpebillede med dine dokumenter.
Avatar billede bluwduch Nybegynder
09. september 2003 - 19:21 #6
Godt spørgsmål :-)

Det vil jeg kigge nærmere på... Men nu vi er i gang, hvordan ændrer man så det omtalte?
Avatar billede thor.ostergaard Nybegynder
09. september 2003 - 19:40 #7
Det ser sådan her ud
  ActiveDocument.InlineShapes(1).ScaleHeight = 20
  ActiveDocument.InlineShapes(1).ScaleWidth = 20
Men jeg kan ikke lige se, at man kan skalere et billede, der står inde i en teksboks.
Avatar billede bluwduch Nybegynder
09. september 2003 - 19:44 #8
Ellers kan man måske lægge billedet ind, og så prøve at optage en makro der gør det, og så se hvad den laver :-). Det må jeg lige prøve!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Tag et kursus i Word og øg effektiviteten

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester