Új hozzászólás Aktív témák
-
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 munkalapIf 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 + 1End If
i = i + 1Loop 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
- Videós, mozgóképes topik
- exHWSW - Értünk mindenhez IS
- Motoros topic
- Gumi és felni topik
- BestBuy topik
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- One otthoni szolgáltatások (TV, internet, telefon)
- Nintendo Switch 2
- A legjobb INGYENES programok Windowsra!
- További aktív témák...
- Dell Vostro 3425 6magos Ryzen 5 5625U 16GB RAM 512GB SSD
- Dell D6000 univerzális dokkoló USB-C/ USB-A, DisplayLink & Dell WD15 (K17A) USB-C + 130-180W töltő
- ÁRGARANCIA!Épített KomPhone Ryzen 5 4500 16/32/64GB RAM RTX 3050 6GB GAMER PC termékbeszámítással
- Új Asus TUF Gaming 15.6 FHD 144Hz Ryzen9 AI 8945H 16GB 512GB Nvidia RTX 4060 8GB 140W Win11 Garancia
- Alienware 500Hz Gaming Monitor AW2524HF 27% áfás
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs

