visuaalinen Excel-arkisto

visuaalihakija

Aikeissani olisi perustaa pienen ryhmän käyttöön "visuaalinen Excel-arkisto".
Itse arkisto hakusanoineen perustuu siis perus-Excelille, mutta "visuaalisen puolen" toteutus tulisi olemaan Excelin Kommenttikentän varassa. Tarkemmin, jos joku etsii esim. "pääteholkki" -hakusanaa, näytettäisiin solua, jonka Kommenttikenttään olisi dokumentoitu tarkemmat tiedot pääteholkista/-holkeista, sekä lisäksi kuvat niistä.
Eli, miten upotan Kommenttikenttään kuvan tai kuvia? tämä tieto riittäisi toistaiseksi.
Kiitos!

9

274

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • pääsy

      Suosittelen tuohon käyttöön esim. Accessia.

      • visuaalihakija

        Joo, tuokin on käväissyt mielessäni, mutta en ole Accessiin perehtynyt, eli Exceli olisi luontevampi, kun sitä hallitsen paremmin.

    • Sammapåhär
      • visuaalihakija

        Hei, tänks, tällä sain kuvan Kommenttikenttään! Hyvä juttu. Vielä olisi tarpeen pieni yksityiskohta, eli miten saan kuvan yläpuolelle tyhjän alueen tekstille, eli tässä tapauksessa niille kommenteille? Nyt teksti ja kuva on samalla alueella, eli teksti sekoittuu kuvaan.

        Lueskelin lisää, siellä oli Kunden juttu, mitä lisäarvoa tällä koodilla saa? Ihan mielenkiinnosta utelen, ennen kuin kokeilen.

        kunde
        4.6.2010 6:41

        taulukon moduuliin...
        muuta kuvien polku ja tiedostotyyppi sekä kuvan koko sopivaksi
        nyt lisää kuvat sarakkeen A soluihin

        Private Sub Worksheet_Change(ByVal Target As Range)
        On Error Resume Next
        If Not Intersect(Target, Range("A:A")) Is Nothing Then
        If Not Target.Comment Is Nothing Then
        Target.Comment.Delete
        End If
        Target.AddComment
        Target.Comment.Shape.Fill.UserPicture "C:\" & Target & ".jpg"
        Target.Comment.Shape.Height = 200
        Target.Comment.Shape.Width = 200
        End If
        End Sub

    • Sammapåhär

      Koetin löytää netistä, onnistuuko kuvan ja tekstin erottaminen, mutta en löytynyt. Paras ehdotus minkä löysin, oli että alkuperäiseen kuvaan tehdään jo valmiiksi tekstilaatikko, vaikka kuvan ylälaitaan johon sitten jäisi kommenttiteksti näkyviin tai kirjoitetaan jo valmiiksi siihen haluttu teksti ja poistetaan kommenttiteksti kokonaan.

      • visuaalihakija

        Joo tänks, mietin itsekin jotain tekstilaatikkoa, mutta luulen, että toteutan tekstin vain eri värisellä hyvin erottuvalla värillä -toistaiseksi.

    • Kundepuu

      Tee lista missä 3 saraketta
      Tuote, kuvaus ja kuvan nimi
      Tee sitten haku kuvaukselle ja liitä se sitten kommenttiin samoin kuin kuvan nimikin ( ei tehty koodiin nyt)
      helppo fiksata tosta...

      Private Sub Worksheet_Change(ByVal Target As Range)
      On Error Resume Next
      If Not Intersect(Target, Range("A:A")) Is Nothing Then
      If Not Target.Comment Is Nothing Then
      Target.Comment.Delete
      End If
      Target.AddComment
      With Target.Comment.Shape.TextFrame.Characters.Font
      .ColorIndex = 3
      .Size = 12
      .Name = "Arial Black"
      End With
      ' tähän tuotteen kuvaustiedot haun tuloksella
      Target.Comment.Text Text:="Tietoja:" & Chr(10) & "Pultin pituus 100 mm" & Chr(10) & "halkaisija 8 mm"
      ' tähän lisäkoodi kuvienhaulle tai sitten teet alsvetovalikon tuotteille ja käytät sitä kuvienlähteenä, jolloin ei tarvitse lisätä mitään...
      Target.Comment.Shape.Fill.UserPicture "C:\" & Target.Text & ".jpg"
      Target.Comment.Shape.Height = 400
      Target.Comment.Shape.Width = 400
      End If
      End Sub

      Keep EXCEling
      @Kunde

      • visuaalihakija

        Hei kiitos Kundepuu, pitää tutustua tuohonkin.
        Palaan kommentoimaan, jos vaikuttaa toimivalta.

    • MitenOlisiFormi

      Ei pompsahda esille yhtä näppärästi kuin kommentti, mutta saisi näytettyä aika vapaasti sekä kuvia että tekstiä.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Nurmossa kuoli 2 Lasta..

      Autokolarissa. Näin kertovat iltapäivälehdet juuri nyt. 22.11. Ja aina ennen Joulua näitä tulee. . .
      Seinäjoki
      180
      10380

    2. Joel Harkimo seuraa Martina Aitolehden jalanjälkiä!

      Oho, aikamoinen yllätys, että Joel Jolle Harkimo on lähtenyt Iholla-ohjelmaan. Tässähän hän seuraa mm. Martina Aitolehde
      Suomalaiset julkkikset
      52
      3555

    3. Kaksi lasta kuoli kolarissa Seinäjoella. Tutkitaan rikoksena

      Henkilöautossa matkustaneet kaksi lasta ovat kuolleet kolarissa Seinäjoella. Kolmas lapsi on vakasti loukkaantunut ja
      Maailman menoa
      54
      3301

    4. Et olisi piilossa enää

      Vaan tulisit esiin.
      Ikävä
      64
      2875

    5. Miksi pankkitunnuksilla kaikkialle

      Miksi rahaliikenteen palveluiden tunnukset vaaditaan miltei kaikkeen yleiseen asiointiin Suomessa? Kenen etu on se, että
      Maailman menoa
      207
      2243

    6. Miten meinasit

      Suhtautua minuun kun taas kohdataan?
      Ikävä
      116
      2203

    7. Sinä saat minut kuohuksiin

      Pitäisiköhän meidän naida? Mielestäni pitäisi . Tämä värinä ja jännite meidän välillä alkaa olla sietämätöntä. Haluai
      Tunteet
      25
      2033

    8. Minä en ala kenenkään perässä juoksemaan

      Voin jopa rakastaa sinua ja kääntää silti tunteeni pois. Tunteetkin hälvenevät aikanaan, poissa silmistä poissa mielestä
      Ikävä
      67
      1638

    9. Loukkaantunut lapsi on yhä kriittisessä tilassa

      Seinäjoella Pohjan valtatiellä perjantaina sattuneessa liikenneonnettomuudessa loukkaantunut lapsi on yhä kriittisessä t
      Kauhava
      22
      1456

    10. Tunnekylmä olet

      En ole tyytyväinen käytökseesi et osannut kommunikoida. Se on huono piirre ihmisessä että ei osaa katua aiheuttamaansa p
      Ikävä
      112
      1386
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt