convert xlsx files to xls inside folders and subfolders in Excel VBA or Python -

-

i trying convert xlsx files xls using vba macro or python code.so far,i on converting files in single folder using below code:

sub processfiles() dim filename, pathname, savefilename string dim wb workbook dim initialdisplayalerts boolean  pathname = ""   filename = dir(pathname & "*.xlsx") initialdisplayalerts = application.displayalerts application.displayalerts = false while filename <> ""     set wb = workbooks.open(filename:=pathname & filename, _                             updatelinks:=false)     wb.checkcompatibility = false     savefilename = replace(filename, ".xlsx", ".xls")      wb.saveas filename:=pathname & savefilename, _               fileformat:=xlexcel8, password:="", writerespassword:="", _               readonlyrecommended:=false, createbackup:=false      wb.close savechanges:=false     filename = dir() loop application.displayalerts = initialdisplayalerts end sub

i trying generalize subfolders inside given folder.

on larger note,i trying build macro following:

  1. run in batch mode parent folder constant.
  2. process code @ background , put converted files in respective folders.

for example, max main folder inside there may med ,det,vis,liv sub-folders.inside each subfolder,there thousands of xlsx files need converted , placed @ same location parent file stored.

please help.

thanks, maddy

you in python follows. take xlsx files single folder , write them using same name in xls format:

import win32com.client win32 import glob import os  excel = win32.gencache.ensuredispatch('excel.application')  excel_filename in glob.glob(r'c:\excel_files_folder\*.xlsx'):     print excel_filename     wb = excel.workbooks.open(excel_filename)     wb.saveas(os.path.splitext(excel_filename)[0] + '.xls', fileformat=56, conflictresolution=2)   excel.application.quit()

where 56 format number used, these listed on microsoft website.

to on whole directory structure, use os.walk follows:

import win32com.client win32 import os  excel = win32.gencache.ensuredispatch('excel.application')  dirpath, dirnames, filenames in os.walk(r'c:\excel_files_folder'):     filename in filenames:         name, ext = os.path.splitext(filename)         if ext == '.xlsx':             wb = excel.workbooks.open(os.path.join(dirpath, filename))             wb.donotpromptforconvert = true             wb.checkcompatibility = false             excel.displayalerts = false             wb.saveas(os.path.join(dirpath, name + '.xls'), fileformat=56, conflictresolution=2)   excel.application.quit()

Comments

Post a Comment

Popular posts from this blog

Hatching array of circles in AutoCAD using c# -

-
i beginner in autocad plugins .i have created array of circle using following code. now, have hatch circles in array .how that??how hatch circles @ once? moreover, how can return hatch method , use hatch objects.sorry language.thanks in advance. [assembly: commandclass(typeof(beamsection.class1))] namespace beamsection { public class class1 { //class1 obj = new class1(); [commandmethod("beamatsupport")] public void addlightweightpolyline() { // current document , database document acdoc = application.documentmanager.mdiactivedocument; database accurdb = acdoc.database; promptpointresult ppr = acdoc.editor.getpoint("\nselect starting point "); var ucs = acdoc.editor.currentusercoordinatesystem; point3d startingpt = ppr.value.transformby(ucs); list<double> radius = new list<double>(); radius.add(0.5);
Read more

ios - UITEXTFIELD InputView Uipicker not working in swift -

-
hello trying pop uipickerview view programmatically when user clicks on textfield. have tried doesn't doing anything. isn't working. nothing happening when click textfield class userprofiletableviewcontroller: uitableviewcontroller,uitextfielddelegate,uipickerviewdelegate,uipickerviewdatasource { var itempicker: uipickerview! = uipickerview() @iboutlet weak var gendertxtfield: uitextfield! var gender = ["male","female"] override func viewdidload() { super.viewdidload() gendertxtfield.delegate = self itempicker!.delegate = self itempicker!.datasource = self itempicker!.backgroundcolor = uicolor.blackcolor() self.gendertxtfield.inputview = itempicker } func numberofcomponentsinpickerview(pickerview: uipickerview) -> int{ return 1 } // returns # of rows in each component.. func pickerview(pickerview: uipickerview, numberofrowsincomponent component:
Read more

Python Pig Latin Translator -

-
so have been working on @ codecademy.com while trying learn python. don't know if blind , can't see why won't work or what. here's code won't let me use. function print variable if had typed in , print "empty" if didn't type anything. print "welcome english pig latin translator!" original = raw_input("what's name?") if len(original) > 0 print original else print "empty" if len(original) > 0 else the above lines contains syntax errors. try: if len(original) > 0: else: note added colons, ( : ).
Read more