1. In cell A1 of the target sheet type =sheet1!A1, then drag down to copy formula.
2. In cell B1 of the target sheet type in the following formula: =IF((ROW()/2-INT(ROW()/2))>0,1,0). Then drag down to copy the formula to all cells. The value should be 1 if it is odd row, and 0 if it is even row.
3. Select column A and B in the target sheet, then go to menu Data->Filter->AutoFilter.
4. In column B set filter to equal to 0.Then delete all rows. The rest rows are the odd rows in original order.
5. Delete column B in the target sheet.