Excel VBA 質問スレ Part80(ﾜｯﾁｮｲあり) (101ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん
33: (ﾜｯﾁｮｲ 53dd-sTEQ) 2024/03/23(土)13:55 ID:ulv10UCb0(1/4) AAS
助けて下さい
txtに変換して
そのtxtを別のアプリで
読み込もうとしています
Application.CutCopyMode = False
Dim book1 As Workbook
Sheets("label").Select
Application.DisplayAlerts = False
Set book1 = Workbooks("◯◯◯.xlsm")
book1.SaveAs Filename:="C:\Users\aaaaa\Desktop\片山\label.txt", _
省9
34(2): (ﾜｯﾁｮｲ 53dd-sTEQ) 2024/03/23(土)14:01 ID:ulv10UCb0(2/4) AAS
シートlabelをtxtに変換して
別のアプリで読み込もうと思います
ですが、最後はエクセルが
終了してしまうため
(bookが閉じる)
終了しないようにしたいのですが
最後3行を削除すると
txtを保存するためのアラートが出たり
アプリで読み込むと
読込エラーが出たりします
省3
36(1): (ﾜｯﾁｮｲ 53dd-sTEQ) 2024/03/23(土)15:09 ID:ulv10UCb0(3/4) AAS
>>35
ありがとうございます
>>34
Application.quit
を削除したのですが
エクセルは終了しませんが
book？が終了します
39: (ﾜｯﾁｮｲ 53dd-sTEQ) 2024/03/23(土)16:28 ID:ulv10UCb0(4/4) AAS
>>37
アドバイスありがとうございます
閉じるしか
無理ですか...
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.579s*