AppleScriptでデキストデータをExcel

質問

AppleScriptでテキストファイルをExcelで開きたいのですが、
区切り文字をスペースと|の2つを指定したいのです。
スペースだけなら
tell application "Microsoft Excel"
open text file filename ￢
"Mac HD:Folder:File.txt" data type delimited with space
end tell
とできたのですが、|を組み合わせた場合がわかりません。
ご教授ください。

回答No.1

noname#250373 · ベストアンサー

(1) ファイル数が少なければ、テキストエディタの類いを使って
「｜」をスペースに置換したものを用意した方が早いと思います。

(2) Excel2011では２つの区切り文字でインポートできました。
Excelの「インポート」メニューで可能です。
操作の過程をスクリーンショットで撮りましたので、参考にしてみて下さい。

(3) てっきりExcelではできないと思い込んで、
以下のようなスクリプトを作ってしまいました(汗

--テキストファイルの「|」をスペースに置換したファイルを作成し、
--Excelでスペース区切りファイルとして読み込ませるAppleScript
--OSX10.6.8 + Excel2011で動作確認

--ここで目的のファイルを選択(今回の場合、デスクトップの"File.txt")
set aFile to (choose file with prompt "「|」区切りをスペースに変換したいファイルを選択して下さい") as alias

--ファイルの内容を読み込み
try
open for access aFile
set theBeforeText to read aFile as string
end try
close access aFile

--ファイル名の取得
set aName to aFile as text
if aName ends with ".txt" then
set aName to characters 1 thru -5 of aName as text --as textにしないと文字バラバラ
end if

--デリミタによる区切り文字の置換。詳しくは
--http://tonbi.jp/AppleScript/Tips/String/FindReplace.html
--などを参考にしてみて下さい。
set tmp to AppleScript's text item delimiters
try
set AppleScript's text item delimiters to "|"
set theTempText to every text item of theBeforeText
set AppleScript's text item delimiters to space
set theAfterText to theTempText as string
end try
set AppleScript's text item delimiters to tmp

--区切り文字をスペースだけにしたファイルの作成(space_File.txt)
set aOutPath to (aName & "_space.txt") as text
try
set bFile to open for access file aOutPath with write permission
log class of aOutPath
write theAfterText to file aOutPath
on error
tell current application
activate
display dialog "ファイル書き出し時にエラー発生!" & return & "書き出す予定のファイルと同じ名前のファイルが存在しませんか？" with icon 2
end tell
end try
close access bFile

--あなたのスクリプトに受け渡し(Excelでオープン)
delay 1
tell application "Microsoft Excel"
open text file filename aOutPath data type delimited with space
end tell

参考URL：

http://tonbi.jp/AppleScript/Tips/String/FindReplace.html

お礼

ありがとうございます。
うまくできました。

中身は只今解読中…
チョウ初心者なのでなかなかハードルが高いです。
でもがんばります。

回答No.3

noname#250373

無理に理解しようとしなくても大丈夫ですよ^-^
個々の処理は基本的なものですので、
今は「こんな処理ができるんだ」と
心に留めてもらえるだけで十分です。

私も他の方のスクリプトを参考に
見よう見まねで組み立てている初心者ですから
偉そうなことは言えません（汗
お互い頑張りましょう！

お礼

ありがとうございます。
みなさん、一歩一歩なんですね…
温かい言葉を胸にこれからも精進していきます！！

回答No.2

noname#250373

スクリーンショットの画像が荒すぎたので
やや大きめのファイルをアップし直しました。