Hirdetés

Új hozzászólás Aktív témák

  • csferke

    senior tag

    Sziasztok!

    Az alábbi kóddal adatot rendelek egy cellához. A Subrutinban több ilyen van, több cellába viszek be adatot és az egész egy gomb-hoz van rendelve.

    Dim Prompt, Title, Default, MyValue
    Prompt = "Prompt"
    Title = "Title"
    xpos = 1200
    ypos = 4500

    Range("E15").Select
    Default = ActiveCell.Value
    Prompt = "Faktura broj"
    MyValue = InputBox(Prompt, Title, Default, xpos, ypos)
    ActiveCell = MyValue

    Van viszont olyan cella is amelyben legördülő listából kellene kiválasztani a megfelelőt. Tehát a Range rááll a cellára és az InputBox helyett kellene, hogy megnyíljon a lista amelyből ki kell választani a megfelelőt. Enter vagy egér-klikk-re lépés a következő programsorra amely az aktív cellába teszi a kiválasztott adatot.

    Ezt hogyan lehet kivitelezni?

    köszi

Új hozzászólás Aktív témák