-
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
-
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
- Apple iPhone 13 Mini 128GB, Kártyafüggetlen, 1 Év Garanciával
- Xbox One S All Digital 1 TB + kontroller 6 hó garancia, számlával!
- AKCIÓ! Asus H310M i7 9700F 16GB DDR4 512GB SSD STRIX RTX 2070 Super 8GB Corsair Crystal 550W
- Apple iPhone 11 Pro / 64GB / Kártyafüggetlen / 12HÓ Garancia / Akku: 90%
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5700X 16/32/64GB RAM RTX 5060 Ti 16GB GAMER termékbeszámítással
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest




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