PNG32 PNG32 PNG32 PNG32
PNG32
Forum Excel, VBA, VSTO, Exceltips, Excelhj�lp PNG32 drivs av Excelspecialisten    Logga in     English
PNG32
PNG32 PNG32
PNG32

Logga in

PNG32

Du är inte inloggad. Logga in eller registrera dig för att skriva inlägg eller svara på inlägg.

För frågor om forumet, kontakta oss på webmaster@excelforum.se

PNG32 PNG32
PNG32 PNG32
PNG32

Excelforum

PNG32

 
ForumForumDiskussionerDiskussionerVBAVBAEn enkel sak för den som kan? En enkel sak för den som kan?
Föregående Föregående
 
Nästa Nästa
Nytt inlägg
 2019-02-26 06:57
 
Jag har 27 olika bilder som jag vill ska infogas i ett excelark beroende på värdet i cell E46.
 
Om värdet i E46 är 1H så ska den välja bilden som heter 1H i den aktuella bildmappen.
Om värdet i E46 är 1V så ska den välja bilden som heter 1V osv.  
 
Går det skriva på ett smart sätt? Som jag skrivit nu så blir det ett väldigt långt VBA... 
 
  If Range("E46").value = "1H" Then
  ActiveSheet.Pictures.Insert("M:\Projekt\1H.jpg").Select
Nytt inlägg
 2019-02-26 07:22
 
 Ändrad av Christian  på 2019-02-26 08:23:50
Hej hej

såhär kan du göra:

DIm fName : fName = activesheet.range("E46") & ".jpg"
Dim fPath: fPath = "M:\Projekt\"

Activesheet.pictures.insert(fPath & fName)

Mvh
Christian
Nytt inlägg
 2019-02-26 08:55
 

 Hej Christian!

Stort stort tack! 

Mvh Josephine 

Föregående Föregående
 
Nästa Nästa
ForumForumDiskussionerDiskussionerVBAVBAEn enkel sak för den som kan? En enkel sak för den som kan?

PNG32 PNG32
Excelforum drivs av Excelspecialisten som bedriver utbildning i Excel och VBA, tillhandahåller support och hjälp med Excel, utvecklar program i Excel. Är ni i behov av en konsult inom Excel, VBA eller VSTO, eller söker en excelkurs, kontakta oss.
Copyright 2013 ExcelSpecialisten XLS AB   Användarvillkor  Personliga uppgifter