In your previous case your data was in 256 rows with one column. Now it is in one row with 500 columns. Therefore your list structure is different. Please read up on list structures in Mathematica:
http://reference.wolfram.com/language/howto/WorkWithLists.html
The basic point is that the answer to your original question was tailored to the very specific data structure that your Excel import generated. If the dat structure changes then you need to modify your code accordingly to get the data that you need. In your new example it would be
dx = .12
dx (Integrate[
Interpolation[data1[[1, 1]], InterpolationOrder -> 2][x], {x, 1,
500}])