« [SystemEvent]Plistへの書き込み基本編(デスクトップアイコンの表示・非表示) | トップページ | [Excel]ナンバーフォーマット »

[Excel]テキスト形式でのペースト

エクセル内でのコピペ
テキスト形式でペーストします。

ダウンロード - e981b8e68a9ee7af84e59bb2e38292e8a68be3819fe79baee381aee38386e382ade382b9e38388e381ab.scpt.zip


#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
#
#
#
# com.cocolog-nifty.quicktimer.icefloe
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use scripting additions

####アクティブせるをコピーしてテキストにしておく
tell application "Microsoft Excel"
activate
tell application "System Events"
keystroke "c" using command down
end tell
set objClipData to (the clipboard as text)
end tell
###選択中のセル範囲を格納
tell application "Microsoft Excel"
set objSelectionCell to cells of selection
end tell
###選択範囲のセルを文字列形式に
repeat with objCell in objSelectionCell

tell application "Microsoft Excel"
tell window 1
tell active workbook
tell active sheet
tell objCell
set number format to "@"
end tell
end tell
end tell
end tell
end tell

end repeat

####テキストになっているクリップボードのデータを戻す
tell application "Microsoft Excel"
set the clipboard to objClipData
tell application "System Events"
keystroke "v" using command down
end tell
end tell

|

« [SystemEvent]Plistへの書き込み基本編(デスクトップアイコンの表示・非表示) | トップページ | [Excel]ナンバーフォーマット »

AppleScript Microsoft」カテゴリの記事