-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
bara17
tag
Sziasztok!
Az alábbi próblémával szembesültem:
Van egy makróm, amivel csv fájlokat másolok át másik excelbe (.xls formátum) majd onnan még feldolgozom. Azonban, ha makróval behívom ugyebár a csv fájlt akkor egy cellába tömörít mindent így persze a további feldolgozás hibás lesz. A dolog kijavítása remekül működik az Adatok/szövegből oszlop funkcíóval, de hiába rögzítem a műveletet makróval és írom be a változót az első sor kivételével nem jó. Kérdésem mi lehet a hiba? Rögzített makró (Z= adatot tartalmazó sorok száma):
For i = 1 To Z
Selection.TextToColumns Destination:=Cells(i, 1), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=True, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1 _
)), TrailingMinusNumbers:=True
NextA makró lefut az első sor rendeződik, a többi sorba azonban a rendeződés utáni A1 cella értéke kerül bele. (lásd. képek). Mi lehet a gond? (lehet, hogy nagyon apró a bibi, de sajna nem vagyok programozó)
http://prohardver.hu/dl/upc/2015-03/11/358977_kknflyzrmatxbw8h_before_2.jpg
http://prohardver.hu/dl/upc/2015-03/11/358977_epzkcszqwtatlbu7_after.jpg
Köszi
ui: Természetesen ez csak egy minta

Új hozzászólás Aktív témák
- A CannonKeys felkavarja a slim profilos billentyűzetek állóvizét
- AMD Navi Radeon™ RX 9xxx sorozat
- Anglia - élmények, tapasztalatok
- Magga: PLEX: multimédia az egész lakásban
- Genshin Impact (PC, PS4, Android, iOS)
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Vicces képek
- CES 2026: újraértelmezte a billentyűzet fogalmát a HP
- Kontaktlencse
- További aktív témák...
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- MS SQL Server 2016, 2017, 2019
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- ÁRGARANCIA!Épített KomPhone i5 12400F 16/32/64GB RAM RTX 3060 12GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! LG 29WP60G-B 29 75Hz IPS UWFHD 1ms monitor garanciával hibátlan működéssel
- REFURBISHED és ÚJ - HP USB-C Dock G5 (5TW10AA) - 3x4K felbontás
- Xiaomi Redmi Note 14 Pro+ 5G 256GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! Sapphire B650M R7 8700F 32GB DDR5 1TB SSD RTX 3070 Ti 8GB Zalman S2 TG EVGA 850W
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50
