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

983

Ää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. IL - PerSut tykittää - Vaaralliset tappajat vankilaan jopa loppuelämäksi!!

      Entistä rajumpi elinkautinen tulee – Vaaralliset tappajat vankilaan jopa loppuelämäksi Henkirikosten uusijat voidaan ja
      Maailman menoa
      174
      22323

    2. Some kuhisee Sanna Marinista: "Wau"

      Sanna Marinia hehkutetaan. Muun muassa Jodelissa kommentoidaan The Sunday Timesin julkaisemaa kuvaa Marinista. Hän ant
      Maailman menoa
      75
      9532

    3. Sannalla tänään vuorossa The Daily Show

      Eli nyt mennään jo satiirin puolelle. Tuohan on vähän kuten Lindströmin ohjelma Suomessa.
      Maailman menoa
      29
      7510

    4. Äärioikeistopurran nukke Petteri Lapanen paniikissa

      Kun Suomen historian paras pääministeri antoi vankan lausunnon, kuinka "keskustelu politiikassa on käpertynyt lähinnä va
      Maailman menoa
      81
      6350

    5. SIELTÄ SE TULI: Kepu-Kurvinen: "Emme enää lähde punavihreään hallitukseen"

      Nyt muuten nauretaan loppuviikko, että tähänkö kaatui Lindtmanin pääministerihaaveet. "Antti Kurvisen mukaan puolue ei
      Maailman menoa
      182
      6000

    6. Täysi ryöpytys Sanna Marinille ulkomailla.

      https://www.iltalehti.fi/ulkomaat/a/f699d84f-fa53-4dba-8718-2c395017fc55 Sanna Marinin kirja saa todella tylyn vastaanot
      Maailman menoa
      37
      5003

    7. HS - Sanna Marinin kirja on priimaluokan vedätys!

      Kirja-arvio|Toivo on tekoja tulisi ensisijaisesti nähdä maineen rahallisen hyödyntämisen voimaannuttavana merkkipaaluna.
      Maailman menoa
      108
      4656

    8. Minja Koskelan "istumista" kertovassa uutisessa ei sanottu persuista mitään

      eli jälleen kerran äärivasemmistolainen valehtelee, hän kun väittää että juuri persut ovat lähetelleet Koskelalle vähemm
      Maailman menoa
      101
      4396

    9. Pekka Visuri: "Suomen on aika irrottautua Ukrainan sodasta"

      Slava Ukraina-mölinät eivät enää auta. Ukraina on sotansa hävinnyt. Nyt tarvitaan poliittista selvänäköisyyttä, reaalipo
      Maailman menoa
      89
      2111

    10. Marin vetäs lopullisesti maton alta hallitusyhteistyöltä Kepun kanssa

      Kurvinen on jo ennättänyt kommentoimaan, ettei Kepu ole koskaan enää kiinnostunut vasemmiston kanssa hallituspaikasta, k
      Maailman menoa
      80
      1387
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt