Hirdetés
- TCL LCD és LED TV-k
- Kormányok / autós szimulátorok topikja
- Apple MacBook
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Milyen processzort vegyek?
- GeForce RTX 5080-nak álcázott 5060-at kapott egy pórul járt vásárló
- A legrosszabb CPU-k – az ExtremeTech szerint
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Házimozi belépő szinten
- Vezeték nélküli fejhallgatók
Új hozzászólás Aktív témák
-
Gülredy
tag
Sziasztok!
Remélem jó helyre írok, Excel-es visual basic-ből kérnék egy apró segítséget.Egy nagyobb feladat részfeladata lenne, hogy egy listbox-ba bevitt tartalmat (gomb nyomásra bevitt tartalmat) egy export gomb nyomására egy txt fájlba kell exportálni.
Ez meg is lenne, de megvan adva hogy milyen formátumba kell exportálni, az én megoldásommal pedig ugyan úgy exportálja ahogy a listában van!Szóval itt az én kódom:
Private Sub CommandButton_export_Click()
Dim i As Long
Open "D:\export.txt" For Output As #1
For i = 0 To lista.ListCount - 1
lista.Selected(i) = True
Print #1, lista.List(lista.ListIndex)
Next
Close #1
End SubEz így exportálja nekem a listát fájlba: (az adatokat csak találomra írtam)
Márai
Füveskönyv
1980
Verseskötet
----------De ilyen módon kellene beírnia a fájlba:
szerző1;cím1;1999;RegényHogyan tudnám a jelenlegi kódomat módosítani ahhoz hogy formázott legyen? Vagy teljesen más kódot kellene használni hozzá?
Régen tanultam már a visual basic-et...Előre is köszönöm a válaszokat!
Új hozzászólás Aktív témák
- Autós topik
- TCL LCD és LED TV-k
- Battlefield 6
- Kormányok / autós szimulátorok topikja
- Székesfehérvár és környéke adok-veszek-beszélgetek
- Apple MacBook
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Milyen processzort vegyek?
- Megkérdeztük az AI-t: milyen érzés, amikor megreguláznak?
- Tesla topik
- További aktív témák...
- HP EliteBook 6 G1i - Intel Ultra5-235U , Új
- Eladó PS5 (PlayStation 5) Digital Edition (CD nélküli)
- Apple Watch SE 2gen 44mm, Wi-fi, 1 Év Garanciával
- Samsung Galaxy A23 5G 128GB, Kártyafüggetlen, 1 Év Garanciàval
- OneXPlayer Mini Pro Ryzen7 6800U Win 11 handheld konzol új akku, 7" FullHD, 16GB, 1TB, doboz + tok
- Apple iPhone 14 128GB,Kartyafuggetlen,Újszerű,Dobozaval,12 hónap garanciával
- Új könyv: Grandpierre Attila: Az élő világegyetem könyve
- 161 - 162 - 163 - Lenovo LOQ (15ARP9) - AMD Ryzen 7 7435HS, RTX 4060 (ELKELT)
- Sosemhasznált! HP OmniBook 5 Flip i5-1334U 8GB 512GB 14" FHD+ áthajtós-érintős Gar.: 1 év
- Tablet felvásárlás!! Apple iPad, iPad Mini, iPad Air, iPad Pro
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


