[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 10/12 01:34 / Filesize : 275 KB / Number-of Response : 1016
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Excel VBA 質問スレ Part83



1 名前:デフォルトの名無しさん mailto:sage [2025/06/08(日) 11:06:42.20 ID:j4jIPbHU.net]
ExcelのVBAに関する質問スレ
コード書き込みや作成依頼もOK

次スレは>>980が立てること
無理なら細かく安価指定

※前スレ
Excel VBA 質問スレ Part82
https://mevius.5ch.net/test/read.cgi/tech/1737657075/1

445 名前:デフォルトの名無しさん mailto:sage [2025/07/19(土) 09:32:36.51 ID:S5W6kZB3.net]
指定したフォルダ以下の、サブフォルダとファイルを取得する記事も見付けた
>>433 のは、フォルダのみだけど、その中身もそのファイル情報も見れるのはいい
何よりシンプル 開きたい場合は上のを参考にすればいいと思う
https://akira55.com/showfoldertree/

ExcelにTreeViewって無かったっけ?とか思い直してググってて辿り着いた
TreeViewを実装しようと試みて、みんな大好きTANAKAさんのサイト参考にしようとしたら
Form上に配置するのに、その他のコントロールから選ばなきゃならなく成ってて
ImageListに至っては追加はできてもプロパティ変更しようとするとエラー 64bitのせい?
TANAKAの例はExcel2003で説明してるからなのか もはやオワコンなのか なぞ
まぁ、後日のメンテとかも面倒そうだから、Sheet上に書き出すのがいちばん楽なんだろうな

446 名前:デフォルトの名無しさん [2025/07/19(土) 10:05:18.56 ID:TEpbrrsS.net]
>>437
きっとwin11はwindowsではない新種のOSなんだろう

447 名前:デフォルトの名無しさん mailto:sage [2025/07/19(土) 15:57:41.07 ID:ZTd2BQVd.net]
>>439
実行結果のファイルうpしてみて

448 名前:デフォルトの名無しさん mailto:sage [2025/07/19(土) 16:20:49.62 ID:A8cbKdEJ.net]
パス長いとかいい加減にしろとな

449 名前:デフォルトの名無しさん mailto:sage [2025/07/19(土) 16:52:52.55 ID:S5W6kZB3.net]
>>441 ? リンク先に実行結果の画像出てるけど?
他に何を出せと? おれが実行した後のファイルなんて
中身まるごと見られたら困るものだらけだから、嫌なんだけど?

450 名前:デフォルトの名無しさん mailto:sage [2025/07/20(日) 12:26:16.14 ID:UYPMBFMH.net]
見られて困るものだらけのPCって犯罪的な?

451 名前:デフォルトの名無しさん [2025/07/23(水) 07:42:55.14 ID:jnXMDL+k.net]
>>429
その様にコードを書いてマクロを作成するのに何日くらいかかりますか?

452 名前:デフォルトの名無しさん mailto:sage [2025/07/23(水) 08:46:08.98 ID:Rz/tc4F0.net]
回避ルートが無い場合はエラーで止まる分は放置だな
下手なメッセージ出して止まるより分かりやすい

453 名前:デフォルトの名無しさん mailto:sage [2025/07/23(水) 10:53:39.46 ID:S2JD2z+w.net]
>>444
C:\ドキュメント\重要機密\A~E(1)\新しいフォルダ\巨乳物

>>445
俺はこの道30年、最近やっとコメントをしっかり書く習慣が身についてきた感じがしてる
昔も一応は書いてたけど、今見ると言葉が足りてなさすぎて解読に苦労する

>>446
自分だけが使うんならいいけど、他人はエラーメッセージとかさっさと消しちゃったり自力で解決しようとして何が起きたかわからなくされちゃうからなあ



454 名前:デフォルトの名無しさん [2025/07/23(水) 19:11:51.35 ID:jnXMDL+k.net]
>>447
コメントですか

AIに書かせると楽かもしれませんね

455 名前:デフォルトの名無しさん mailto:sage [2025/07/23(水) 20:20:01.08 ID:jSDoEOvR.net]
コメントは最低限しか書かないなあ
リファクタリングしまくって、コメント書かなくてもわかるコードにする方がいいと思う
1〜2日で作成したら、最低1週間はリファクタリング期間

456 名前:デフォルトの名無しさん mailto:sage [2025/07/23(水) 21:02:26.59 ID:3kQj9G/6.net]
規模感がちょっとわからないけどテスト込みで手直し1週間?

457 名前:デフォルトの名無しさん mailto:sage [2025/07/23(水) 21:55:41.80 ID:jSDoEOvR.net]
規模はまちまちだけど、この例ではテスト込みで作成1〜2日
完成後1週間は毎日コードを読み直す時間をとる
すると何かしら改善点が見つかる
毎日読んでも何にも改善点なく1週間過ぎたらステーブル

458 名前:デフォルトの名無しさん [2025/07/24(木) 21:58:34.96 ID:GZnFTazm.net]
複数のシートをpdf出力したいのです。
wb.Sheets(arr).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

の様に、ActiveSheetで指定するしか方法はないのでしょうか?
ActiveSheetは明示的でないので避けたいです

459 名前:デフォルトの名無しさん mailto:sage [2025/07/24(木) 22:07:09.88 ID:CXis1mnI.net]
>>452
wb.Sheets(arr).ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

460 名前:デフォルトの名無しさん mailto:sage [2025/07/24(木) 22:09:24.06 ID:GZcfs+u1.net]
>>452
まずはAIに聞く癖を付けろ

以下の方法でActiveSheetを使わずに複数シートをPDF出力できます:

```vb
wb.Worksheets(arr).ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=pdfPath
```

`wb.Worksheets(arr)`で直接シートコレクションを指定すれば、ActiveSheetに依存せずに済みます。​​​​​​​​​​​​​​​​

461 名前:デフォルトの名無しさん mailto:sage [2025/07/24(木) 22:21:03.69 ID:3SMUfFNx.net]
↓は実行できるけど、
ThisWorkbook.Sheets(Array("Sheet1", "Sheet2")).Select

↓はエラーにならね?
ThisWorkbook.Sheets(Array("Sheet1", "Sheet2")).ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

462 名前:デフォルトの名無しさん [2025/07/24(木) 22:52:04.71 ID:GZnFTazm.net]
>>454
はい、AIは大嘘つき

463 名前:デフォルトの名無しさん [2025/07/24(木) 22:52:55.23 ID:GZnFTazm.net]
>>453
無理でーす



464 名前:デフォルトの名無しさん [2025/07/24(木) 22:53:12.34 ID:GZnFTazm.net]
>>455
正解!

465 名前:デフォルトの名無しさん [2025/07/24(木) 22:57:55.91 ID:GZnFTazm.net]
wb.Sheets(配列).Select

ActiceSheet..ExportAsFixedFormat Type:=xlTypePDF, Filename:=Path
でしかエラーになります

466 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 01:14:02.16 ID:f/mD0P8I.net]
>>452
Selectが必要なことに変わりはないがActiveSheetを排除したいのならこう書ける
wb.Sheets(arr).Select
wb.Sheets(arr(0)).ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

