-
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
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Microsoft Office 2024 Home Business dobozos
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Microsoft és egyéb dobozos retro szoftverek
- RAPOO 7100P 1000DPI optikai rádiós 5GHz egér
- Eladó Samsung A20e 3/32GB kék / 12 hó jótállás
- LG 34GS95UE - 34" Ívelt OLED / QHD 2K / 240Hz & 0.03ms / 1300 Nits / NVIDIA G-Sync / AMD FreeSync
- Apple iPhone 12 Pro Max Graphite 128GB használt szép állapot 100% akku 6 hónap garancia
- Lenovo ThinkBook 14s Yoga 2-in-1 üzleti laptop tollal ÚJ Állapot i7-1165G7 16gb ram 512ssd FHD Gari
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest




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

