Excel VBA 質問スレ Part60

1 名前：デフォルトの名無しさん mailto:sage [2019/03/16(土) 20:39:09.64 ID:6HWXzj9o.net] ExcelのVBAに関する質問スレです コード書き込みや作成依頼もOK ※前スレ Excel VBA 質問スレ Part59 https://mevius.5ch.net/test/read.cgi/tech/1549692750/ 348 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 01:05:53.94 ID:BYxrD6lc.net] >>340 再現しなかった vbcrが2つ入ってたらそうなるけど、ハテ 349 名前：デフォルトの名無しさん [2019/03/30(土) 02:01:07.03 ID:GNmeMRzR.net] VBAなんて全くできないんだけど エンジニアってこれよりずっと難しいことやってるんでしょ？ 350 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 02:21:31.67 ID:BYxrD6lc.net] >>343 このスレは基本的に一般事務・経理・営業が、現在のルーチンを補助するためのツール作成がメイン エンジニアはEXCEL自体を作るようなイメージ でもvbaエンジニアもいたりするし、こういうツールを作る事を生業にしている業者もある 351 名前：デフォルトの名無しさん [2019/03/30(土) 03:03:59.52 ID:Lscb2BBn.net] >>340 Cells(1, 1).Value = "〒111-222" & vbLf & "東京都新宿区XXXマンション" & vbLf & "西村ひろぽん" セル内改行はLFのみだよ 352 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 03:59:45.09 ID:x88rhneO.net] >>339 スパム拡散させようとすんなカス 353 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 07:57:38.98 ID:K763EDhF.net] >>341 はい、確かにVBAで挿入する時には それでうまくいきました。 セルの値をコピーすると 文字列lf →文字列crlf に置き換わってました。 なぜだろう。 >>342 いや、再現しますよ。 >>345 サンクス。 とりあえずVBAではおまじないと覚えておきます。 354 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 08:04:35.59 ID:MmqNwO70.net] 素直に Cells(1, 1).Value = "〒111-222" Cells(2, 1).Value = "東京都新宿区XXXマンション" Cells(3, 1).Value = "西村ひろぽん" じゃダメだったのかい! 355 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 08:43:12.88 ID:Bc/A+ZhT.net] >>347 試してみたら CR → CRLF LF → CRLF となった。 つまりCRもLFも別個にCRLFに変換されてしまうようだ。 356 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 09:05:05.65 ID:sUXpnQB5.net] >>349 それOS依存だろ OSに合わせて変換だと思った 357 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 09:13:46.28 ID:FTZFsy98.net] vbNewLineが颯爽と登場 358 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 09:55:31.40 ID:rKCbbHqC.net] お母さんからvbNewLineを使いなさいって言われてるから初心者の俺も使ってるわ 359 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 10:59:51.98 ID:rKRPcC1u.net] crとlfを意識して使い分けたいから、newlineはあえて使わないな 360 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 11:00:14.19 ID:Fw0ogXHz.net] android版はVBA使えないしMacなんか使わないからvbCrLfで困らない 361 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 11:38:26.16 ID:BYxrD6lc.net] 本日の戦い vbNewLineでよくね派 　　　　　vs vbNewLine使うと余計に混乱してしまう派 362 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 12:05:31.96 ID:Bc/A+ZhT.net] >>352 vbNewLineてテキストの改行だろう セル内改行とは違うじゃんか 363 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 12:07:01.20 ID:sUXpnQB5.net] >>355 初心者を扱うの大変なんだよな だから混乱が起きた 364 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 12:08:46.76 ID:sUXpnQB5.net] >>356 どうでもいいよ　どうせ 365 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 12:42:55.38 ID:MmqNwO70.net] そもそも何でCRとLF、2つも作ったんだろ。 見えないのもうざいから、ワードみたいに 　　| 　　| ←┘ こういうの入れとけよな。 366 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 12:51:14.77 ID:K763EDhF.net] >>348 ダメ >>349 >>350 変な仕様だよね 367 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 13:21:22.36 ID:BYxrD6lc.net] >>35 368 名前：9 歴史ってとこ https://ja.wikipedia.org/wiki/%E6%94%B9%E8%A1%8C%E3%82%B3%E3%83%BC%E3%83%89 統一規格の概念が希薄だった時代にみんな好き勝手作って、それがずっと続いてる 最悪 [] [ここ壊れてます] 369 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 13:34:00.20 ID:HZnZWzso.net] タイプライターとかMulticsとかの時代にさかのぼる負の遺産だからね 370 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 13:43:10.56 ID:lnhNxPid.net] >>359 > そもそも何でCRとLF、2つも作ったんだろ。 その話をするとタイプライターの時代まで遡るからとりあえずそう言うもんだと覚えておけばいいよ 371 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 13:47:06.57 ID:glDBW/eM.net] >>340 Excelは何も置き換えてない Excelがセル内改行として扱うのはLFだけ CRLFを突っ込んでもCR部分はただの見えない文字として存在してるだけで改行しない セルの文字列をコピペした時CRLFのうちLFがCRLFに置き換わってCR CRLF状態になる（Windowsの場合。他は知らん） それをCRを改行として扱うテキストエディタとかに貼ると両方改行して6行になる 俺の使ってるメモ帳はCRとLFは改行として扱われず見えない文字になるが、バージョンによるのか 372 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 22:50:12.86 ID:uS2atdcl.net] こんなの見つけた tooljp.com/windows/chigai/html/Windows/vbCrLf-vbLf-vbCr-vbnewline-chigai.html 373 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 22:52:52.36 ID:uS2atdcl.net] 続き ここに、こんなの書いてある 秀丸エディタでは、改行が chr[10]でもchar[13]+char[10]でも自動で判定して表示するようです。 一方でWindows標準のメモ帳では改行はchar[13]+char[10]固定であるため、linux などchr[13]を改行とした テキストファイルを表示すると改行せずに表示されます。 374 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 22:55:39.71 ID:uS2atdcl.net] つまり、メモ帳は、CrLｆセットでないとダメだって 375 名前：デフォルトの名無しさん mailto:sage [2019/03/30(土) 23:04:27.71 ID:glDBW/eM.net] >>367 というかWindows標準がCRLF 秀丸やサクラエディタが融通を効かせてくれてるだけ 376 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 01:25:13.65 ID:QUGB5Esi.net] プログラミングやると文字コード鬱陶しいよな 377 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 02:24:23.24 ID:DMnS82C2.net] webの文字コードは更にキツイ 最近大分マシになったけど 378 名前：デフォルトの名無しさん [2019/03/31(日) 04:23:05.94 ID:8cbdf+T7.net] 秀丸エディタとか今でも使ってる人なんているの？ 久しぶりに名前を聞いた 379 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 07:02:58.77 ID:m7bBr8R/.net] >>371 お前はなにを使ってるの？ 380 名前：デフォルトの名無しさん [2019/03/31(日) 09:25:24.80 ID:rZDtkSri.net] 新バージョンの 禿丸ツルピカなら使ってる 381 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 09:32:08.99 ID:mUt6la4P.net] TeraPad でも、改行コードを指定できる ただし、TeraPadは、新しめの文字が?? になってしまう 中国の地名の「深圳」とか 382 名前：デフォルトの名無しさん [2019/03/31(日) 09:43:08.67 ID:S96NH+nt.net] >>372 VS 383 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 11:13:47.65 ID:7pZaUVM7.net] MacはCr、Unix/LinuxはLf、WinはCrLf 384 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 14:47:15.91 ID:p4bbm5us.net] >>359 元はテレタイプのコードだからね テレタイプではCRでカーソルを行頭に復帰 LFでカーソルを行送りとなり合わせて改行になる CRだけではカーソルが行頭に復帰するだけで行は変わらない LFだけではカーソルが次の行に送られるだけで桁位置は変わらない こういう仕様だった 385 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 16:38:53.91 ID:7pZaUVM7.net] 文字コードといえばワード・パワポもエクセル連携の観点では曲者 段落区切りの改行がCR、段落内改行がVTになるからな 単純な文字列貼付でいけると思ってると見事にハマる 386 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 16:59:27.49 ID:m7bBr8R/.net] Windowsは、CrLfセットで改行なのに、>>340みたいになるっておかしいだろ 387 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 17:05:24.30 ID:x94da/wE.net] >>379 CrLfだからそうなる Excelの改行とWindows標準改行の扱いの違い 388 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 18:57:30.32 ID:2QHIj7Qu.net] >>359 キャリッジリターン、ラインフィードの2つの単語を覚えておこう。 どういう意味かは自分で調べてね。 389 名前：デフォルトの名無しさん [2019/03/31(日) 19:02:18.98 .net] >>336 今日までか 貰ってアプリは消した　　　 390 名前：デフォルトの名無しさん mailto:sage [2019/03/31(日) 22:08:25.87 ID:cn1K3c+R.net] ラインフィード →ラインがご飯を与える 391 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 01:45:18.74 ID:nOieNnAu.net] キャリッジ・リターン 復帰 ライン・フィード 改行 CR+LF 復改 392 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 01:50:34.29 ID:9/xHbeRR.net] 知識自慢 393 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 09:33:56.36 ID:MjMweJle.net] >>385 昔はプリンタで普通に使ってたぞ 394 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 09:34:13.23 ID:MjMweJle.net] >>385 昔はプリンタで普通に使ってたぞ 395 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 09:34:33.41 ID:MjMweJle.net] >>385 昔はプリンタで普通に使ってたぞ 396 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 10:54:00.54 ID:egjDjXMe.net] 爺さんの常識は今の非常識 397 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 11:14:26.77 ID:kXJ+CJ6I.net] よくこんな話題で何日も盛り上がれるな マウント取るにしても内容の程度が低すぎるでしょ 398 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 11:17:49.51 ID:9/xHbeRR.net] 別の話題 VBAのエディタしょぼくね？ VSの方がよっぽど開発効率がいい 399 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 11:40:46.78 ID:kgDolq/Y.net] >>391 そりゃ作られたの20年前でレガシーもいいとこだからな だいぶ昔からdeprecatedフェーズだからどれだけ要望があろうと改善されることもない 400 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 14:11:47.96 ID:9/xHbeRR.net] >>392 Exce2010の時と比べても VBAエディタな〜〜んも機能改善されてねー 401 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 15:12:27.18 ID:no59bRT+.net] >>393 そもそもレガシーでありMS的には使ってほしくない機能なんだから、 不便すぎてユーザーが減っていくことがまさに「改善」なんだよ 気に入らないのはわかるが古いものを新しくしていくっていうのはそういうもの 402 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 16:18:15.03 ID:FTeB9oqU.net] 企業が年寄の使用を嫌うのと同じかw 403 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 21:40:54.00 ID:gJhvzDut.net] それでも利益的には無視できないだろう もし切るならとっくに切ってる 別に移行するにも何にどう移行するのか? lotusも無くなったからそんなに恐れる必要も無いけど free系officeも敵ではないだろうし 狙いはcloud系か何かなんだろうけど 開発の人はどうにでもなるだろうけど excelvbaは素人系だからなぁ 404 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 21:53:42.68 ID:IAvZX1Rk.net] 古いExcelを令和対応させるVBA作ってください！！ 405 名前：デフォルトの名無しさん mailto:sage [2019/04/01(月) 22:28:03.19 ID:StNYHPUb.net] If Cells(1 ,1) > 43585 Then wstrGengo = "令和" 406 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 00:18:55.85 ID:rWuIv4od.net] >>397 マイクロソフトがパッチだすのまて 407 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 00:31:35.68 ID:g8jutNiy.net] まぁ日付形式で書いてりゃいずれ対応するべ 408 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 02:17:49.89 ID:GCjhH3yn.net] VBAで簡単な入金管理作った 経験あるんだけど VBAでちょこちょこ するだけでいい仕事って就けるもん？ 409 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 02:32:45.56 ID:CMqenrji.net] >>401 面接でそういえばいい 410 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 08:35:03.23 ID:5I+lN+ly.net] VBA 求人 東京 で調べたら月給50万とか80万とか 出てくるけどほんまなん？ 411 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 09:24:24.65 ID:g8jutNiy.net] >>403 本当だけど それガッツリとしたVBAエンジニアだよ 多分gitかTortoiseSVN辺り使うはず 【フリーランス】Excel/Access-VBA | 開発知見がある方！システムサポート業務 仕事内容 基幹システム/部門個別システム支援（運用、問合せ、J-SOX対応等） 部門内インフラ管理支援、エンドユーザIT支援、業務用ツール開発 給与 412 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 21:44:59.43 ID:ZGIlr/GY.net] >>403 別にVBAでも普通ある。 けど、面接して採用される奴は他にもスキルがあるか、それなりに出来る奴だろうな。 gitや、SVNについては必ずしもってところだろう。 もっとも、VBAのコードを管理するためにgitやSVN用のツールをVBAで組む程度はやれる或いはやってるだろう。 413 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 23:38:38.44 ID:z8xG+23/.net] 1989/1/7　→　昭和64年1月7日 1989/1/8　→　平成1年1月8日 2099/1/1　→　平成111年1月1日 3000/1/1　→　平成1012年1月1日 試してみたらこうなった。 令和がまだ入ってないのは分かるが、 1000年後も普通に平成だとは思わなかったわ。 414 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 23:44:03.27 ID:dGnjjG+S.net] >>406 どうせならOSとEXCELのバージョンかけや 415 名前：デフォルトの名無しさん [2019/04/02(火) 23:45:56.37 ID:PBWFMMP7.net] >>406 https://dotup.org/uploda/dotup.org1812346.jpg 416 名前：デフォルトの名無しさん mailto:sage [2019/04/02(火) 23:47:51.13 ID:z8xG+23/.net] >>407 どちらか片方ならわかるが、何で両方? 組み合わせで変わるもんじゃないだろう。 417 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 01:37:48.37 ID:HquWe5hb.net] >>409 MSはそんな思い込みが通用するほど甘い相手じゃない 418 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 02:13:34.41 ID:T6JhjkrS.net] >>406 江戸もでないし 419 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 03:03:58.76 ID:SETc7Ceb.net] こういう思い込みをする奴が新年号対応に莫大な人工が掛かる糞システムを作るのである 420 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 03:14:27.06 ID:HquWe5hb.net] >>411 シリアル値は1900年から 明治までしか対応できない 421 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 07:43:03.53 ID:4XO/CSdW.net] Windows 10・WSL・Ubuntu 16.04 の設定ファイルでは、 +:2:1990/01/01:+*:平成:%EC%Ey年 +:1:1989/01/08:1989/12/31:平成:%EC元年 +:2:1927/01/01:1989/01/07:昭和:%EC%Ey年 +:1:1926/12/25:1926/12/31:昭和:%EC元年 +:2:1913/01/01:1926/12/24:大正:%EC%Ey年 +:2:1912/07/30:1912/12/31:大正:%EC元年 +:6:1873/01/01:1912/07/29:明治:%EC%Ey年 +:1:0001/01/01:1872/12/31:西暦:%EC%Ey年 +:1:-0001/12/31:-*:紀元前:%EC%Ey年 422 名前：414 mailto:sage [2019/04/03(水) 07:55:00.58 ID:4XO/CSdW.net] 明治6年(1873)から正しい それ以前は太陰太陽暦(旧暦)だから、西暦とは異なるから、日本の暦は使えない 423 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 12:14:49.07 ID:RhgPGi2C.net] Excel2013以降ならこれで行けると思う Windows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\Calendars\Japanese\Eras] "2019 05 01"="令和_令_Reiwa_R" 424 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 20:18:32.12 ID:XzL94EYi.net] 2013ってOSどこからサポートしてたっけ 425 名前：デフォルトの名無しさん mailto:sage [2019/04/03(水) 20:25:25.63 ID:LAo899n+.net] そんなのググったらすぐ出るだろう… 426 名前：デフォルトの名無しさん [2019/04/04(木) 00:26:33.22 ID:2+ZabFqB.net] 新元号は「安平」であります。 https://dotup.org/uploda/dotup.org18123 427 名前：20.jpg [] [ここ壊れてます] 428 名前：デフォルトの名無しさん [2019/04/04(木) 02:37:49.53 ID:2+ZabFqB.net] あ ほ 429 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 09:42:49.96 ID:8+vU6A6d.net] >>416 これは、Office各バージョンで共通で使えるしExcel・Word等でも使えるね 他のアプリでも使えるんじゃない 430 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 10:15:48.02 ID:8+vU6A6d.net] >>416 これは、Windowsのカレンダーに対して日本用の設定を追加してるだけだから Windowsの標準コントロールのカレンダーを使用して正しくコーディングしていれば この設定をするだけで対応できるだろ これを「令和登録.reg」のファイルにして管理者モードで実行するだけだね --下記-- Windows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\Calendars\Japanese\Eras] "2019 05 01"="令和_令_Reiwa_R" 431 名前：デフォルトの名無しさん [2019/04/04(木) 10:47:09.88 ID:2+ZabFqB.net] VBAでfor nextで回しているときにworksheetfunction.vlookupを使っているのですが 値が存在しないときにエラーが出て止まってしまいます。 こんなとき存在しない時は処理を回避するにはどうしたらいいですか？ On error resume nextにすると、エラーのときにも処理をしてしまいます。 432 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 10:56:05.80 ID:uGh4IPkF.net] application.vlookup 433 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 11:06:48.53 ID:8+vU6A6d.net] >>423 On error resume next　はエラーを無視して続ける On error go to XXXX でえあらーが出たらそっち行け 434 名前：デフォルトの名無しさん [2019/04/04(木) 11:17:40.01 ID:2+ZabFqB.net] >>425 vlookupで見つかったらA処理、見つからなかったらB処理、をそれぞれさせる場合 どうするの？ 435 名前：デフォルトの名無しさん [2019/04/04(木) 11:18:13.34 ID:2+ZabFqB.net] そっち行けのあと、ちゃんとfor nextループに復帰しないといけない。 436 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 11:27:09.76 ID:uGh4IPkF.net] 値が存在するか確認してからvlookupでもOK 437 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 12:16:12.36 ID:8+vU6A6d.net] >>427 基本的にgo toの 行先はループ内だな で、正常の場合はそのルーチン内で飛ばす、また共通で使用できる部分はそのまま使う それぞれ複雑になる場合は、外部呼出しで処理 438 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 12:40:19.97 ID:aPtbQ2yh.net] 簡易だけどこんな風でよろしいか。 On Error Resume Next For i=0 To lngRW varValue=WorksheetFunction.Vlookup(〜) If Err.Number=(見つからない) Then 'B処理 Err.Clear ElseIf Err.Number=0 Then 'A処理 Else Debug.Print "想定外:" & vbCrLf & Err.Description EndIf Next i On Error Goto 0 439 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 13:14:42.92 ID:iClvVPMc.net] こうじゃないの On Error Goto err For i=0 To lngRW varValue=WorksheetFunction.Vlookup(〜) '処理 err: Next i 440 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 13:23:37.46 ID:8+vU6A6d.net] >>431 一般的に書くと以下だけど、処理は複雑なら外部ファンクションで On Error Goto err For i=0 To lngRW varValue=WorksheetFunction.Vlookup(〜) [正常処理] Goto 共通 err: [err処理] 共通: [共通の処理] Next i 441 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 13:50:38.20 ID:iClvVPMc.net] >>432 あぁそうか、その形だスマン エラー番号を見たり外したりで分岐させる方法が合ったと思うけど、 あれってどうなのかな 442 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 14:26:57.06 ID:omgcYFOR.net] Dim Rc As Variant For I = 1 To 10 Rc = Application.VLookup(〜) If IsError(Rc) Then 　　'B処理 　　Debug.Print "Err" Else 　　'A処理 　　Debug.Print Rc End If Next 443 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 16:38:45.71 ID:wsHiflUt.net] If Err = *** Then 444 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 16:56:03.91 ID:iClvVPMc.net] このエラーって何が返ってきてるの？ Rc = Application.VLookup(1, Range("a1:b2"), 2, 0) Rcには「エラー2042」 variant/error となっている エラーオブジェクト？ 445 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 17:24:54.95 ID:w4m8dn6a.net] Debug.Print WorksheetFunction.IsNA(Rc) 446 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 17:32:46.09 ID:omgcYFOR.net] >>436 VBA CVErr 関数 https://www.tipsfound.com/vba/05cverr 2042 #N/A 447 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 18:04:33.36 ID:iClvVPMc.net] >>437 ？ >>438 errorってオブジェクト？ なんでsetせずに代入できるんだ？ 448 名前：デフォルトの名無しさん mailto:sage [2019/04/04(木) 19:42:12.58 ID:l+wxMf4P.net] on error使うのあまり良くない vlookupの前にcountやfindで存在チェックするのをおすすめするよ 裏技的な方法だとAppllication.Vlooiup

---

---

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

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