-
PROHARDVER!
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
-
maugly
csendes tag
válasz
Delila_1
#22634
üzenetére
Nnna, eddig tartottam, teljesen belekavarodtam. Tejfog..

Próbálom a dátum formátumát belőni úgy, hogy ne kelljen használnom a Windows területi és nyelvi beállításait az általam kívánt yyyy-mm-dd alak eléréséhez az exportált csv-ben.
Volt egypár verzióm, egy része nem hozza a kívánt eredményt, más részét helytelen szintaktikával, vagy esetleg nem létező belső függvények miatt rontom el.
A változók megadása után próbáltam ezt a kettőt, a végeredményen nem látszik:
Columns("D:E").NumberFormat = "yyyy-mm-dd;@"Columns("D:E") = Format$(Date, "yyyy-mm-dd")
Aztán próbáltam a cikluson belül formázni. Google barátom találatai alapján próbálkoztam egy TEXT függvénnyel, amire azt mondta a Visual Basic, hogy szerinte ilyen nincs.
Próbálkoztam egy ilyennel, ezzel sem értem el a célt:
For oszlop = 1 To 6
If (oszlop = 4) Or (oszlop = 5) Then
formaz = ""
formaz = Format&(Cells(sor, oszlop), "yyyy-mm-dd")
uj = uj & formaz & "|"
Else: uj = uj & Cells(sor, oszlop) & "|"
End IfTuti van egy pofonegyszerű megoldás, de már nem látom az erdőmtől azt az egy fát.

-
maugly
csendes tag
Sziasztok!
Adatokat kell exportálnom Excel 2010-ből csv-be makró segítségével, nem a megszokott elválasztó karakterekkel.
Tudom, hogy a Vezérlőpult/Terület és nyelv beállításaival átlőhetem az elválasztókat, működő megoldás, viszont a felhasználóknak csak ezt az egy, naponta újragenerált adathalmazt kell ebben a formátumban csv-be menteni, a többit a szokott módon pontosvesszővel, egyebekkel (..és az nem igazán segítség, hogy az eddig "kézzel" kicserélős módszer helyett egyfolytában elválasztókat állítgassanak).
Van lehetőség makrón belül deklarálni saját elválasztó karaktereket? Az eddig guglizott eredmények alapján nem jutottam sokra, bízom benne, hogy erre is tudtok megoldást.

Köszönöm!
Új hozzászólás Aktív témák
Hirdetés
- FarCry 4 Kyrat Edition eladó
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Apple iPhone 15 Pro / 256GB / Kártyafüggetlen / 12Hó Garancia / Akku: 88%
- ÚJ könyv: Walter Isaacson Elos Musk - keménykötésű
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RX 9060 XT 8GB GAMER PC termékbeszámítással
- iKing.Hu - Apple iPhone 15 Plus 128GB Black használt szép állapot 90% akku 6 hónap garancia
- Xiaomi Redmi Note 14 Pro+ 5G 512GB,Újszerű,Dobozaval,12 hónap garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs




A bezárással, egyebekkel fenegetem a tejfogaim, elakadás esetén jelentkezem. 


