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

  • oke

    senior tag

    válasz Fferi50 #44047 üzenetére

    Szia,

    Igen, nagyon sok információ van a táblázattal kapcsolatban, nehéz eldönteni, mi az ami számíthat a későbbiekben.

    Van egyedi azonosító. A Te segítségeddel eljutottam oda, hogy az aktuális munkalap V oszlopába, ami alapban üres, már belekerült a legördülő lista - kiválasztás nélkül. Mellé a W oszlopba meg sikerült beforgatni az előző napi lista beállítást, de csak mint értéket. Ez alapján gondoltam, hogy valahogy be lehetne állítani a cella értéket a V oszlopban, mindenhol a mellette lévő alapján.

    Ezzel a részlettel hozom át az adatokat a "régi" fülből a V oszlopból, de ez nem listaként másolja át:

    ' "Előző kategória" másolása
      sor = Range("A" & Rows.Count).End(xlUp).Row
        Range("w2").Select
            Application.CutCopyMode = False
            Application.CutCopyMode = False
        ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-22],régi!C[-22]:C[-1],22,0)"
        Columns("w:w").EntireColumn.AutoFit
        Selection.AutoFill Destination:=Range("w2:w" & sor)

    [ Szerkesztve ]

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