Taulukoissa on n. 200 kuvaa (logoja yms) lisättynä aikojen saatossa, haluaisin saada makrolla luettelon kuvista.
Mallia: kuva1.jpeg, kuva2.mikä_pääte_sattuukin_olemaan
Kuvan nimihän voi olla mikä sattuu.(ja näkyy olevankin)
Olen yrittänyt löytää vinkkiä googlella, ilman mainittavia tuloksia..aikaa kuluu, järki menee.
Sattuuko kenelläkään olemaan vinkkiä asiasta?
excelin kuvat+luettelo?
hyon
3
429
Vastaukset
- Excelisti
Käsittääkseni Excelin laskentataulukkoon upotettu kuva ei säilytä missään alkuperäistä nimeään. Olenko väärässä? Mistä sinä näet taulukkoon upetetun kuvan alkuperäisen nimen?
Sorry, että ei ole aikaa vastailla kuin hätäisesti.
Nimiruudullahan se nimi näkyy...
Tossa makro, josta voit säveltää tai toiset jeesata. Sinun tapauksessa et varmaan ole nimennyt kuvia liittäessäsi niitä- eli nimet on tyyliin kuva1, kuva2 jne.
Option Explicit
Sub Testi()
Dim kuva As Picture
Dim solu As Range
Set solu = Range("b3")
Set kuva = ActiveSheet.Pictures.Insert("c:\kunde\kunde.bmp")
With kuva
.Top = solu.Top
.Left = solu.Left
.Name = "kunde.bmp"
.OnAction = "Nimi"
End With
End Sub
Sub Nimi()
MsgBox "Klikkasit kuvaa " & Application.Caller
End Sub- hyon
kunde kirjoitti:
Sorry, että ei ole aikaa vastailla kuin hätäisesti.
Nimiruudullahan se nimi näkyy...
Tossa makro, josta voit säveltää tai toiset jeesata. Sinun tapauksessa et varmaan ole nimennyt kuvia liittäessäsi niitä- eli nimet on tyyliin kuva1, kuva2 jne.
Option Explicit
Sub Testi()
Dim kuva As Picture
Dim solu As Range
Set solu = Range("b3")
Set kuva = ActiveSheet.Pictures.Insert("c:\kunde\kunde.bmp")
With kuva
.Top = solu.Top
.Left = solu.Left
.Name = "kunde.bmp"
.OnAction = "Nimi"
End With
End Sub
Sub Nimi()
MsgBox "Klikkasit kuvaa " & Application.Caller
End SubKiitos avusta, kokeilen säveltää kun kiireiltä ehdin.(Työnteko haittaa harrastuksia jne..)
>>et varmaan ole nimennyt kuvia liittäessäsi niitä>>
En tosiaan ole nimennyt kuvia.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
SDP jo 100 % suositumpi kuin persut
Kertoo Hesarin uusin kannatuskysely. Demareiden kannatus on miltei tuplat verrattuna persuihinl. Suomen kansa ei selväst29514672Valtavasti suomalaisia asunnottomina, mutta ei yhtään somalia
tai muuta kehitysmaalaista. Mites tässä näin kävi? Tiedän hyvin, että esim. somaleita lentää ulos mm. Hekan asunnoista,1784250PS ylivoimainen nousija myös HS:n gallupissa, SDP laskee taas
https://www.verkkouutiset.fi/a/hs-gallup-sdpn-suosio-laskee-ps-nousussa/#0a7d2507 Ylivoimainen viime kuukausien nousija1363903Totuuspuolueen johtaja Jaana "prinsessa Leia" Kavonius on vangittu
Kavonius määrättiin jo keväällä 2024 poissaolevana vangittavaksi todennäköisin syin epäiltynä 13 vainoamisesta ja 24 kun4521881Kovia syytöksiä Stefan Thermaninsta.
Jättänyt taas maksamatta kohuliikemies, hupparit ja muita ostamiaan tavaroita. On soiteltu liikkeestä ja Stefan iskenyt1861875En minä kyllä enää odota sinua
Olet siellä sen harmaan kanssa. Niin, annoit minun nähdä lämpimät tunteesi siitä huolimatta. Se merkitsi kyllä paljon. O351756Jos joku luulee että kaikki käy
Sanon vain tämän. Minun kanssani ei neuvotella. Minun kanssani eletään tasavertaisesti. Jos se on liikaa, niin ovi rinn521385Joka kolmas työtön on työkyvytön
Viime vuonna työnhakuvelvoitteen ulkopuolella oli noin kolmannes työttömistä työnhakijoista. Huhheijaa, mihin suomalais1531247Sakin hivutus - ilmiö
Miten tuollainen tuollainen ilmiö kuin ”sakin hivutus” syntyy? Mitä syitä ilmiön syntymiseen tarvitaan? Onko sakissa jok661163Ei ole rohkeutta tulla jututtamaan
Voidaan me nähdä ja tervehtiä, sitäkin harvoin, mutta iso kynnys on edes mennä lähelle ja kysyä kuulumisia. Ymmärrät var81161