2. Fórumok
  3. Szoftverfejlesztés
  4. Visual Basic

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

  • #1551 26centi csendes tag
    Új Válasz #1551
    Ú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
    Privát üzenet küldése

    26centi

    csendes tag

    sziasztok,
    én is most teszem kezdőlépéseimet vba-ban. és nem szeret engem. se.

    egy óriási adathalmaz adott feltétel alapján kiválasztott sorát szeretném egy másik munkalap, változóban (n) tárolt számú sorába másolni. kreáltam is egy kódot.

    Do
    Sheets("tools in SAP 3100").Activate 'forrás munkalap

    If Cells(i, 14) = "#Hiányzik" Then
    Rows(i).Select ' átmásolandó sor
    Selection.Copy
    Sheets("missing cost centers").Select 'cél munkalap
    Rows(n).Select 'ezen a ponton kiakad, Application-defined or object defined error üzenettel Hibakód:1004
    ActiveSheet.rows(n).Paste
    n = n + 1

    End If
    i = i + 1

    Loop Until Cells(i, 1) = ""

    sajnos a hibakód helpjét elolvasva sem kaptam a leghalványabb utalást sem hogy mi a nyűgje. két sorral feljebb pedig ugyanez az utasítás működik.

    van valakinek ötlete, hogy miért nem vagyunk barátok?

    előre is kösz,
    derűs, dolgos munkanapot

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