Telefonszámunk: 1-472-0679

[Resolved] megjegyzés beszúrása következő üres sor valamelyik cellájába -vba

Kezdőlap Fórumok Excel programozás [Resolved] megjegyzés beszúrása következő üres sor valamelyik cellájába -vba

Topic Resolution: Resolved

Ennek a témakörnek tartalma 6 hozzászólás, 2 résztvevő. Utolsó frissítés:  horvimi 2 hónapja, 2 hete telt el.

7 bejegyzés megtekintése - 1-7 / 7
  • Szerző
    Bejegyzés
  • #5770

    Potus
    Felhasználó

    Sziasztok!
    Van arra lehetőség, hogy amikor adatokat viszek be userform-on keresztül egy munkalapra akkor időnként megjegyzéseket szurjak be egy-egy cellára? A megjegyzést ugye egy textboxba írnám és ennek kellene cella megjegyzésként megjelennie.

    előre is köszi a segítséget! Potus

    #5771

    Potus
    Felhasználó

    pl.: sor = ws.Cells.Range(“b9:h375″).Find(What:=”*”, SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1
    ws.Cells(sor, 2).Value = Me.TextBox3.Value – erre a cellára szeretnék egy másik textbox segítségével megjegyzést beszúrni.

    #5772

    horvimi
    Adminisztrátor

    Mi lenne, ha rákeresnél, hogyan kell megjegyzést beszúrni egy cellába VBA-val?

    #5773

    Potus
    Felhasználó

    értem a célzást…
    de eddig csak olyat találtam ami egy állandó szöveget egy adott cellába illeszt

    #5774

    horvimi
    Adminisztrátor

    A cellád megvan ugyebár: ws.Cells(sor, 2)
    A beleírandó szöveged is megvan: Me.TextBox4.Value

    Nézd meg a talált mintát, és helyettesítsd be ezeket.

    Imre

    #5775

    Potus
    Felhasználó

    Cells(sor, 8).AddComment
    Cells(sor, 8).Comment.Text Text:=Me.TextBox16.Value

    valóban, múkődik 🙂 . Azt hittem ez csak rangre igaz.

    A következő probléma, hogy , ha ezt a cella tartalmat egy kereső függvény átmásolja egy másik cellába akkor hogyan lehetne megoldani, hogy a megjegyzést is vigye magával…

    #5776

    horvimi
    Adminisztrátor

    Keresőfüggvénnyel sehogy

7 bejegyzés megtekintése - 1-7 / 7

Be kell jelentkezni a hozzászóláshoz.