Jump to content

Search the Community

Showing results for tags 'excelreadsheettoarrayex'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • General
    • Announcements and Site News
    • Administration
  • AutoIt v3
    • AutoIt Help and Support
    • AutoIt Technical Discussion
    • AutoIt Example Scripts
  • Scripting and Development
    • Developer General Discussion
    • Language Specific Discussion
  • IT Administration
    • Operating System Deployment
    • Windows Client
    • Windows Server
    • Office

Categories

  • AutoIt Team
    • Beta
    • MVP
  • AutoIt
    • Automation
    • Databases and web connections
    • Data compression
    • Encryption and hash
    • Games
    • GUI Additions
    • Hardware
    • Information gathering
    • Internet protocol suite
    • Maths
    • Media
    • PDF
    • Security
    • Social Media and other Website API
    • Windows
  • Scripting and Development
  • IT Administration
    • Operating System Deployment
    • Windows Client
    • Windows Server
    • Office

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Location


WWW


Interests

Found 1 result

  1. Firs of all, i'm sorry for my bad english, but i'm brazilian! I've modified many functions of Excel.au3 to make it much more fast and created anothers functions the function list is above: Functions inside UDF: _ExcelColumnLetter($iColumn) _ExcelColumnNumber($sColumn) _ExcelFormatR1C1ToA1($iRowFrom, $iColFrom, $iRowTo = "", $iColTo = "") _ExcelFormatA1ToR1C1($sRange) _ExcelReadSheetToArrayEX($oExcel, $iStartRow = 1, $iStartColumn = 1, $iRowCnt = 0, $iColCnt = 0, $iColShift = 0) _ExcelPasteSpecial($oExcel, $sRange, $xPasteType = -4104, $xPasteSpecialOp = -4142) _ExcelFormatPainter($oExcel, $sRangeFrom, $sRangeTo = 0, $xPasteType = -4104, $xPasteSpecialOp = -4142) _ExcelWriteSheetFromArrayEx($oExcel, $aArray, $iStartRow = 1, $iStartColumn = 1, $iArrayRowStart = 0, $iArrayColStart = 0) _ExcelWriteArrayEX($oExcel, $aArray, $iStartRow = 1, $iStartColumn = 1, $iArrayRowStart = 0, $iDirection = 0) if someone wants to fix my specifications can be at ease! in the attached file have a examples of functions! Note: functions that are written by other people and i just modified, i left specified within the UDF I hope it is useful to you, it's much more fast than original functions! Thanks a lot! Examples: #include #include ;Generate an Array Local $aArray[100][15] For $i = 0 To 99 For $j = 0 To 14 $aArray[$i][$j] = "Line: " & $i + 1 & " - Col: " & $j + 1 Next Next ;Create Excel Object Local $oExcel = _ExcelBookNew() ;Write a 2d Array to Excel with default values (start in R1C1 cell and write all itens in array). MsgBox(0,'',"Press OK to write an Array to Excel.") _ExcelWriteSheetFromArrayEx($oExcel, $aArray) $oExcel.ActiveSheet.Columns("A:O").AutoFit ;Format 2 First's lines. MsgBox(0,'',"Press OK to format the 2 first Excel cells.") With $oExcel.ActiveSheet.Range("A1:O100") .Select .HorizontalAlignment = 3 .Borders.LineStyle = 1 EndWith $oExcel.ActiveSheet.Range("A1:O1").Interior.Color = 0xDAC0CC $oExcel.ActiveSheet.Range("A2:O2").Interior.Color = 0xF0B00A $oExcel.ActiveSheet.Range("A2:O2").Font.Bold = True ;Copy this style to all anothers Cells with _ExcelFormatPainter MsgBox(0,'',"Press OK to copy the style of the 2 first's cells to to all anothers cells.") _ExcelFormatPainter($oExcel, "A1:O2", 0, $xlPasteFormats, $xlPasteSpecialOperationNone) $oExcel.ActiveSheet.Range("A1").Select ;Read all data to array MsgBox(0,'',"Press OK to read all cells to and array.") Local $aCells = _ExcelReadSheetToArrayEX($oExcel) _ArrayDisplay($aCells) ;read 3 columns from Excel starting from 5nd and 50 rows starting from 1st row MsgBox(0,'',"Press OK to read 50 rows and 3 cols and to and array.") Local $aCells = _ExcelReadSheetToArrayEX($oExcel, 1, 5, 50, 3) _ArrayDisplay($aCells) _ExcelBookClose($oExcel) ;Create another Excel Object Local $oExcel = _ExcelBookNew() ;Write an Array to Excel Starting from 50 row and 12 col of array and write it starting from 2nd row and 3rd col of excel MsgBox(0,'',"Press OK to write an Array to Excel.") _ExcelWriteSheetFromArrayEx($oExcel, $aArray, 2, 3, 50, 12) MsgBox(0,'',"Press OK to Close.") _ExcelBookClose($oExcel) ;Write an 1D Array Local $oExcel = _ExcelBookNew() Local $aArray[5] = ["LocoDarwin", "Jon", "big_daddy", "DaleHolm", "GaryFrost"] MsgBox(0,'',"Press OK to write an Array to Excel.") _ExcelWriteArrayEX($oExcel, $aArray) ; Write the Array Horizontally _ExcelWriteArrayEX($oExcel,$aArray, 5, 1, 0, 1) ; Write the Array Vertically, starting on the 5th Row MsgBox(0,'',"Press OK to Exit.") _ExcelBookClose($oExcel)ExcelEX.rar
×
×
  • Create New...