Hirdetés
- eBay-es kütyük kis pénzért
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Lalikiraly: Kaáli Autó-Motor Múzeum
- Autódiagnosztika: a gyakorlatban
- sziku69: Szólánc.
- laskr99: DFI és DFI Lanparty gyűjteményem
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- GoodSpeed: Ágymatrac keresési kálvária
Új hozzászólás Aktív témák
-
STC Speed
őstag
Esetleg még annyit tudnál segíteni, hogy sok fájl esetén hogyan tudnám alkalmazni? pl egy mappa 100 ilyen fájl mentés másként nél.
1 fájlal most így néz ki :InputFile = "C:\Users\Fel\Desktop\fajl.xlsx"
SheetName = "Munka1"
OutputFile = "C:\Users\Fel\Desktop\fajluj"
Ext = "44"
Set objExcel = CreateObject("Excel.application")
objExcel.application.visible=false
objExcel.application.displayalerts=false
set objExcelBook = objExcel.Workbooks.Open(InputFile)
objExcel.Sheets(SheetName).Select
objExcelBook.SaveAs OutputFile, Ext
objExcel.Application.Quit
objExcel.QuitKöszi!
-
STC Speed
őstag
Sziasztok,
Esetleg van ötlete valakinek, hogy van sok excel fájlom, amit megkell nyitnom és rámegyek, hogy mentés másként, átváltom xlsx re és a formátumot weblap ról excel munkalapra, ezt fellehet gyorsítani valahogy? Köszi!

Új hozzászólás Aktív témák
- Asus ROG Zephyrus G15 - 15.6" 4K 120Hz - Ryzen 7 6800HS - 24GB - 512GB - RTX 3060 - 2 hó garancia -
- Honor 400 Lite / 8/256GB / Kártyafüggetlen / 12Hó Garancia
- LG 50QNED85T3A / QNED / 50" - 127 cm / 4K UHD / 120Hz / HDR Dolby Vision / FreeSync Premium / VRR
- GYÖNYÖRŰ iPhone 11 128GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3271, 100% Akkumulátor
- Samsung Galaxy A36 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia / Bontatlan
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő

