2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Fototrend
    Frissítve: 2023-11-13 08:31 Téma összefoglaló
    Fototrend

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

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

  • csferke csferke senior tag
    #38248
    Új Válasz
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    csferke
    csferke
    senior tag

    Sziasztok!
    Egy kicsit "regény" formátumban fogalmaztam meg a kérdésemet. Remélem, hogy értelmezhető.
    Sub ÚjTétel()
    Sheets("Eladás").Select
    Range("G9").Select
    Selection.End(xlDown).Select
    ActiveCell.Offset(1, 0).Select
    Default = ""
    Prompt = "A kiadott árú kódja"
    MyValue = InputBox(Prompt, Title, Default, xpos, ypos)
    '*******************************
    ' a kódot a Sheets("Áru") "A" oszlopában kell kell keresni a MyValue alapján
    ' IF kódot nem találta
    ' msgbox "Ezzel a kóddal "&MyValue&" nem találtam árút"
    ' exitsub
    ' endif
    '*******************************
    ActiveCell = MyValue
    End Sub

    A csillagozott sorok közötti részre kellene megoldás a segítségetekkel.

    Köszi, üdv

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