<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Export value to multiple cells in excel in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926231#M134240</link>
    <description>&lt;P&gt;hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/7812054"&gt;@WCrihfield&lt;/a&gt;&amp;nbsp;, thank you for your reply.&amp;nbsp;&lt;/P&gt;&lt;P&gt;I was afraid that this would indeed be the only possible solution within iLogic. The example here was quite a short parts list, but unfortunately most parts lists will be way longer. This would mean I have to make a list with so many values. I think i'll just let ilogic write one value to the excel, and let excel run a macro to drag this value to all following rows.&lt;/P&gt;</description>
    <pubDate>Thu, 03 Feb 2022 15:27:32 GMT</pubDate>
    <dc:creator>hldr</dc:creator>
    <dc:date>2022-02-03T15:27:32Z</dc:date>
    <item>
      <title>Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10925885#M134222</link>
      <description>&lt;P&gt;Hi,&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I'm currently working on a rule which exports the bom to an excel. I need to add an additional column which adds the name of the main assembly to each row, as shown in the attached image.&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I currently have something like this:&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;'Add additional data to macro excel&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;test&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;, &lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;, &lt;SPAN&gt;"K1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"Mainassy"&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;test&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;, &lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;, &lt;SPAN&gt;"L1"&lt;/SPAN&gt;) = "assembly1"
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;test&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;, &lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;, &lt;SPAN&gt;"M1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"Amount"&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;test&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;, &lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;, &lt;SPAN&gt;"N1"&lt;/SPAN&gt;) = "1"&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;But i need something that will add the text to all cells in a column instead of just one.&amp;nbsp;&lt;/P&gt;&lt;P&gt;Does anyone know if there is a possibility to do this?&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Thu, 03 Feb 2022 13:17:16 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10925885#M134222</guid>
      <dc:creator>hldr</dc:creator>
      <dc:date>2022-02-03T13:17:16Z</dc:date>
    </item>
    <item>
      <title>Re: Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926036#M134230</link>
      <description>&lt;P&gt;Hi &lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/9279949"&gt;@hldr&lt;/a&gt;.&amp;nbsp; I think you may be talking about this.&lt;/P&gt;
&lt;LI-CODE lang="general"&gt;Dim oVals As IList(Of String) = {"assembly1", "assembly1", "assembly1", "assembly1", "assembly1", "assembly1" }
GoExcel.CellValues("H2", "H7") = oVals&lt;/LI-CODE&gt;
&lt;P&gt;That will write that set of values to all the cells in a single column, which you specify the starting cell and end cell for.&amp;nbsp; I just used data already seen in your Excel image, as an example.&lt;/P&gt;</description>
      <pubDate>Thu, 03 Feb 2022 14:20:57 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926036#M134230</guid>
      <dc:creator>WCrihfield</dc:creator>
      <dc:date>2022-02-03T14:20:57Z</dc:date>
    </item>
    <item>
      <title>Re: Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926231#M134240</link>
      <description>&lt;P&gt;hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/7812054"&gt;@WCrihfield&lt;/a&gt;&amp;nbsp;, thank you for your reply.&amp;nbsp;&lt;/P&gt;&lt;P&gt;I was afraid that this would indeed be the only possible solution within iLogic. The example here was quite a short parts list, but unfortunately most parts lists will be way longer. This would mean I have to make a list with so many values. I think i'll just let ilogic write one value to the excel, and let excel run a macro to drag this value to all following rows.&lt;/P&gt;</description>
      <pubDate>Thu, 03 Feb 2022 15:27:32 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926231#M134240</guid>
      <dc:creator>hldr</dc:creator>
      <dc:date>2022-02-03T15:27:32Z</dc:date>
    </item>
    <item>
      <title>Re: Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926307#M134242</link>
      <description>&lt;P&gt;Another fairly common and efficient way to write stuff to Excel is to gather all the data you want to write to Excel into a 2-dimensional array of Object first, then write that whole array of data to Excel at once.&amp;nbsp; I don't recall if this is possible using those iLogic only GoExcel snippets, but I definitely know it is possible when done the long way.&amp;nbsp; Here is an example I created some time ago for the task of writing a 2-dimensional array of data to Excel.&lt;/P&gt;
