Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11121 / 76735 ←次へ　｜　前へ→
【71155】Re:エクセルデータをコピーしメモ帳立ち上げ貼り付ける
回答  とおりすぎ  - 12/2/2(木) 17:58 -
引用なし
パスワード
   こんなの。
Sub CreateTxt()
　Const TxtPath As String = "D:\test\Hoge.txt"　'適当なPath
　Dim wb As Workbook
　
　ActiveSheet.Copy
　Set wb = ActiveWorkbook
　wb.SaveAs TxtPath, xlUnicodeText
　wb.Close False
　Shell "NotePad.exe " & TxtPath
End Sub

Sub KillTxt()
　Const TxtPath As String = "D:\test\Hoge.txt"　'上と同じPath
　Kill TxtPath
End Sub

KillTxtの法は、メモ帳閉じてから実効。
7 hits
▼ 【71149】エクセルデータをコピーしメモ帳立ち上げ貼り付ける け 12/2/2(木) 16:56 質問
【71150】Re:エクセルデータをコピーしメモ帳立ち上... とおりすぎ 12/2/2(木) 17:25 回答
【71151】Re:エクセルデータをコピーしメモ帳立ち上... とおりすがりがり 12/2/2(木) 17:30 回答
【71152】Re:エクセルデータをコピーしメモ帳立ち上... け 12/2/2(木) 17:34 質問
【71154】Re:エクセルデータをコピーしメモ帳立ち上... とおりすぎ 12/2/2(木) 17:45 回答
【71155】Re:エクセルデータをコピーしメモ帳立ち上... とおりすぎ 12/2/2(木) 17:58 回答≪
【71156】Re:エクセルデータをコピーしメモ帳立ち上... ちん 12/2/2(木) 18:08 発言
【71157】Re:エクセルデータをコピーしメモ帳立ち上... け 12/2/2(木) 18:30 お礼
【71158】Re:エクセルデータをコピーしメモ帳立ち上... ちん 12/2/2(木) 22:53 発言
【71159】Re:エクセルデータをコピーしメモ帳立ち上... ちん 12/2/3(金) 0:36 発言
【71160】Re:エクセルデータをコピーしメモ帳立ち上... とおりすがりがり 12/2/3(金) 8:50 回答
【71161】Re:エクセルデータをコピーしメモ帳立ち上... ちん 12/2/3(金) 9:22 発言
【71165】Re:エクセルデータをコピーしメモ帳立ち上... ちん 12/2/3(金) 11:19 発言
【71174】Re:エクセルデータをコピーしメモ帳立ち上... Abyss 12/2/3(金) 16:41 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11121 / 76735 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free