Stataメモ Excelファイルをdtaファイルに変換

Excel形式のファイルを一括でdta形式のファイルに変換する方法。

FinancialQuestから大量にダウンロードした時に便利。

cd [directory_name] //Excelファイルが入っているフォルダを選択
mkdir "dta" //dta保存用フォルダ作成
local xlslist: dir . files "*.xls" //フォルダ内のExcelファイル名を取得
foreach file of local xlslist {
import excel `file', sheet("Sheet1") clear //ExcelのSheet1をStataにインポートする
local name : subinstr local file ".xls" "" //取得したファイル名から[.xls]を削除

/* 1行目にデータが来るように行を調整 */
drop if _n==1
drop if _n==1
drop if _n==1

save dta/`name'.dta, replace //取り込んだExcelファイルをdtaに変換
}
cd "dta" //dtaフォルダに移動
local dtalist : dir . files "*.dta" //dtaのファイル名を取得
append using `dtalist' //ひとつのファイルにまとめる
save alldata.dta, replace //これでまとめられた