&lt;LI-CODE lang="general"&gt;AddReference "Microsoft.Office.Interop.Excel.dll"
Imports Microsoft.Office.Interop
Imports Microsoft.Office.Interop.Excel
Sub Main
	'create a 2-dimensional array and fill-in its values
	'when creating a 2D array:
	'- If you are going to assign individual values for each cell you must specify the array's size
	'- If you are setting a block of data to the array all at one time, you don't need to specify its size
	'- first number in (,) is number of rows (minus one, because it starts at zero)
	'- second number in (,) is number of columns (minus one, because it starts at zero)
	Dim oVals(2, 1) As String
	'when setting individual values to a 2D array, specify row index first, then column index)
	oVals(0, 0) = "First"
	oVals(0, 1) = "One"
	oVals(1, 0) = "Second"
	oVals(1, 1) = "Two"
	oVals(2, 0) = "Third"
	oVals(2, 1) = "Three"

	'start a new instance of Excel
	Dim oExcel As New Excel.Application
	oExcel.DisplayAlerts = False
	oExcel.Visible = True
	'create a new Excel document
	Dim oWB As Workbook = oExcel.Workbooks.Add
	'create a new sheet/worksheet
	Dim oWS As Worksheet = oWB.Sheets.Add
	'specify the range of cells in the sheet to put the data
	'when using 'Cells', specify row index first, then column index (starting with one (1))
'	Dim oRange As Range = oWS.Range(oWS.Cells(1, 1), oWS.Cells(3, 2))
	'or
	Dim oRange As Range = oWS.Range("A1:B3")
	'set the cell values to the array values
	oRange.Value = oVals
	
'	save the new Excel document to the hard drive.
'	oWB.SaveAs("C:\Temp\Test.xlsx")

'	'close the workbook (Excel document)
'	oWB.Close

'	'close this instance of Excel
'	oExcel.Quit
End Sub&lt;/LI-CODE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Thu, 03 Feb 2022 15:46:50 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10926307#M134242</guid>
      <dc:creator>WCrihfield</dc:creator>
      <dc:date>2022-02-03T15:46:50Z</dc:date>
    </item>
    <item>
      <title>Re: Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10931164#M134316</link>
      <description>&lt;P&gt;The key to populating cells like your requesting&amp;nbsp; in excel is really where do you want to start and stop your input of data.&amp;nbsp;&lt;/P&gt;&lt;P&gt;Because the range can be any size you need to try and find out what the size may be. You want to know where the last blank cell is in a specific column in many cases.&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Here is a go excel method to achieve this.&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;Open&lt;/SPAN&gt;(&lt;SPAN&gt;""C:\User\Desktop\" &amp;amp; test &amp;amp; ".xlsm""&lt;/SPAN&gt;, &lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;)
&lt;SPAN&gt;'Column Title &lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"K1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"Mainassy"&lt;/SPAN&gt; 
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"L1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"assembly1"&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"M1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"Amount"&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"N1"&lt;/SPAN&gt;) = &lt;SPAN&gt;"1"&lt;/SPAN&gt;
&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt; = 2 &lt;SPAN&gt;To&lt;/SPAN&gt; 1000  &lt;SPAN&gt;'Loop to a known row number past the populated data in the excel sheet&lt;/SPAN&gt;
	&lt;SPAN&gt;Cellvalue&lt;/SPAN&gt; = &lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"A"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;i&lt;/SPAN&gt;+1) &lt;SPAN&gt;'Check a known column with cells that are consistently populated like "Item" from a BOM List + 1 then to end on right row&lt;/SPAN&gt;
	&lt;SPAN&gt;'Cell content&lt;/SPAN&gt;
	&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"K"&lt;/SPAN&gt;&amp;amp;&lt;SPAN&gt;i&lt;/SPAN&gt;) = &lt;SPAN&gt;"Mainassy"&lt;/SPAN&gt; 
	&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"L"&lt;/SPAN&gt;&amp;amp;&lt;SPAN&gt;i&lt;/SPAN&gt;) = &lt;SPAN&gt;"assembly1"&lt;/SPAN&gt;
	&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"M"&lt;/SPAN&gt;&amp;amp;&lt;SPAN&gt;i&lt;/SPAN&gt;) = &lt;SPAN&gt;"Amount"&lt;/SPAN&gt;
	&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;CellValue&lt;/SPAN&gt;(&lt;SPAN&gt;"N"&lt;/SPAN&gt;&amp;amp;&lt;SPAN&gt;i&lt;/SPAN&gt;) = &lt;SPAN&gt;"1"&lt;/SPAN&gt;
	
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Cellvalue&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;For&lt;/SPAN&gt;
&lt;SPAN&gt;Next&lt;/SPAN&gt;

