Alasvetovalikko muutettavalla kohdesolulla

Markus R

Tarttisin tällaisen:
Alasvetovalikon tiedot ovat soluissa A1:A20. Valikon oltava yhden rivin korkuinen, mutta sitä klikatessa näkyviin tulee 8 riviä. Kaikki vaihtoehdot eivät siis näy, vaan tarvitaan vielä vierityspalkki. Valinnan tehtyä klikkaamalla valikko palautuu yhden rivin korkuiseksi ja valinta (tai sen järj.nro) tallentuu kohdesoluun. Kohdesolu on aktiivisena olevan rivin ja sarake 5 mukainen solu. (Eli se rivi joka oli klikattuna ennen alasvetovalikon käyttöä.)

Osaako joku auttaa?

5

978

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      taulukon moduuliin...

      Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      ComboBox1.LinkedCell = Cells(Target.Row, 5).Address
      End Sub

      jaa noi muut jutut taitaakin olla ominaisuuksien oletusjuttuja
      ListRows=8

      • Kelpoisuustarkistus

        saman asian ilman makroa. Eli:
        Valitse solu(t) johon haluat kelpoisuustarkistuksen ja mene Tiedot - Kelpoisuustarkistus ja Asetukset-välilehdeltä "Hyväksy"-alasvetovalikosta valitse "Luettelo" ja Lähde kohtaan annat solut josta löytyy nuo 20 arvoa (esim. A1:A20)ja OK.
        Nyt kun klikkaat solua johon asensit tuon kelpoisuustarkistuksen ilmestyy nuoli jota klikkaamalla avautuu valikko josta voit valita haluamasi arvon soluun.

      • kunde
        Kelpoisuustarkistus kirjoitti:

        saman asian ilman makroa. Eli:
        Valitse solu(t) johon haluat kelpoisuustarkistuksen ja mene Tiedot - Kelpoisuustarkistus ja Asetukset-välilehdeltä "Hyväksy"-alasvetovalikosta valitse "Luettelo" ja Lähde kohtaan annat solut josta löytyy nuo 20 arvoa (esim. A1:A20)ja OK.
        Nyt kun klikkaat solua johon asensit tuon kelpoisuustarkistuksen ilmestyy nuoli jota klikkaamalla avautuu valikko josta voit valita haluamasi arvon soluun.

        ei kyllä tuota voi tehdä. Toi kelpoisuusehto toimii, jos laitat joka soluun kelpoisuusehdon, mutta kun pyydettiin...

        "Kohdesolu on aktiivisena olevan rivin ja sarake 5 mukainen solu."

        tuota ei voi tehdä ilman koodia

      • Markus R

        Suurkiitokset!

        Entäs jos haluan kohdesoluun valinnan järjestysnumeron?

        Rautalanka:
        Valikossa vaihtoehdot: kissa, koira, hiiri.
        Valitsen hiiren, jolloin kohdesoluun tulee numero 3, koska hiiri oli valikon kolmas vaihtoehto.

      • kunde
        Markus R kirjoitti:

        Suurkiitokset!

        Entäs jos haluan kohdesoluun valinnan järjestysnumeron?

        Rautalanka:
        Valikossa vaihtoehdot: kissa, koira, hiiri.
        Valitsen hiiren, jolloin kohdesoluun tulee numero 3, koska hiiri oli valikon kolmas vaihtoehto.

        taulukon moduuliin...

        Private Sub ComboBox1_Click()
        Cells(ActiveCell.Row, 5) = ComboBox1.ListIndex 1
        'jos haluat jättää valinnan näkyville hipsaa seuraava rivi
        ComboBox1.ListIndex = -1
        ActiveCell.Select
        End Sub

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Lavrov suivaantui Stubbille perustellusti.

      Lavrov perusteli suivaantumistaan tosiasioilla Suomen tarinasta sotiemme jälkeen, tutkija Tynkkynen ja pankkihenkilö Sol
      Maailman menoa
      550
      2112

    2. Sukupuolia on vain kaksi- kohukassista tuli kova tuomio perheenisälle oikeudessa.

      https://www.iltalehti.fi/kotimaa/a/4d4db0d9-4dda-4ba6-a699-25d725683ad6 Miten näin normaalista kassissa olevasta tekstis
      Maailman menoa
      386
      1709

    3. Eronnut Janni Hussi palaa julkisuuteen - Aloittaa uudessa työssä, joka on aivan uusi pesti Suomessa

      Janni Hussi on saanut viime aikoina kohujulkisuutta, kun hänen ja Joel Harkimon avioliitto päättyi eroon kesällä 2025. H
      Suomalaiset julkkikset
      21
      1539

    4. Se ei ihan oikeasti vaatisi kuin yhden

      Tekstiviestin... Jos rakastat minua vielä toivoisin että laittaisit minulle viestiä. Rakastatko? Oletko oikeasti niin pe
      Ikävä
      64
      1408

    5. JM lukkoliike

      Mihin helvetin kuuseen te olette tällä kertaa siirtäneet Lukkoliikkeenne? Sen kerran kun ensimmäisen ja viimesen kerran
      Jämsä
      19
      1116

    6. Ketä ikävöit?

      Tuntomerkkejä jos täällä oikeat kohtaavat❤️
      Ikävä
      56
      1092

    7. Et saa mua ikinä

      Oma vikasi. Naiselta.
      Ikävä
      118
      1077

    8. Pankin avajaiset

      Osuuspankin uuden toimitilan viralliset avajaiset vetävät väkeä. Kyllä oli outo nauhan leikkaus, kun leikkaajat pyllisti
      Kuhmo
      16
      858

    9. Helena Ahti-Hallberg uudessa elämäntilanteessa - Paljastaa eläkehaaveestaan Espanjassa: "Mä.."

      Oi, kuulostaa ihanalta eläkepäivillä! Helena Ahti-Hallberg on ostanut kakkoskodin Espanjasta ja hänellä on puolisonsa ka
      Eläke
      12
      833

    10. Miten kesäsi meni?

      Oletko tyytyväinen siihen? Oliko kaivattusi mielessäsi? Lähennyitkö vai etäännyitkö hänen kanssaan?
      Ikävä
      66
      823
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt