Leaderboard

@Jos, sorry for that!

Spoon-feeding will probably shorten this thread. Local $master_value = "Z" Local $value_list = ["A", "B", "C", "D"] Local $a, $aa, $aRes[0] For $i = 1 To UBound($value_list) $a = _ArrayCombinations($value_list, $i) _ArrayDelete($a, 0) For $j = 0 To UBound($a) - 1 $aa = _ArrayPermute(StringSplit($a[$j] & $master_value, "", 3), ',') _ArrayDelete($aa, 0) _ArrayAdd($aRes, $aa) Next Next $ad($aRes)

robertocm, That sounds a very sensible solution - glad you got it working. M23

Or : $sTest = "program1.ex_|5.0.0.42" & @CRLF & _ "file.sys|1.0.0.8" & @CRLF & _ "program2.Ex_|5.0.0.18" & @CRLF & _ "text.txt|0.0.0.0" $sTest = StringReplace ($sTest, "_|", "e|") Local $aArray [0][2] _ArrayAdd ($aArray,$sTest) _ArrayDisplay ($aArray)

@PedroWarlock If this is your input string, I would recommend you to use _ArrayAdd (...)

StringSplit : look help file for it !

Here is an other more advanced Example that uses the SSRS Reporting .NET Assembly using CLR Library Features : • Multiple Data Sources available• Can run in REMOTE or LOCAL Mode• Export possible to XLS(X) / DOC(X) / PDF Result : CLR using the PS Automation Assembly : #AutoIt3Wrapper_UseX64=y #include "..\CLR.Au3" #include <FileConstants.au3> #include <MsgBoxConstants.au3> Local $str = _Base64Decode("JFJ1bnNwYWNlID0gW3J1bnNwYWNlZmFjdG9yeV06OkNyZWF0ZVJ1bnNwYWNlKCkNCg0KJFJ1bnNwYWNlLkFwYXJ0bWVudFN0YXRlID0gIlNUQSIgIyBDaGFuZ2UgaGVyZSAhDQokUnVuc3BhY2UuVGhyZWFkT3B0aW9ucyA9ICJSZXVzZVRocmVhZCINCg0KJFBvd2VyU2hlbGwgPSBbcG93ZXJzaGVsbF06OkNyZWF0ZSgpDQoNCiRQb3dlclNoZWxsLnJ1bnNwYWNlID0gJFJ1bnNwYWNlDQoNCiRSdW5zcGFjZS5PcGVuKCkNCg0KJHN0cmluZyA9IHsgDQpBZGQtVHlwZSAtUGF0aCAiQzpcV0lORE9XU1xhc3NlbWJseVxHQUNfTVNJTFxNaWNyb3NvZnQuUmVwb3J0Vmlld2VyLldpbkZvcm1zXDEyLjAuMC4wX184OTg0NWRjZDgwODBjYzkxXE1pY3Jvc29mdC5SZXBvcnRWaWV3ZXIuV2luRm9ybXMuZGxsIg0KQWRkLVR5cGUgLVBhdGggIkM6XF9cQXBwc1xfUG93ZXJTaGVsbFxfR1VJIEZvcm1zXC5ORVQgU1NSUyBSZXBvcnQgU2VydmVyXFN5c3RlbS5EYXRhLlNRTGl0ZS5kbGwiDQojIEFkZC1UeXBlIC1QYXRoICJDOlxQcm9ncmFtRGF0YVxMSU5RUGFkXERyaXZlcnNcRGF0YUNvbnRleHRcNC4wXElRRHJpdmVyICg1YjU5NzI2NTM4YTQ5Njg0KVx4NjRcU3lzdGVtLkRhdGEuU1FMaXRlLmRsbCINCg0KICRjb24gPSBOZXctT2JqZWN0IC1UeXBlTmFtZSBTeXN0ZW0uRGF0YS5TUUxpdGUuU1FMaXRlQ29ubmVjdGlvbg0KICRjb24uQ29ubmVjdGlvblN0cmluZyA9ICJEYXRhIFNvdXJjZT1DOlxfXEFwcHNcX0RvdE5ldCBTY3JpcHRpbmdcLk5FVCBTUUxpdGUgTGlicmFyeVxub3J0aHdpbmRFRi5kYiINCiAkY29uLk9wZW4oKQ0KDQogJHNxbCA9ICRjb24uQ3JlYXRlQ29tbWFuZCgpDQogJHNxbC5Db21tYW5kVGV4dCA9ICJTRUxFQ1QgKiBGUk9NIEN1c3RvbWVycyINCiAkYWRhcHRlciA9IE5ldy1PYmplY3QgLVR5cGVOYW1lIFN5c3RlbS5EYXRhLlNRTGl0ZS5TUUxpdGVEYXRhQWRhcHRlciAkc3FsDQogJGRhdGEgPSBOZXctT2JqZWN0IFN5c3RlbS5EYXRhLkRhdGFTZXQNCiBbdm9pZF0kYWRhcHRlci5GaWxsKCRkYXRhKQ0KDQokcnYgPSBOZXctT2JqZWN0IE1pY3Jvc29mdC5SZXBvcnRpbmcuV2luRm9ybXMuUmVwb3J0Vmlld2VyOw0KIyAkcnYuU2VydmVyUmVwb3J0LlJlcG9ydFNlcnZlckNyZWRlbnRpYWxzLk5ldHdvcmtDcmVkZW50aWFscyA9ICRjcmVkZW50aWFsDQogICAgICAgICAgDQoNCiMgaHR0cHM6Ly93d3cuY29kZXByb2plY3QuY29tL1F1ZXN0aW9ucy81MTE2MzEvUmVwb3J0Vmlld2VycGx1c3JlbmRlcmluZ3BsdXNwcm9ibGVtICAgICAgICAgDQogICAgICAgICAgICANCiRydi5Qcm9jZXNzaW5nTW9kZSA9ICJMb2NhbCIgICAgICAgICAgICANCiRydi5Mb2NhbFJlcG9ydC5SZXBvcnRQYXRoID0gIkM6XF9cQXBwc1xfUG93ZXJTaGVsbFxfTVMgU1FMIFJlcG9ydGluZyBTZXJ2ZXJcQ3VzdG9tZXJzLnJkbCINCndyaXRlLWhvc3QgJHJ2LkxvY2FsUmVwb3J0LkdldERhdGFTb3VyY2VOYW1lcygpDQoNCiRkcyA9IE5ldy1vYmplY3QgTWljcm9zb2Z0LlJlcG9ydGluZy5XaW5Gb3Jtcy5SZXBvcnREYXRhU291cmNlDQokZHMuTmFtZSA9ICJEYXRhU2V0MSIgICMgJHJ2LkxvY2FsUmVwb3J0LkdldERhdGFTb3VyY2VOYW1lcygpICMgIkRhdGFTZXQxIg0KJGRzLlZhbHVlID0gJGRhdGEudGFibGVzWzBdDQoNCiMgJHJ2LlJlc2V0KCk7DQokcnYuTG9jYWxSZXBvcnQuRGF0YVNvdXJjZXMuQ2xlYXIoKQ0KDQokcnYuTG9jYWxSZXBvcnQuRGF0YVNvdXJjZXMuQWRkKCRkcykNCg0KJHJ2LkxvY2FsUmVwb3J0LlJlZnJlc2goKTsNCiRydi5SZWZyZXNoUmVwb3J0KCkNCg0KJHJ2LkhlaWdodCA9IDgwMCAgICAgICAgICAgIA0KJHJ2LldpZHRoID0gMTIwMCAgICAgICAgICAgIA0KJHJ2LkRvY2sgPSBbU3lzdGVtLldpbmRvd3MuRm9ybXMuRG9ja1N0eWxlXTo6RmlsbA0KICAgICAgIA0KDQojLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0gICAgICAgICAgICANCiNTaG93IGFzIERpYWxvZyBVc2luZyBXaW5kb3dzIEZvcm0gICAgICAgICAgICANCiMtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLSAgICAgICAgICAgIA0KI2NyZWF0ZSBhIG5ldyBmb3JtICAgICAgICAgICAgDQokZm9ybSA9IE5ldy1PYmplY3QgV2luZG93cy5Gb3Jtcy5Gb3JtICAgICAgICAgICAgDQogICAgICAgICAgICAgDQojd2UncmUgZ29pbmcgdG8gbWFrZSBpdCBqdXN0IHNsaWdodGx5IGJpZ2dlciB0aGFuICAgICAgICAgICAgIA0KJGZvcm0uSGVpZ2h0ID0gODEwICAgICAgICAgICAgDQokZm9ybS5XaWR0aD0gMTIxMCAgICAgICAgICAgIA0KJGZvcm0uQ29udHJvbHMuQWRkKCRydikgICAgICAgICAgICANCiRydi5TaG93KCkgICAgICAgICAgICANCiRmb3JtLlNob3dEaWFsb2coKSAgICAgICAgICAgIA0KDQoNCiRzcWwuRGlzcG9zZSgpDQokY29uLkNsb3NlKCkNCn0NCg0KDQpbdm9pZF0kUG93ZXJTaGVsbC5BZGRTY3JpcHQoJHN0cmluZykNCg0KJFBvd2VyU2hlbGwuSW52b2tlKCkgDQo=") _Run_PSHost_Script(BinaryToString($str,1)) Func _Run_PSHost_Script($PSScript) Local $oAssembly = _CLR_LoadLibrary("System.Management.Automation") ConsoleWrite("!$oAssembly: " & IsObj($oAssembly) & @CRLF) ; Create Object Local $pAssemblyType = 0 $oAssembly.GetType_2("System.Management.Automation.PowerShell", $pAssemblyType) ConsoleWrite("$pAssemblyType = " & Ptr($pAssemblyType) & @CRLF) Local $oActivatorType = ObjCreateInterface($pAssemblyType, $sIID_IType, $sTag_IType) ConsoleWrite("IsObj( $oAssemblyType ) = " & IsObj($oActivatorType) & @TAB & @CRLF) ; Create Object Local $pObjectPS = 0 $oActivatorType.InvokeMember_3("Create", 0x158, 0, 0, 0, $pObjectPS) ConsoleWrite("IsObject: " & IsObj($pObjectPS) & @TAB & "$pObject: " & ObjName($pObjectPS) & @CRLF) ; <<<<<<<<<<<<<<<<<<< PS COMMAND HERE >>>>>>>>>>>>>>>>>>>> $pObjectPS.AddScript($PSScript) ; Add Script here ;~ ConsoleWrite($PSScript & @CRLF) $objAsync = $pObjectPS.BeginInvoke ; (2); ($oActivatorType,$oActivatorType) While $objAsync.IsCompleted = False ;~ ConsoleWrite($objAsync.IsCompleted & @CRLF) ContinueLoop WEnd ConsoleWrite("Completed : " & $objAsync.IsCompleted & @CRLF) $objPsCollection = $pObjectPS.EndInvoke($objAsync) ;~ ConsoleWrite("$objPsCollection: " & IsObj($objPsCollection) & @TAB & "$objPsCollection: " & ObjName($objPsCollection) & " - " & ObjName($objPsCollection,6) & " - " & ObjName($objPsCollection,3) & @CRLF) EndFunc Func _Base64Decode($input_string) Local $struct = DllStructCreate("int;int;int") Local $dwFlags = 1 ; Base64, no headers DllCall("Crypt32.dll", "int", "CryptStringToBinary", _ "str", $input_string, _ "int", StringLen($input_string), _ "int", $dwFlags, _ "ptr", 0, _ "ptr", DllStructGetPtr($struct, 1), _ "ptr", DllStructGetPtr($struct, 2), _ "ptr", DllStructGetPtr($struct, 3)) Local $a = DllStructCreate("byte[" & DllStructGetData($struct, 1) & "]") DllCall("Crypt32.dll", "int", "CryptStringToBinary", _ "str", $input_string, _ "int", StringLen($input_string), _ "int", $dwFlags, _ "ptr", DllStructGetPtr($a), _ "ptr", DllStructGetPtr($struct, 1), _ "ptr", DllStructGetPtr($struct, 2), _ "ptr", DllStructGetPtr($struct, 3)) Return DllStructGetData($a, 1) EndFunc ;==>_Base64Decode Downloads : SSRS Assembly here : 2008 / 2010 / 2012 or 2015 Many thanks for the developer(s) of the SSRS .NET Assembly ! Enjoy ! ptrex

Yes, it's possible use: $sCell = _Excel_RangeRead($oWorkbook, Default, $oExcel.ActiveCell.Offset(2,2).Address)

U have to run the below code. But you may need to use a sleep after this statement before exporting _IENavigate($oIE, "javascript:orderChange('desc','Descending')")