&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;Save&lt;/SPAN&gt;
&lt;SPAN&gt;GoExcel&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Here is another method using current region to find the table size, then find the last row then use autofill to populate data. You could also use a for loop like above to accomplish the same.&amp;nbsp;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&lt;A href="https://docs.microsoft.com/en-us/office/vba/api/excel.range.autofill" target="_blank"&gt;https://docs.microsoft.com/en-us/office/vba/api/excel.range.autofill&lt;/A&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&lt;A href="https://docs.microsoft.com/en-us/office/vba/api/excel.range.currentregion" target="_blank"&gt;https://docs.microsoft.com/en-us/office/vba/api/excel.range.currentregion&lt;/A&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;'AddReference "Microsoft.Office.Interop.Excel.dll"&lt;/SPAN&gt;
&lt;SPAN&gt;'Imports Microsoft.Office.Interop&lt;/SPAN&gt;
&lt;SPAN&gt;'Imports Microsoft.Office.Interop.Excel&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;()

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;xlApp&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;Excel&lt;/SPAN&gt;.&lt;SPAN&gt;Application&lt;/SPAN&gt; &lt;SPAN&gt;'start a new instance of Excel&lt;/SPAN&gt;
&lt;SPAN&gt;xlApp&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayAlerts&lt;/SPAN&gt; = &lt;SPAN&gt;False&lt;/SPAN&gt;
&lt;SPAN&gt;xlApp&lt;/SPAN&gt;.&lt;SPAN&gt;Visible&lt;/SPAN&gt; = &lt;SPAN&gt;True&lt;/SPAN&gt;

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;xlWorkbook&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Workbook&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorkbook&lt;/SPAN&gt; = &lt;SPAN&gt;xlApp&lt;/SPAN&gt;.&lt;SPAN&gt;Workbooks&lt;/SPAN&gt;.&lt;SPAN&gt;Open&lt;/SPAN&gt;(&lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;test&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;)

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Worksheet&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt; = &lt;SPAN&gt;xlWorkbook&lt;/SPAN&gt;.&lt;SPAN&gt;Worksheets&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Parts List"&lt;/SPAN&gt;)

&lt;SPAN&gt;'Column Title &lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L1"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"assembly1"&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"M1"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"Amount"&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"N1"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"1"&lt;/SPAN&gt;

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;LastCol&lt;/SPAN&gt;,&lt;SPAN&gt;LastRow&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Long&lt;/SPAN&gt;
&lt;SPAN&gt;LastCol&lt;/SPAN&gt; = &lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"A1"&lt;/SPAN&gt;).&lt;SPAN&gt;CurrentRegion&lt;/SPAN&gt;.&lt;SPAN&gt;Columns&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; 
&lt;SPAN&gt;LastRow&lt;/SPAN&gt; = &lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"A1"&lt;/SPAN&gt;).&lt;SPAN&gt;CurrentRegion&lt;/SPAN&gt;.&lt;SPAN&gt;Rows&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; &lt;SPAN&gt;'Find last row use any row that will have consistent content&lt;/SPAN&gt;

&lt;SPAN&gt;'Cell content&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L2"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"assembly1"&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"M2"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"Amount"&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"N2"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"1"&lt;/SPAN&gt;

&lt;SPAN&gt;'Cell Autofill&lt;/SPAN&gt;
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L2"&lt;/SPAN&gt;).&lt;SPAN&gt;AutoFill&lt;/SPAN&gt;(&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L2:L"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;LastRow&lt;/SPAN&gt;))
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"M2"&lt;/SPAN&gt;).&lt;SPAN&gt;AutoFill&lt;/SPAN&gt;(&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"M2:M"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;LastRow&lt;/SPAN&gt;))
&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"N2"&lt;/SPAN&gt;).&lt;SPAN&gt;AutoFill&lt;/SPAN&gt;(&lt;SPAN&gt;xlWorksheet&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"N2:N"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;LastRow&lt;/SPAN&gt;))
	
