excel fill in

[yton]

Greetings,

I use StringSplit to split the array and paste data in excel

$array = StringSplit(ClipGet(), "ZZZ", 1)
_WordQuit($oWordapp, 0)
$oExcel = _ExcelBookOpen("Z:\_script\content.csv")
_ExcelSheetActivate($oExcel, "content")
For $i = 1 To $array[0] ;Loop
    _ExcelWriteCell($oExcel, $array[$i], $i, 15)
Next

I have a question:

say, what if the array returns only 10 (20, 30 whatever but < 50) strings - each has to be filled in the corresponding cell in a certain column of a datasheet - and I need to fill in 50 cells? I mean I can even duplicate strings, but 50 cells must be filled in.

what function or loop should I pay attention to in this case?

thank you,

[PsaltyDS]

As I read that (not very clear) description, you mean to fill in rows from $array[0] + 1 to 50 with a default value? So:

For $i = 1 To $array[0] ;Loop
    _ExcelWriteCell($oExcel, $array[$i], $i, 15)
Next

For $i = $array[0] + 1 to 50
    _ExcelWriteCell($oExcel, "<Default Value>", $i, 15)
Next

[Mercury049]

Well if you're only doing this on ONE array, you could do the following.

$arrSplitResults = StringSplit(ClipGet(), "ZZZ", 1)
_WordQuit($oWordapp, 0)
$oExcel = _ExcelBookOpen("Z:\_script\content.csv")
_ExcelSheetActivate($oExcel, "content")

     For $x = 0 to Ubound($arrWhatEversIsHoldingYourData) - 1

       _ExcelWriteCell($oExcel, $arrSplitResults[$i], 1, $x)   

     Next

That would fill in row 1 of your spreadsheet for as many as there are elements in your array.

But I'm guess you really going to use an array of arrays. Like this.

$arrWhatever = _ExcelReadSheetToArray($oExcel)

     For $x = 1 to Ubound($arrWhatever) - 1

          $arrSplit = StringSplit($arrWhatever[$x][1], "ZZZ", 1)

          For $y = 1 to Ubound($arrSplit) - 1

               _ExcelWriteCell($oExcel,$arrSplit[$y],$x,$y)

          Next

     Next

[Mercury049]

As I read that (not very clear) description, you mean to fill in rows from $array[0] + 1 to 50 with a default value? So:

For $i = 1 To $array[0] ;Loop
    _ExcelWriteCell($oExcel, $array[$i], $i, 15)
Next

For $i = $array[0] + 1 to 50
    _ExcelWriteCell($oExcel, "<Default Value>", $i, 15)
Next

I agree with PsaltyDS, the description needs to be a bit clearer, but I'm sure between the two us, your questions should've been answered.

[yton]

I agree with PsaltyDS, the description needs to be a bit clearer, but I'm sure between the two us, your questions should've been answered.

thank you very much.

my question is 100% answered