Excel VBA 質問スレ Part83 (611レス)
Excel VBA 質問スレ Part83 http://mevius.5ch.net/test/read.cgi/tech/1749348402/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
520: デフォルトの名無しさん [] 2025/08/01(金) 10:40:10.51 ID:R6RHAbIb 昨日まで使ってたのが急にエラー出るようになったけど何が原因か分からなかったのでアドバイス下さい 使用マクロ Sub 表作成() Dim ws1 As Worksheet Set ws1 = ThisWorkbook.Worksheets("記") Dim cmax1 As Long cmax1=ws1.Range("A1048576").End(xlUp).Row With ws1.Sort .SortFields.Clear .SortFields.Add Key:=ws1.Range("A2"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .SetRange ws1.Range("A3:L" & cmax1) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Columns("E:E").ColumnWidth = 0 Columns("I:I").ColumnWidth = 0 Columns("K:K").ColumnWidth = 0 ActiveWorkbook.SaveAs Filename:="C:\Users\User\Documents\ファイルパス\請求書" & " " & Format(Date, "yyyymmdd") & ".xlsx", FileFormat:=xlOpenXMLWorkbook End Sub エラー内容 ファイル'C:\Users\User\Documents\ファイルパス\請求書\7E1A4F10'にアクセスできません http://mevius.5ch.net/test/read.cgi/tech/1749348402/520
523: デフォルトの名無しさん [] 2025/08/01(金) 16:09:22.52 ID:R6RHAbIb >>521 再度試しましたが発生しました エラーメッセージは正確には ファイル'C:\Users\User\Documents\ファイルパス\請求書\PDF/7E1A4F10'にアクセスできません(7E1A4F10は毎回別の文字列になります)です 昨日からの変更点はSSDが壊れたため、D:/をC:/に変更しました http://mevius.5ch.net/test/read.cgi/tech/1749348402/523
527: デフォルトの名無しさん [] 2025/08/01(金) 18:38:36.40 ID:R6RHAbIb すいません、/は¥です コピペしたら変わってた http://mevius.5ch.net/test/read.cgi/tech/1749348402/527
538: デフォルトの名無しさん [] 2025/08/01(金) 22:28:18.18 ID:R6RHAbIb >>534 D:→C:~Documents¥に変えたくらいしか心当たりないんです >>535 ごめんなさい http://mevius.5ch.net/test/read.cgi/tech/1749348402/538
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.032s