467 名前:デフォルトの名無しさん [2025/07/25(金) 01:45:35.35 ID:YmqTu82J.net]
>>460
それは複数シートではなく、単一のシートですよな

468 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 07:52:00.89 ID:UfHu+jPG.net]
変数使ってループさせるくらいの頭働かせられないくらい頭沸いちゃったのかな
暑いからね

469 名前:デフォルトの名無しさん [2025/07/25(金) 08:02:36.99 ID:YmqTu82J.net]
>>462
複数のシートを個別のpdfファイルにエクスポート、ではないです
複数のシートを1つのpdfファイルに、です
これの方法がActiceSheet.ExportAsFixedFormatしか見つからなくて、ActiceSheetの様な曖昧な指定は嫌だなぁと思うのです

470 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 08:22:07.09 ID:JviM2itp.net]
ActiveSheetを明示するだけでしょ
今のActiveSheetをテンポラリに持っておいて、
特定のシートをActivate
それを書き出した後テンポラリをActivate

471 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 08:40:06.97 ID:f/mD0P8I.net]
>>461
選択中のどれかのシートをエクスポートすれば選択シートすべてが出力される不思議仕様

472 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 09:10:21.07 ID:6JkrjnZc.net]
ActiveSheetはワークシート(単・複数)へのポインタみたいなものだよ
シートを省略して書かれたメソッドは常にActiveSheetを対象操作にする

