Hirdetés
- A Razer új klaviatúra-zászlóshajóját meglátva biztos félrenyeled a teát
- Kétarcú űrutazás: az Artemis II startra kész, a Starlinert elmarasztalták
- Beelőzte az iparágat a HBM4 tömeggyártásával a Samsung
- Visszahozta a sírból a G-Drive márkanevet a Western Digital
- Komplex intelligencia a Gemini 3.1 Pro fókuszában
- L bajonett, Panasonic, Sigma, Leica
- Fejhallgató erősítő és DAC topik
- Fujifilm X
- Milyen billentyűzetet vegyek?
- Épített vízhűtés (nem kompakt) topic
- Gaming notebook topik
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- A Razer új klaviatúra-zászlóshajóját meglátva biztos félrenyeled a teát
- Soundbar, soundplate, hangprojektor
- Azonnali fotós kérdések órája
Ú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
- Ryzen 7 9700x AM5 CPU - garancia 2028.05. hóig
- Philips Evnia 27M2N8500 QD-OLED monitor 1440p 360Hz ALZA garancia
- MacBook Air (2020) M1 processzor, 8GB RAM, 256 GB kiváló állapotban eladó
- Felújított (Refurbished) DELL Latitude 5440 Tartós Üzleti Laptop 14" -40% i5-1345U 10Mag 16/512 FHD
- Xiaomi Poco Pad 256GB blue
- Acer TravelMate P214 i3-1115G4 12GB 256GB 14" FHD 1év garancia
- Surface Pro 7+ i5-1135G7 16GB 512GB 1 év garancia
- AKCIÓ!! 100/100! - 0 Perc! WD BLACK SN850P 2 TB! Playstation 5
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3732
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest


