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?
3
418
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
Olet toisen kanssa
...ja minä yhä vain sinua kaipaan. Tiedän ettet ole onnellinen siellä. Älä hukkaa aitoa onnea ja rakkautta hukkaan vain2531810- 391656
Immu otti pataan
Olen pettynyt, hänen piti viedä Stagalaa kuin litran mittaa - mutta kuinka kävikään? Voi hemmetti sentään.... Ääääääh!951553Kuka teistä on paras nainen
A-nainen? J-nainen? K-nainen? M-nainen? S-nainen? Vai kenties joku muu...? 😊631379Osaako joku selittää tätä
Että miksi mulle on joka toinen ventovieras ihminen tyly ainakin ilmeillään ja eleillään?791264- 781244
Jos me joskus nähtäisiin
niin ei kai sen vielä tarvitsisi merkitä sen enempää? Ja voihan olla ettei kumpikaan enää siinä vaiheessa edes haluaisi1031213- 541048
Persun suusta:"Köyhät on luusereita ja ansaitsevat köyhyyden"
Ministeri Juuston apulainen näin uhoaa. Mitäs siinä. Kyllä on jo tiedetty muutaman vuoden hallitustyön pohjalta että per1991031Näetkö feminismin uhkana
Vai mahdollisuutena kun deittailet naisia? Mitä miehet mieltä feminismistä?160939