473 名前:デフォルトの名無しさん [2025/07/25(金) 12:31:12.82 ID:YmqTu82J.net]
そうだったんですか
wb.Sheets(arr).Select

〜中略〜

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

と書いたにも関わらず、何故か出力されたpdfが1シートのみ
という事があって、もしかしてcopy modeの様に、ちょっとした操作でシートのグループ化が解除されるのかなと思いました。



474 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 12:41:13.91 ID:7k67EuH4.net]
そりゃ解除されるよ
選択していないシートをアクティベートしたりね
ユーザー操作で違和感なく動作するのが大前提だから

475 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 18:16:56.05 ID:O3RmL+0a.net]
>>466
>常にActiveSheetを対象操作にする
シートモジュールでシート指定しないやつは、ActiveSheetじゃなくてそのシートだったと思ったが

476 名前:デフォルトの名無しさん mailto:sage [2025/07/25(金) 20:45:59.47 ID:6JkrjnZc.net]
VBの内部コード(Pコード)は解析されてるのかな
AIに全部ぶち込んでしまえば、どういう理屈でという疑問は解消しそうだけど

477 名前:デフォルトの名無しさん [2025/07/26(土) 08:11:28.23 ID:ZNo9mvnh.net]
wb.Sheets(arr).Select

wb.Sheets(2).ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath
でもグループ化したシートが出力できるのですね
今知りました
でも怖いですね
wb.Sheets(2).Selectはグループ化解除だから

478 名前:デフォルトの名無しさん mailto:sage [2025/07/26(土) 13:26:56.16 ID:8rv+r4rK.net]
名前付き引数書く派なんだなおまいらも

479 名前:デフォルトの名無しさん mailto:sage [2025/07/26(土) 14:28:31.18 ID:F1jFmomB.net]
ExportAsFixedFormat xlTypePDF, pdfPath,,,,,,
名前を覚えるか糞長引数の位置を覚えるかのトレードオフ

