Excel VBA 質問スレ Part80(ワッチョイあり) (99レス)
Excel VBA 質問スレ Part80(ワッチョイあり) http://mevius.5ch.net/test/read.cgi/tech/1700826110/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
レス栞
あぼーん
33: デフォルトの名無しさん (ワッチョイ 53dd-sTEQ) [sage] 2024/03/23(土) 13:55:04.13 ID:ulv10UCb0 助けて下さい 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", _ FileFormat:=xlCurrentPlatformText Application.DisplayAlerts = False Range("B3").Select Sheets("入力チェック表").Select Range("H4").Select Application.Quit ThisWorkbook.Close ActiveWorkbook.Close SaveChanges:=False End Sub http://mevius.5ch.net/test/read.cgi/tech/1700826110/33
34: デフォルトの名無しさん (ワッチョイ 53dd-sTEQ) [sage] 2024/03/23(土) 14:01:19.14 ID:ulv10UCb0 シートlabelをtxtに変換して 別のアプリで読み込もうと思います ですが、最後はエクセルが 終了してしまうため (bookが閉じる) 終了しないようにしたいのですが 最後3行を削除すると txtを保存するためのアラートが出たり アプリで読み込むと 読込エラーが出たりします (txtファイル使用中の為?) エクセル終了しない方法は ありますか? http://mevius.5ch.net/test/read.cgi/tech/1700826110/34
36: デフォルトの名無しさん (ワッチョイ 53dd-sTEQ) [sage] 2024/03/23(土) 15:09:35.81 ID:ulv10UCb0 >>35 ありがとうございます >>34 Application.quit を削除したのですが エクセルは終了しませんが book?が終了します http://mevius.5ch.net/test/read.cgi/tech/1700826110/36
39: デフォルトの名無しさん (ワッチョイ 53dd-sTEQ) [sage] 2024/03/23(土) 16:28:38.79 ID:ulv10UCb0 >>37 アドバイスありがとうございます 閉じるしか 無理ですか... http://mevius.5ch.net/test/read.cgi/tech/1700826110/39
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.427s*