Hirdetés
Ú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
- Gaming notebook topik
- Nintendo Switch 2
- Büszke apukák és anyukák topikja
- Futás, futópályák
- iPhone topik
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- Okosóra és okoskiegészítő topik
- Vezetékes FEJhallgatók
- E-roller topik
- Elképesztő sebességre képesek a Micron közelgő, PCI Express 6.0-os SSD-i
- További aktív témák...
- Azonnali készpénzes Apple Macbook Air felvásárlás személyesen / csomagküldéssel korrekt áron
- Apple iPhone 11 Pro Max 64GB, Kártyafüggetlen, 1 Év Garanciával
- DDR3 so-dimm 8GB notebook RAM modul Samsung
- Telefon felváráslás!! Xiaomi Redmi Note 11, Xiaomi Redmi Note 11 Pro, Xiaomi 11 Lite
- Eladó Apple iPhone 14 Pro Max 128GB Purple / 12 hó jótállás
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest


