Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel macros
Hello
I have made a macro and want it to be more general,so that I can apply it with any .log text file delivered by a audio ripping program. I want a 'file open' at the beginning and a 'save as' at the end. The trouble is that the macro will only work on the original data, which is not much use. I have been using the import data option to bring in the data which is fixed width and use it in a prepared template. I know nothing about Visual Basic, I do know that is what I need to make the macro more general. I can post the text of the macro. Sub Format1() ' ' Format1 Macro ' Macro recorded 23/10/2005 by Engles ' ' Range("A2").Select With ActiveSheet.QueryTables.Add(Connection:="TEXT;O:\B BCSO\BBCSO002.log", _ Destination:=Range("A2")) .Name = "BBCSO002" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .TextFilePromptOnRefresh = False .TextFilePlatform = xlWindows .TextFileStartRow = 1 .TextFileParseType = xlFixedWidth .TextFileTextQualifier = xlTextQualifierDoubleQuote .TextFileConsecutiveDelimiter = False .TextFileTabDelimiter = True .TextFileSemicolonDelimiter = False .TextFileCommaDelimiter = False .TextFileSpaceDelimiter = False .TextFileColumnDataTypes = Array(1, 1, 1, 1, 9) .TextFileFixedColumnWidths = Array(20, 15, 36, 19) .Refresh BackgroundQuery:=False End With ChDir "O:\BBCSO" ActiveWorkbook.SaveAs Filename:="O:\BBCSO\BBCSO.xls", FileFormat:=xlNormal _ , Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _ CreateBackup:=False End Sub Thanks for your help Mike Engles |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel 2007 macros - how to merge 5 macros together into one | Excel Discussion (Misc queries) | |||
Training: More on how to use macros in Excel: Recording Macros | Excel Worksheet Functions | |||
convert lotus 123w macros to excel macros | Excel Programming | |||
convert lotus 123w macros to excel macros | Excel Programming | |||
Making excel macros run Word macros | Excel Programming |