-
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
- Vége a régi Kindle-öknek? Az Amazon május 20-án beszünteti támogatásukat
- Kábellel oldaná meg a 12VHPWR gondjait az ASUS
- Kamionok, fuvarozás, logisztika topik
- Olcsóbb lett a Game Pass Ultimate, de a Call of Dutyért cserébe várni kell
- Proxmox VE
- S.T.A.L.K.E.R. 2: Heart of Chornobyl
- The Division 2 (PC, XO, PS4)
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Anglia - élmények, tapasztalatok
- Sorozatok
- További aktív témák...
- Game Pass Ultimate előfizetések 3 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Eladó jogtiszta, Windows 11/10, Office 2019/2021/2024, Fizikai és Digitális licencek, Számlával.
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- PC Game Pass előfizetés
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- GYÖNYÖRŰ iPhone 15 Pro Max 256GB Blue Titanium-1 ÉV GARANCIA -Kártyafüggetlen, MS4480
- ÁRGARANCIA!Épített KomPhone Ryzen 5 4500 16/32/64GB RAM RTX 3060 12GB GAMER PC termékbeszámítással
- Bomba ár! Dell Latitude 5400 - i5-8265U I 16GB I 256SSD I 14" HD I HDMI I Cam I W11 I Gari
- Keresünk iPhone 16/16e/16 Plus/16 Pro/16 Pro Max
- AKCIÓ! 4TB Western Digital Red Pro SATA HDD meghajtó garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50