Ú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
- Eladó Gamer Laptop
- Gigabyte Z370P + i7-8700K
- HP EliteDesk 800 G2 DM Mini PC, I5-6500T CPU, 8GB DDR4, 256GB SSD, Win 11, Számla, 2 év garancia
- HP EliteDesk 800 G3 DM Mini PC, I5-6500T CPU, 8GB DDR4, 256GB NVMe SSD, Win 11, Számla, 2 év garanci
- HP ProDesk 600 G3 SFF PC, I5-7500 CPU, 8GB DDR4, 256GB NVMe SSD, DVD RW, Win 11, Számla, 2 év garanc
- Azonnali készpénzes AMD Radeon RX 6000 sorozat videokártya felvásárlás személyesen/csomagküldéssel
- Azonnali készpénzes nVidia RTX 3000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
- Samsung Galaxy A32 4G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Realme 7i 64GB, Kártyafüggetlen, 1 Év Garanciával
- Azonnali készpénzes Intel i3 i5 i7 i9 12/13/14 gen processzor felvásárlás személyesen / csomagküldés
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest