Dynamic write cell help

I want to write data from Sheet1 to Sheet2 dynamically, but when the first data is written, it doesn’t write as I want and does this:


But this is what I want to happen:

As you can see is happening something weird :frowning:

This is my code:

Excel process scope
Do (excel process scope):
Use excel file
Do (use excel file):
Read range
Range: Excel.Sheet(“Sheet1”).Range(“B3:N3”)
Save to: dtHeaders
Unchecked: Has headers

		Assign
			DepartmentColumnIndex =
			Array.IndexOf(dtHeaders.Rows(0).ItemArray, "Department")

		Assign
			MonthIndices =
			(From month In {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"}
            Select Array.IndexOf(dtHeaders.Rows(0).ItemArray, month)).ToArray()

		Read range
			Excel.Sheet("Sheet1").Range("B4:N8")
			dtData

		For each row in data table
			dtData
			row
			Body (for each row in data table)
				Assign
					departmentName =
					row(DepartmentColumnIndex).ToString()


				For each currentNumber
					In: MonthIndices
					Body (for each currentNumber)
						Assign
							MonthName =
							dtHeaders.Rows(0).ItemArray(currentNumber).ToString()

						Assign
							targetRow =
							dtData.Rows.IndexOf(row) + 5
		
						Assign
							targetColumn =
							Array.IndexOf({"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"}, MonthName) + 13

						Assign
							cellAddress =
							"Sheet2!" & Chr(64 + targetColumn) & targetRow.ToString()

						Write Cell
						row(currentNumber).ToString()
						Excel.Sheet("Sheet2").Cell(cellAddress)


RPA10.zip (180,5 KB)
RPA4.xlsx (13,5 KB)

What can I do to fix it?

Change to
targetRow=dtData.Rows.IndexOf(row)*4 + 5

This topic was automatically closed 3 days after the last reply. New replies are no longer allowed.