480 名前:デフォルトの名無しさん [2025/07/26(土) 15:15:43.28 ID://AUV0sR.net]
別にどちらでもいい

481 名前:デフォルトの名無しさん mailto:sage [2025/07/26(土) 17:35:17.71 ID:UKLeI2W+.net]
どっちの書式も覚えてない
検索で上位に出てきたコードをコピペするだけ

482 名前:デフォルトの名無しさん [2025/07/28(月) 17:59:42.76 ID:vQ0dL+ep.net]
一次配列しか対応していないからFilter関数を避けてきましたが、worksheet関数で一次配列に簡単に直せるのと、Filter関数は部分一致なので、ループで重ねがけをするととても便利ですね。

483 名前:デフォルトの名無しさん mailto:sage [2025/07/28(月) 18:28:01.59 ID:23Svm7lo.net]
ネット検索でコピペ
実際はこんなのが大半なんだよな



484 名前:デフォルトの名無しさん [2025/07/28(月) 23:33:08.81 ID:/EYYRyt0.net]
部署内と提携仕入先でVBAで金かけずに簡易システムの共同開発ってことで
メール本文にプロシージャ貼って相手に送ってる
相手からうまく動きました、こっちもこうしてほしいですと回答がくる また直したのをメールに貼って送る
なんという原始的な外資企業だよ

485 名前:デフォルトの名無しさん [2025/07/28(月) 23:37:37.11 ID:ofRNtrsX.net]


486 名前:デフォルトの名無しさん [2025/07/29(火) 12:30:27.63 ID:cpAOUjwH.net]
できることからコツコツと
ですよ
マニアでもいないと飛躍しない
責任取らされるかもと思えば何もしない

487 名前:デフォルトの名無しさん [2025/07/29(火) 19:57:27.87 ID:G836h0I1.net]
vbaではfor のループ処理で条件に一致しないときはループをスキップ(次へ)が出来ないと聞きます
なんとかif文のnot then の時はスキップみたいなコードを書いていますがなかなか難しいです
AIはGo To文を書いているので私も書いていいでしょうか?

488 名前:デフォルトの名無しさん mailto:sage [2025/07/29(火) 19:59:00.98 ID:wqm1/dtV.net]
whileとか使えば?

489 名前:デフォルトの名無しさん [2025/07/29(火) 20:10:20.21 ID:G836h0I1.net]
>>482
whileもDoもしっかりと理解しておかないと無限列車編になりそうで怖いです

仮にもしIf not 〜 Then Next
と言う様なコードがあったとしてもそれが事実上のGo To文だと言われたらそうなのかもしれません

490 名前:デフォルトの名無しさん [2025/07/29(火) 20:24:56.02 ID:cpAOUjwH.net]
continueが無いと言うことなら
goto continue
はわかりやすく代替になる
ネストあるしでオレの場合は
LBL_CONTINUE_10:
とかにしてるけど

491 名前:デフォルトの名無しさん [2025/07/29(火) 20:27:33.99 ID:J9oCD99i.net]
>>483
馬鹿には難しいのか?

492 名前:デフォルトの名無しさん [2025/07/29(火) 21:03:16.99 ID:G836h0I1.net]
>>485
Doとwhileはよく理解して使わないと無限ループになると聞いているので避けてきただけです
Go To もスパゲッティコードになると聞いているので避けいるだけです

If not 〜 Then 次

次 : にすればいいですね

493 名前:デフォルトの名無しさん [2025/07/29(火) 21:10:27.10 ID:vWW6c4Rp.net]
i=i+1をセットに考えとけば無限ループなんて起こすことそんなにないっしょ



494 名前:デフォルトの名無しさん [2025/07/29(火) 21:41:08.56 ID:ii3Lf2qi.net]
>>486
こんな簡単なことも瞬時に理解できないとかやっぱり馬鹿だろうが
Go Toと書いてるだけで馬鹿とわかるんだよ
それとも境界知能か?

495 名前:デフォルトの名無しさん [2025/07/29(火) 21:54:22.96 ID:G836h0I1.net]
Power Queryでフィルターしたり、データベースの真似事をするのは大好きだけど、
vbaのauto filterをするのは苦手意識が強い
この気持ちわかってくれますか?

496 名前:デフォルトの名無しさん mailto:sage [2025/07/29(火) 22:09:39.89 ID:hgNMIII1.net]
夏休みのせいか?それとも暑さで頭がやられているのが出てきてるのか?

497 名前:デフォルトの名無しさん mailto:sage [2025/07/29(火) 22:28:38.75 ID:eRHOoyzY.net]
こだわりがあるようだから温かく見守ってあげて

498 名前:デフォルトの名無しさん [2025/07/29(火) 22:29:41.49 ID:49whZmZ7.net]
いつもの人か
誰が付き合ってあげて

499 名前:デフォルトの名無しさん [2025/07/29(火) 22:40:34.46 ID:G836h0I1.net]
>>492
いつもの人ってなんですか?

500 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 00:33:34.98 ID:JW2l3Q+S.net]
しらんけど煽りしかしてないやつはなんなんだ?

501 名前:デフォルトの名無しさん [2025/07/30(水) 00:42:25.90 ID:wwipb9hb.net]
白痴が書き込むようになると一気にレベルが下がるからな
悪貨は良貨を駆逐する

502 名前:デフォルトの名無しさん [2025/07/30(水) 02:51:59.94 ID:UyfVNIk6.net]
>>493
どうしようもなく頭が悪くて理解力が足りないだけなのにネチネチと質問を繰り返す人のこと

503 名前:デフォルトの名無しさん [2025/07/30(水) 06:00:40.49 ID:0FpGkecW.net]
>>496
一体どこが理解力がないのでしょうか?



504 名前:デフォルトの名無しさん [2025/07/30(水) 06:21:59.30 ID:hYsgvs3H.net]
ダメだこりゃ

505 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 08:09:34.32 ID:tLf0EMwW.net]
質問する側ならともかく、真夜中ひとが寝静まってる頃合いに、回答するでもなく
煽りや虚仮にするだけのカキコする人に関わってはいけない ダークサイドに取り込まれる
じゃあ、そういう人等が得意な分野の質問をすれば回答が付くのか?というと、そんなことも無い
得意なのは他人を罵ることだけなんだから

506 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 08:21:21.59 ID:tLf0EMwW.net]
そもそも、優秀な人材は真夜中はきちんと睡眠をとっている
夜中に寝付けずにあまつさえ掲示板にわざわざ出向いて
あろうことか罵詈雑言書き込んで己の不甲斐無さの不満の吐け口にしてる時点でお察し

