Hirdetés

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

  • Kobe

    veterán

    sziasztok

    ujfent 2 vba-s kerdes

    az egyik: van egy oszlopom, amiben 2 fajta ertek van (Szoveg1, Szoveg2). A mellette levo oszlopba szeretnek egy if fuggvennyel beirni egy erteket, ha pl D2 = Szoveg1 akkor E2=1, ha D2=Szoveg2, akkor E2=2

    megcsinaltam VBA-val, de valamiert Type mismatch hibara fut

    last = Cells.Find(what:="*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row
    For i = 2 To last
    If Range("D2:D" & last) = "EDE" Then Range("E2:E" & last) = "2" Else Range("E2:E" & last) = "1"
    Next i

    itt mi lehet a problem? Type mismatch valoszinu valami formatum nemegyezosegbol johet, ezert egy masik paranccsal probaltam elotte a D oszlop tartalmat szovegge formazni

    Range("D2:D" & j).NumberFormat = "@"

    de igy sem mukodott. Tipp, hogy mi lehet meg ?

    illetve a nagyobb lelegzetvetelu dolog. Amennyiben megvan a kesz, formazott tablazatom, egy masik worksheeten van egy urlapom
    Azt szeretnem, ha a makro a tablazat midnen soraval feltoltene az urlapot, es elmentene egy kulon tabra.

    Szoval ha van 10 db sorom a tablazatban, akkor 10 tabon kulon letrehozna 1-1 urlapot neki, es a tablaban adott sorban tarolt adatokkal kitoltene.

    Pl 1es sor, elso urlap feltoltve, 2es sor masodik tab urlapja, stb

    erre valakinek otlete ? :)

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

Hirdetés