Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
OLE with Excel
 |
- Access OLE Query export to Excel
- Access table query to Excel
- Accessing an Existing Copy of Excel
- Add Comment Excel
- Add New Worksheet
- Add Worksheet
- Animate Excel office assistant
- Automating Excel Tutorial
- Basics with Excel OLE
- Change Currency Formats in Excel
- Check for Empty Cell in Excel
- Check if Column is Hidden
- Close Excel Object
- COM Test Use with Excel WorksheetFunction Object
- Consolidate Excel Workbooks
- convert the HISTOGRAM sheet to BMP or GIF
- CopyFromRecordset Loss of Formatting
- Create Excel Addin
- Create XL Graph
- Cutting and Pasting a Cell in Excel
- Delete Column
- Determine Excel File Format Type
- Determine First and Last Row and Column Used
- Determine Version That An Excel File Was Saved In
- Determine Workbook or WorkSheet Protection
- Determine Worksheet Names in Excel Workbook
- Disable Security Warning
- Display Color Chart
- Display Column and Row Data
- Display Users on Excel Workbook
- Easy CrossTabbed Spreadsheet Creation
- Enumerate Fonts in Excel
- Enumerating Excel Commandbar Controls
- Excel - constants
- Excel - Signature Worksheet
- Excel - Simple Conditional Column Hiding
- Excel 2000 - Inserting Hyperlinks with OLE
- Excel 2003 Tips
- Excel 2007 and Windows Server 2008 x64 Problem
- Excel and SaveAs Method
- Excel AutoFilter Method
- Excel Custom Variables
- Excel Dynamic Range Simple Example
- Excel File Conversion Using SaveAs
- Excel Filtering Function
- Excel Get Formatted Tables From Web Pages
- Excel Move Sheet
- Excel ObjectGet and UAC
- Excel OLE - List Named Ranges
- Excel Paste Special
- Excel Power Point Example
- Excel Print Landscape Scaled problem
- Excel Proper Case
- Excel Replace String
- Excel Time Format
- Excel to PDF
- Excel unlock some cells in a protected worksheet
- Excel Worksheet Change
- Export Excel Data to Tab Delimited Text File
- Exporting Excel Pictures
- Extract Data from specific Range in Closed Excel WorkBook
- Fastest Way to Copy Data To Excel
- Find Method in Excel
- Finding Data in Excel Cells
- Format Excel Column
- Get All Rows of Data in a Column
- Get Data Row by Row in Excel
- Get SaveAs to Close without Alert Box
- Getting Rowcount from Excel Database
- Grab Data from All WOrksheets in a Workbook
- Handle Errors in Cells
- Hide - Unhide Columns in Excel
- How to Execute Excel Function via OLE - COM
- Import a text file into an Excel Column
- Import CSV file into Excel
- Import Tab Delimited Text File
- Insert a Tracking Module in Excel Workbooks
- Inserting Pagebreaks into Excel Sheet
- Load WIL Array into Excel
- Making a Chart in Excel
- Number of pages in Excel worksheets
- ObjectGet and Excel
- OLE and Excel - Adding Cells to Workbook
- OLE and Excel - Spreadsheet Calculation
- OLE and Excel - The Basics
- OLE and Excel Animation Example
- OLE and Excel BuiltinDocumentProperties
- OLE Excel - Cutting and pasting cells problem
- OLE Excel and Outlook Examples
- OLE Excel Example that reads text from cells
- OLE with Excel and Named Parameters
- OLE with Parameters and Excel
- Open Existing Excel File And Insert Row
- Open Password Protected Excel file via OLE
- Playing Around with ADO and Updating dBase Files
- Playing Around with ADO and Updating Excel Columns
- Print All Sheets in a WorkBook
- Print Excel Worksheets
- Printing Workbooks from Excel
- Push Code into Excel using OLE
- Put Excel Column into an Array
- Reference a Specific Excel Workbook Instance
- Rename Existing Excel Worksheet
- Resize child windows in Excel
- Row Count
- Run an Excel Macro
- Run Excel Macro
- Save XLS file as a CSV file
- Search Excel for Cells and Items
- Search Excel Spreadsheet
- Set AutoSize for Cell Comment
- Set Cell Borders and Font
- Set Excel Default Path on Start-up
- Set Number of Sheets in Workbook
- Setting Proper Case in Range of Cells
- Showing the Value of Excel Dynamic Ranges
- Simple Excel Read
- Size of an EXCEL spreadsheet
- Sort Columns in XLS
- Sorting a Variable Range in Excel
- Sorting Multiple Columns
- Sorting Worksheets inside a Workbook
- SumProduct Function in Excel
- Testing the WorkSheetFunction Object
- TextToColumns FieldInfo Embedded Array Parameter Issue
- UDF for Excel Constant References
- UDF to Determine Worksheet Names in Excel Workbook
- Update Excel Cells
- Updating Worksheet Links
- Wait for Excel Add-in to Load
- Winbatch ADO Script - For EXCEL
- Working with Excels Built-in Dialogs
- Wrap Text in Excel Cell
- Write Data to an XLS file
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Determine Version That An Excel File Was Saved In
;Winbatch 2006C - Ever Wonder which version an
; Excel file was saved in
;
;Stan Littlefield, August 12, 2006
;//////////////////////////////////////////////////////////////////////////////
GoSub udfs
cXLS = AskFilename("Open Spreadsheet", DirScript(), "Excel Files|*.xls|", "", 1)
If cXLS=="" Then Exit
BoxOpen("Please Wait","Examining Selected Excel File")
oXL=CreateObject("Excel.Application")
oXL.Visible = 0 ;initially set this to 1 to test
oXL.ScreenUpdating = 1
oXL.UserControl = 1
oXL.DisplayAlerts = 0
oXL.EnableEvents = 1
oXL.WorkBooks.Open(cXLS)
cRet = Getxlstuff()
oXL.Quit()
oXL=0
BoxShut()
Message(cXLS,cRet)
Exit
;////////////////////////////////////////////////////////////////////////////
:udfs
#DefineSubRoutine getxlstuff()
retval="Opening With Version "
cVer = oXL.Version
Select Int(cVer)
Case 7
retval = StrCat(retval,"Excel - 95",@CRLF)
Break
Case 8
retval = StrCat(retval,"Excel - 97",@CRLF)
Break
Case 8
retval = StrCat(retval,"Excel - 2000",@CRLF)
Break
Case 10
retval = StrCat(retval,"Excel - 2002",@CRLF)
Break
Case 11
retval = StrCat(retval,"Excel - 2003",@CRLF)
Break
EndSelect
retval = StrCat(retval,"File Saved In - ")
nFormat = oXL.ActiveWorkbook.FileFormat
Select nFormat
Case -4143
retval = StrCat(retval,"Excel: 2000 Plus Through 2003",@CRLF)
Break
Case 16
retval = StrCat(retval,"Excel Sheet: 2.1",@CRLF)
Break
Case 29
retval = StrCat(retval,"Excel Sheet: 3",@CRLF)
Break
Case 33
retval = StrCat(retval,"Excel Sheet: 4",@CRLF)
Break
Case 35
retval = StrCat(retval,"Excel: 4",@CRLF)
Break
Case 39
retval = StrCat(retval,"Excel: 5",@CRLF)
Break
Case 43
retval = StrCat(retval,"Excel: 5.0/95 through 97/2000",@CRLF)
Break
Otherwise
retval = StrCat(retval,"Unknown or saved in 2003 and above!",@CRLF)
EndSelect
Return(retval)
#EndSubRoutine
Return
;////////////////////////////////////////////////////////////////////////
Article ID: W17149
File Created: 2007:07:03:14:28:30
Last Updated: 2007:07:03:14:28:30