507 名前:デフォルトの名無しさん [2025/07/30(水) 08:32:17.89 ID:ZrfB2rqA.net]
ID:tLf0EMwW

頭悪そう

508 名前:デフォルトの名無しさん [2025/07/30(水) 12:03:26.15 ID:8Rlxo22+.net]
ID:ZrfB2rqA

頭ハゲてそう🦲

509 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 14:51:27.88 ID:tLf0EMwW.net]
わずか10分後に反応されてた!
もはや、殆どbotだな
この応答を見れば明白なように
ヒトでも無いカキコの相手するだけ時間の無駄だといういい見本
新しくここに来た人たちは、botが居着いてることを承知の上で
相談や質問をするのが、ひとつの心構え

510 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 17:11:39.24 ID:2dwihfai.net]
専ブラを知らないキチガイはNG

511 名前:デフォルトの名無しさん [2025/07/30(水) 18:05:33.89 ID:bqS2T+6f.net]
優秀の定義は年収で決まる
年収が30代で750万、40代で900万これを超えない奴がさわるVBAなんてもれなくポンコツだから
ふふ

512 名前:デフォルトの名無しさん mailto:sage [2025/07/30(水) 19:00:00.76 ID:+PBQOhAV.net]
つまり会長・社長クラスの触るVBAは素晴らしい出来
生徒や学生の触るVBAはポンコツ
んなわけあるか

513 名前:デフォルトの名無しさん [2025/07/30(水) 21:07:45.62 ID:T2pHe4I2.net]
極論そうだよね
低年収の触るVBAは質が低い
質が低いからVBAを覚えても低年収
専門分野と違ってこんなに強みになるプログラミングは他にないから



514 名前:デフォルトの名無しさん [2025/07/30(水) 22:02:33.58 ID:3dlCCuCF.net]
>>506
ほんそれ
バカの言ってることなんてポンコツなことばかり

515 名前:デフォルトの名無しさん mailto:sage [2025/07/31(木) 19:07:57.07 ID:QmW4aWFz.net]
優禿の定義は年収ではないと思う

516 名前:デフォルトの名無しさん [2025/07/31(木) 19:22:24.31 ID:IqvQqgPR.net]
まあ馬鹿にしたいだけなんで定義も根拠もないんだけどな

517 名前:デフォルトの名無しさん mailto:sage [2025/07/31(木) 19:42:34.79 ID:PLayNHBZ.net]
そんなもんやろな

518 名前:デフォルトの名無しさん mailto:sage [2025/07/31(木) 21:06:19.26 ID:2YdreDTb.net]
>>509
 _人人人人人人人人人_
 > また髪の話してる <
  ̄Y^Y^Y^Y^Y^Y^Y^Y^Y ̄
                 _