&lt;SPAN&gt;xlWorkbook&lt;/SPAN&gt;.&lt;SPAN&gt;Save&lt;/SPAN&gt;
&lt;SPAN&gt;'xlWorkbook.Close (False)&lt;/SPAN&gt;
&lt;SPAN&gt;'xlApp.Quit&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;I see that you are writing to a macro enabled work book so likely you can do the same within Excel VBA. I have a lot of Macros in my Macro workbook for processing BOM's and these are triggered by a population of a cell then the Excel VBA Macro takes over and finish the rest. It can be easier than converting the VBA macro to VB.NET.&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sun, 06 Feb 2022 00:27:27 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10931164#M134316</guid>
      <dc:creator>A.Acheson</dc:creator>
      <dc:date>2022-02-06T00:27:27Z</dc:date>
    </item>
    <item>
      <title>Re: Export value to multiple cells in excel</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10933057#M134333</link>
      <description>&lt;P&gt;Thank you guys! I already gave up, but reading your comments gave me new hope and it's working now! it's something like this now:&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;		&lt;SPAN&gt;wb2&lt;/SPAN&gt; = &lt;SPAN&gt;excelApp&lt;/SPAN&gt;.&lt;SPAN&gt;Workbooks&lt;/SPAN&gt;.&lt;SPAN&gt;Open&lt;/SPAN&gt;(&lt;SPAN&gt;MacroExcel&lt;/SPAN&gt;)
		&lt;SPAN&gt;xlws2&lt;/SPAN&gt; = &lt;SPAN&gt;wb2&lt;/SPAN&gt;.&lt;SPAN&gt;WorkSheets&lt;/SPAN&gt;(1)
		
		&lt;SPAN&gt;'get partnumber of main asssembly &lt;/SPAN&gt;
		&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;dwgSheet&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Sheet&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;ThisDrawDoc&lt;/SPAN&gt;.&lt;SPAN&gt;Sheets&lt;/SPAN&gt;
			&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;dwgSheet&lt;/SPAN&gt;.&lt;SPAN&gt;DrawingViews&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; &amp;gt; 0 &lt;SPAN&gt;Then&lt;/SPAN&gt;
				&lt;SPAN&gt;'modelFile = dwgSheet.DrawingViews(1).ReferencedDocumentDescriptor.FullDocumentName&lt;/SPAN&gt;
				&lt;SPAN&gt;modelDoc&lt;/SPAN&gt; = &lt;SPAN&gt;dwgSheet&lt;/SPAN&gt;.&lt;SPAN&gt;DrawingViews&lt;/SPAN&gt;(1).&lt;SPAN&gt;ReferencedDocumentDescriptor&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocument&lt;/SPAN&gt;
				&lt;SPAN&gt;prtNumber&lt;/SPAN&gt; = &lt;SPAN&gt;modelDoc&lt;/SPAN&gt;.&lt;SPAN&gt;PropertySets&lt;/SPAN&gt;(&lt;SPAN&gt;"Design Tracking Properties"&lt;/SPAN&gt;).&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Part Number"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt;
			&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
		&lt;SPAN&gt;Next&lt;/SPAN&gt;
                &lt;BR /&gt;                oLastRow = xlws.UsedRange.Rows.Count&lt;BR /&gt;
		&lt;SPAN&gt;'Column Title &lt;/SPAN&gt;
		&lt;SPAN&gt;xlws2&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"K1"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"Maakartikel:"&lt;/SPAN&gt;
		&lt;SPAN&gt;xlws2&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L1"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;"Batchgrootte:"&lt;/SPAN&gt;

		&lt;SPAN&gt;'Add assembly name and production amount to parts&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;MaakRange2&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Range&lt;/SPAN&gt; = &lt;SPAN&gt;xlws2&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"K2:K"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oLastRow&lt;/SPAN&gt;)
		&lt;SPAN&gt;MaakRange2&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;prtNumber&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;BatchRange2&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Range&lt;/SPAN&gt; = &lt;SPAN&gt;xlws2&lt;/SPAN&gt;.&lt;SPAN&gt;Range&lt;/SPAN&gt;(&lt;SPAN&gt;"L2:L"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oLastRow&lt;/SPAN&gt;)
		&lt;SPAN&gt;BatchRange2&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt; = &lt;SPAN&gt;Production_Amount&lt;/SPAN&gt;

		&lt;SPAN&gt;'Save Document As&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;FileName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;
		&lt;SPAN&gt;FileName&lt;/SPAN&gt; = &lt;SPAN&gt;"C:\User\Desktop\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;sFileName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".xlsm"&lt;/SPAN&gt;

		&lt;SPAN&gt;wb2&lt;/SPAN&gt;.&lt;SPAN&gt;SaveAs&lt;/SPAN&gt;(&lt;SPAN&gt;FileName&lt;/SPAN&gt;)

		&lt;SPAN&gt;wb2&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;


		&lt;SPAN&gt;'excelApp.Quit&lt;/SPAN&gt;
		&lt;SPAN&gt;'excelApp = Nothing&lt;/SPAN&gt;
		&lt;SPAN&gt;excelApp&lt;/SPAN&gt;.&lt;SPAN&gt;Application&lt;/SPAN&gt;.&lt;SPAN&gt;Quit&lt;/SPAN&gt;&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 07 Feb 2022 09:13:52 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-value-to-multiple-cells-in-excel/m-p/10933057#M134333</guid>
      <dc:creator>hldr</dc:creator>
      <dc:date>2022-02-07T09:13:52Z</dc:date>
    </item>
  </channel>
</rss>

