Indsætte billeder automatisk
Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=53
Udskrevet den: 23.Nov.2024 kl. 12:48
Emne: Indsætte billeder automatisk
Besked fra: jsp56
Emne: Indsætte billeder automatisk
Posteringsdato: 15.Jul.2010 kl. 11:16
|
Jeg har et projekt, hvor jeg har brug for at kunne indsætte billeder (og skalere disse) automatisk. I rket har jeg en kolonne med varenumre, f.eks:
01.221 01.222
AC222100
osv.
Det jeg efterlyser er en fuktion, der automatisk kan hente og indsætte billede i kolonne ved siden af (og skalere disse)
Billederne hedder f.eks.:
01.221.jpg
01.222.jpg
AC222100.jpg
Er det nemt at lave?
På forhånd 1000 tak.
Hilsen Jørgen
|
Svar:
Besked fra: Allan
Posteringsdato: 16.Jul.2010 kl. 09:44
|
Hej Jørgen,
Har dine billeder samme størrelse som en celle, eller skal den spredes over x celler i højden og x celler i bredden?
//Allan
|
Besked fra: jsp56
Posteringsdato: 19.Jul.2010 kl. 13:07
|
Hej Allan,
alle billeder skal skaleres til samme størrelse f.eks. 12 mm høj og 20 mm bred, og dvs. cellestørrelsen skal være fast, f.eks. rækkehøjde = 35 kolonnebredde = 10.
|
Besked fra: Allan
Posteringsdato: 09.Aug.2010 kl. 11:30
|
Hej Jørgen,
Til inspiration, kan du hente denne fil: /uploads/1/hent_billede.xls - uploads/1/hent_billede.xls
Hvis du taster et filnavn i kolonnen A, f.eks. C:\test.jpg
Vil Excel automatisk placere billedet og skalere det til cellen i B kolonnen.
Er vi på vej den rette vej?
Jeg kan nemt lave så du ikke skal taste C:\ hver gang, ved i stedet bruge en fast sti.
Hvad siger du?
//Allan
|
Besked fra: jsp56
Posteringsdato: 09.Aug.2010 kl. 12:54
|
Hej Allan, du er bestemt inde på noget af det rigtige....
 Tusind tak for det!
Jeg har billederne til at ligge på et drev, der hedder R:\
så hvis du kunne ændre stien fast til det, så vil jeg være glad.
Kan det lade sig gøre at lave filekstensionen til .jpg fast (så dette heller ikke skal indtastes).
Og, nu håber jeg ikke, at jeg strammer skruen for meget, men vil det kunne lade sig gøre at lave et script, der kan køres efter man har indtastet (eller kopieret) en række numre ind i arket?
Håber ikke det var for stor en mundfuld.
Hilsen Jørgen
|
Besked fra: Allan
Posteringsdato: 09.Aug.2010 kl. 15:20
|
Hej igen,
Standard placering er nu sat til R:\
Filtypen er sat til .jpg
Arket er forsynet med en knap, som opdaterer alle billeder i arket.
I øjeblikket er arket begrænset til 20 rækker, men kan selvfølgelig udvides uden problemer.
Hent det her: /uploads/1/hent_billede_2.xls - uploads/1/hent_billede_2.xls
Jeg ved ikke om du er bekendt med VBA, men du kan nu justere de variable indstillinger i modulet PrgCode:
Public Const DefExtention = ".jpg"
Public Const DefLocation = "R:\" Public Const IndtastningsKolonneBogstav = "A" Public Const IndtastningsKolonnenr = 1 Public Const IndtastningsStartRaekke = 2 Public Const IndtastningsSlutRaekke = 20 Derved kan du passe det ind i dit eget ark hvis du har brug for det.
//Allan
|
Besked fra: jsp56
Posteringsdato: 10.Aug.2010 kl. 13:54
|
Hej Allan,
det er bare super. 100 tak for hjælpen!
Jørgen
|
Besked fra: Allan
Posteringsdato: 10.Aug.2010 kl. 15:08
|
Velbekomme Jørgen, kom endelig tilbage en anden gang //Allan
|