input
forvalues i=1(1)300 {
display `i'
clear all
display Area[1]
use "data (`i').dta"
export excel using "data (`display Area[1]' `i')", firstrow(variables) replace
}

output
1
data( 1).xls