γ ⌒ ヽ  彡 ⌒ ミ  . 彡 = ミ
(´・ω・`)  (´・ω・`)  (´・ω・`)
 ツルピカ   ウスゲ   バーコート

519 名前:デフォルトの名無しさん [2025/07/31(木) 21:31:34.28 ID:Sbsp3WvH.net]
仕事の能力は年収じゃないって否定しても実際は年収だけどな
VBAなんてどう処理させるかじゃなくどう運用するかなんだよ

520 名前:デフォルトの名無しさん mailto:sage [2025/07/31(木) 22:18:52.27 ID:Dd41SAEI.net]
処理の結果がすべて
ソースコードがきれいかどうかで評価する会社なんかない

521 名前:デフォルトの名無しさん [2025/08/01(金) 06:26:00.78 ID:w1WlIxif.net]
なんですぐに人に統合失調症だのバカだの言う人がいるのでしょうね。

522 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 07:38:46.46 ID:N/mTRICo.net]
>>513
年収で判断できるのは仕事の能力ではなく労働の能力

523 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 07:41:55.86 ID:bbNzKVYn.net]
そんな言葉遊びで誤魔化してるから給料が安いのです
構文よりイメージを養いなさい



524 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 07:56:02.20 ID:eVYJhFpu.net]
すぐ話脱線するし、ろくでもないスレになったな

525 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 08:14:50.95 ID:tPn9WPv7.net]
>>517
算数と数学くらい違うものを言葉遊びとか、
よほど学がないんだな

526 名前:デフォルトの名無しさん [2025/08/01(金) 10:40:10.51 ID:R6RHAbIb.net]
昨日まで使ってたのが急にエラー出るようになったけど何が原因か分からなかったのでアドバイス下さい
使用マクロ
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'にアクセスできません

527 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 12:40:21.47 ID:cEVejwoq.net]
>>520
ファイル名で「請求書」の次は「年月日」が来るはずなのに、エラーメッセージの中で16進数になってるのがあきらかにおかしい
本当にそのマクロを動かして、そのエラーが出たの?ちょっとありえないんだけど

528 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 12:42:32.32 ID:uTmd43g9.net]
英字のファイルってなんか中間ファイルかなんかだっけ

529 名前:デフォルトの名無しさん [2025/08/01(金) 16:09:22.52 ID:R6RHAbIb.net]
>>521
再度試しましたが発生しました
エラーメッセージは正確には
ファイル'C:\Users\User\Documents\ファイルパス\請求書\PDF/7E1A4F10'にアクセスできません(7E1A4F10は毎回別の文字列になります)です
昨日からの変更点はSSDが壊れたため、D:/をC:/に変更しました

530 名前:デフォルトの名無しさん [2025/08/01(金) 17:15:54.06 ID:hiUF93yw.net]
ぼけっ!と叫びたくなるな

531 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 17:36:20.41 ID:eMcgYSYd.net]
D:/じゃなくてD:\にしなくちゃな

532 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 17:47:11.41 ID:cEVejwoq.net]
>>523
そこの文字列、PDFの次は本当にスラッシュなの?
だとしたら、スラッシュはファイル名に使えない文字だからエラーが出て当然なんだけど

ごまかさずにエラーの出たソースコードちゃんと貼って

533 名前:デフォルトの名無しさん [2025/08/01(金) 18:38:36.40 ID:R6RHAbIb.net]
すいません、/は¥です
コピペしたら変わってた



534 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 18:39:47.95 ID:eMcgYSYd.net]
流石に変わらんだろw

535 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 18:41:07.46 ID:AVNTPHz8.net]
ファイルシステムが壊れたかハードウェア障害なんじゃね
フォーマットしてOSから再インストールだな

536 名前:デフォルトの名無しさん [2025/08/01(金) 18:50:34.81 ID:hiUF93yw.net]
エラーメッセージの通りだろ
┐(´д`)┌ヤレヤレ

537 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 19:10:41.68 ID:igw8+VNg.net]
初心者だから見落としている事に気づいていない ってことなんだろうな

538 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 20:49:06.67 ID:iGmjJYY4.net]
あれ?また低年収がこんな内容でドヤ顔の上から目線じゃん
¥と/の関係性もわからない時点で使用者がトラブルの打ち上げしても僕の処理は綺麗ですと言い張ってそう

539 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 20:52:36.63 ID:iGmjJYY4.net]
初心者が~って年収500万もなさそうな底辺が嬉々としててもね…
作ったVBAを不慣れな人が使うことも想定できないまさに底辺

540 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 21:13:00.15 ID:49ut/ffG.net]
>>523
ActiveWorkbook.SaveAs
Filename:="C:\Users\User\Documents\ファイルパス\請求書" & " " & Format(Date,
"yyyymmdd") & ".xlsx", FileFormat:=xlOpenXMLWorkbook


請求書フォルダ配下のPDFフォルダを指定してないけどそんなエラーが出る?
保存先が変わってない?

541 名前:デフォルトの名無しさん [2025/08/01(金) 21:14:40.85 ID:w1WlIxif.net]
>>520
シートはコードネームで指定した方がいいと思う
テーブルを使いましょう

542 名前:デフォルトの名無しさん [2025/08/01(金) 21:38:32.14 ID:ddFT1Hp8.net]
"PDF" が消えている

543 名前:デフォルトの名無しさん mailto:sage [2025/08/01(金) 22:10:03.29 ID:X5JOiH9e.net]
ユーザが違うオチとか



544 名前:デフォルトの名無しさん [2025/08/01(金) 22:28:18.18 ID:R6RHAbIb.net]
>>534
D:→C:~Documents¥に変えたくらいしか心当たりないんです
>>535
ごめんなさい

545 名前:デフォルトの名無しさん [2025/08/01(金) 23:27:01.60 ID:hiUF93yw.net]
>>538
だからエラーメッセージの通りだろ






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<275KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef