Avatar billede larsmobil Nybegynder
26. maj 2011 - 17:39 Der er 7 kommentarer og
2 løsninger

billeder i ark (varekatalog)

En celle (A1) giver en specifik værdi. Alt afhængig af værdien skal der til højre vises et tilhørende billede.

F.eks. Hvis celle A1 = 210555 så skal billede 210555 vises.


Hvordan gør jeg det? er det lidt på samme måde eller ?

skal bruges til et varekatalog
Avatar billede vejmand Juniormester
26. maj 2011 - 17:42 #1
Avatar billede larsmobil Nybegynder
26. maj 2011 - 18:32 #2
ja og nej

virker ikke helt i 2007 + 2010
Sub Makro1()
On Error Resume Next
For Each c In Range("A10:A12").Cells
c.Offset(0, 1).Select
ActiveSheet.Pictures.Insert("F:\Billeder\1-10-Januar\" & c.Value).Select
Next c
End Sub


+ vil gerne have str på billeder ens er det mulig ?
Avatar billede vejmand Juniormester
26. maj 2011 - 18:44 #3
Jeg ved ikke noget om makro, så det kan jeg desværre ikke hjælpe dig med.

Med hensyn til billede størrelse, ville det så ikke være bedre at lave alle billeder til rigtig størrelse i den mappe du henter fra?
Avatar billede panebb Novice
27. maj 2011 - 08:28 #4
du kan downloade en billed resizer her:
http://www.mihov.com/eng/#ir

simpelt program, men effektivt.
marker alle dine billeder -vælg ny størrelse - udfør
---------------
EXCELENT har lavet denne kode til mig en gang. Virker perfekt til at hente billeder, som du efterspørger i ver2007: Prøv at rette den til :-)

Sub worksheet_change(ByVal Target As Range)
If Intersect(Target, Range("AF19,AF32,AF45,AF58,AF71,AF84,AF97,AF110,AF123,AF136,AF149,AF162,AF175,AF188,AF201,AF214,AF227,AF240,AF253,AF266,AF279,AF292,AF305,AF318")) Is Nothing Then Exit Sub
On Error GoTo ud
Application.EnableEvents = False
rk = Mid(Target.Value, 15, 3) * 13 + 9
Sheets("pro").Range("A" & rk & ":AF" & rk + 12).Copy Cells(Target.Row + 1, 1)
ud:
Application.EnableEvents = True
End Sub
Avatar billede larsmobil Nybegynder
13. juni 2011 - 13:36 #5
uf der faldt jeg af, makro er ikke min side

findes der en formel til celler ?
Avatar billede larsmobil Nybegynder
30. august 2012 - 09:22 #6
skrive du et svar ? så du kan point..

det glemte vi vist :)
Avatar billede vejmand Juniormester
30. august 2012 - 10:55 #7
Ved ikke om det er mig du mener, eller måske os begge?
Avatar billede panebb Novice
30. august 2012 - 11:06 #8
Fik du løst din opgave?
Avatar billede larsmobil Nybegynder
30. august 2012 - 11:16 #9
jep
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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