ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK
※前スレ
Excel VBA 質問スレ Part57
https://mevius.5ch.net/test/read.cgi/tech/1536583359/
探検
Excel VBA 質問スレ Part58
■ このスレッドは過去ログ倉庫に格納されています
2018/11/19(月) 06:47:24.99ID:Qq88xGOU
110デフォルトの名無しさん
2018/12/11(火) 08:30:34.19ID:jr4KaA92 >>109
٩(๑`^´๑)۶\(^-^ ) ヨシヨシ
٩(๑`^´๑)۶\(^-^ ) ヨシヨシ
111デフォルトの名無しさん
2018/12/11(火) 08:41:05.40ID:mN+cBX2v 空白行が複数ある範囲から、空白行を除いて配列に取り込むのはどうやるのが効率がいい?
条件
・行内は完全に空白かそうでないかで中途半端にデータが入ってるところはなし
・空白行を除いたデータ総数は300前後で最大で16程度に分割されている
・空白行は連続することもある
一行一行調べるより、データの塊の上下の行番号を調べるのが正解な気がするんだけど
条件
・行内は完全に空白かそうでないかで中途半端にデータが入ってるところはなし
・空白行を除いたデータ総数は300前後で最大で16程度に分割されている
・空白行は連続することもある
一行一行調べるより、データの塊の上下の行番号を調べるのが正解な気がするんだけど
112デフォルトの名無しさん
2018/12/11(火) 08:55:39.61ID:OAAPkOpt113デフォルトの名無しさん
2018/12/11(火) 09:27:01.56ID:zUaOIyWC114デフォルトの名無しさん
2018/12/11(火) 11:43:07.63ID:U/EFAptV115デフォルトの名無しさん
2018/12/11(火) 11:50:12.79ID:s7r8QuRW116デフォルトの名無しさん
2018/12/11(火) 12:15:58.68ID:/u4ZG0F2 >>115
当時からおっさんだったら、今頃じーさんかも知れないぞ。
当時からおっさんだったら、今頃じーさんかも知れないぞ。
117デフォルトの名無しさん
2018/12/11(火) 14:13:54.04ID:mN+cBX2v >>113
下からCtrl↑で止まったセルの行番号を取得するを繰り返せば毎行調べなくて済む
オートフィルターで絞った結果を可視セルだけ選択しても、取り込まれるのは左上だけになるから無理だね
一行一行調べる羽目になる
やるなら作業シート作ってコピペしてから取り込むんだけだ、それはやりたくない訳で
下からCtrl↑で止まったセルの行番号を取得するを繰り返せば毎行調べなくて済む
オートフィルターで絞った結果を可視セルだけ選択しても、取り込まれるのは左上だけになるから無理だね
一行一行調べる羽目になる
やるなら作業シート作ってコピペしてから取り込むんだけだ、それはやりたくない訳で
118デフォルトの名無しさん
2018/12/11(火) 14:39:45.96ID:zUaOIyWC119デフォルトの名無しさん
2018/12/11(火) 20:47:54.18ID:r2my7w49120デフォルトの名無しさん
2018/12/11(火) 21:00:32.57ID:zUaOIyWC121デフォルトの名無しさん
2018/12/11(火) 21:34:59.21ID:OAAPkOpt クリップボード経由でデータを一気に取得、オートフィルタにも対応
※最小設定FM20.DLLが必要
Sub Macro1()
ActiveSheet.Range("A1:C10").Copy
With New MSForms.DataObject
.GetFromClipboard
str = .GetText
End With
MsgBox str
End Sub
※最小設定FM20.DLLが必要
Sub Macro1()
ActiveSheet.Range("A1:C10").Copy
With New MSForms.DataObject
.GetFromClipboard
str = .GetText
End With
MsgBox str
End Sub
122デフォルトの名無しさん
2018/12/11(火) 21:35:27.33ID:OAAPkOpt 参照設定
123デフォルトの名無しさん
2018/12/11(火) 21:40:19.21ID:r2my7w49124デフォルトの名無しさん
2018/12/11(火) 21:51:43.64ID:zUaOIyWC >>123
ガイジなのかな?
ガイジなのかな?
125デフォルトの名無しさん
2018/12/11(火) 22:40:05.46ID:r2my7w49126デフォルトの名無しさん
2018/12/11(火) 22:53:52.01ID:8DZhL+mg それこそVariant型配列にでもぶっ込めば手っ取り早いし処理もそれなりに速そう
127デフォルトの名無しさん
2018/12/11(火) 23:25:52.21ID:mBAHWwo2 UI Automationのレイトバインドって、どうやればいいんでしょう?
レジストリ調べてもクラスID出てこないし・・。
レジストリ調べてもクラスID出てこないし・・。
128デフォルトの名無しさん
2018/12/11(火) 23:34:38.12ID:r2my7w49 >>127
基本的に出来ない。
基本的に出来ない。
129デフォルトの名無しさん
2018/12/12(水) 00:19:46.28ID:3KU1fzXl >>128
参照設定は出来るのに、CreateObjectは不可なんてのがあるんですか?
参照設定は出来るのに、CreateObjectは不可なんてのがあるんですか?
130デフォルトの名無しさん
2018/12/12(水) 06:08:42.05ID:yHW8d60g >>125
自覚がないのは可哀想
自覚がないのは可哀想
131デフォルトの名無しさん
2018/12/12(水) 09:43:38.09ID:F+70e5KM >>129
ある。
ある。
132デフォルトの名無しさん
2018/12/12(水) 09:44:36.67ID:F+70e5KM >>130
まず、日本語の勉強をしような。
まず、日本語の勉強をしような。
133デフォルトの名無しさん
2018/12/12(水) 12:29:40.76ID:4PEjGm8G134デフォルトの名無しさん
2018/12/12(水) 19:01:00.09ID:pifCGzoS グラフ作成マクロ作ったんだけど結構面倒くさくない?慣れの問題?
特に細かなフォーマットとか云々がめんどい
それに出力シートのセルいじられて(1行目削除)出力セルがズレたせいでフォーマット崩れたとか言われて頭痛いんだけどどう対処するのが良いのこれ
特に細かなフォーマットとか云々がめんどい
それに出力シートのセルいじられて(1行目削除)出力セルがズレたせいでフォーマット崩れたとか言われて頭痛いんだけどどう対処するのが良いのこれ
135デフォルトの名無しさん
2018/12/12(水) 20:01:12.49ID:K6Ng+wlm 使用方法まとめたドキュメント作ってないなら作成者が悪い。
作ってるなら碌に読まないで文句いってる使用者が悪い。
作り方次第で解決するとは思うが。
作ってるなら碌に読まないで文句いってる使用者が悪い。
作り方次第で解決するとは思うが。
136デフォルトの名無しさん
2018/12/12(水) 20:02:06.59ID:aZC5ZPlw ルーチンにはルールが必要やで
137デフォルトの名無しさん
2018/12/12(水) 22:32:28.50ID:3KU1fzXl >>134
逃げる。
いや、マジで。
フォーマットを壊す人ような人の依頼を受けると碌なことない。
どうしてもやらなきゃダメなら、
ちょっとでも崩れたら、エラーメッセージが出るようにする。
あなた壊しましたね。直さないと出力できませんよ的な。
逃げる。
いや、マジで。
フォーマットを壊す人ような人の依頼を受けると碌なことない。
どうしてもやらなきゃダメなら、
ちょっとでも崩れたら、エラーメッセージが出るようにする。
あなた壊しましたね。直さないと出力できませんよ的な。
138デフォルトの名無しさん
2018/12/12(水) 23:25:41.76ID:YxATkhEB シートとブックを保護する
139デフォルトの名無しさん
2018/12/13(木) 09:08:24.41ID:UfF+3F/y 出来たグラフをPDFにしてそれを渡す
140デフォルトの名無しさん
2018/12/13(木) 09:12:33.11ID:LhgdcJ19 >>133
人の話が理解出来てないから、日本語という言葉が出て来るんじゃないの。
人の話が理解出来てないから、日本語という言葉が出て来るんじゃないの。
141デフォルトの名無しさん
2018/12/13(木) 12:28:02.78ID:yiVhwKQv142デフォルトの名無しさん
2018/12/13(木) 21:18:33.38ID:WIhtQMzU >>138
シーブックがなんだって?
シーブックがなんだって?
143デフォルトの名無しさん
2018/12/13(木) 22:36:46.58ID:X2R1LlWK CreateObject("Excel.Application").ExecuteExcel4Macro("CALL(DLL, 名前, ""JJ"", variant型の配列)")
これにvariant型の配列を渡す場合はどうすればいい?
OとかKとか入れてもダメなんですけど。
普通に呼べとか言わないで。
これにvariant型の配列を渡す場合はどうすればいい?
OとかKとか入れてもダメなんですけど。
普通に呼べとか言わないで。
144デフォルトの名無しさん
2018/12/14(金) 01:30:05.29ID:dZAIZmaz >>142
あのぉ…
あのぉ…
145デフォルトの名無しさん
2018/12/14(金) 07:22:07.04ID:CUJ1nMvt146デフォルトの名無しさん
2018/12/14(金) 09:13:11.97ID:GTuXeJsU147デフォルトの名無しさん
2018/12/14(金) 12:34:42.08ID:8Omm9ucp148デフォルトの名無しさん
2018/12/14(金) 19:29:44.65ID:GTuXeJsU >>147
>別に俺が出した要件じゃねーけどな
全く、馬鹿らしいがそんなことは想定済みだ。
こういう場合、要件出したのが君だろうが違かろうが「君の要件」と書いておけば通じるという想定だ。
それまでの君の発言を見て要件出した奴かどうかなんて調べるのがめんどうということだ。
>フィルター云々はいいとして要件にそぐわない事書いて意味あるんか?
って話な
そんなことは要件出した奴が判断することだし、俺はそんな所にレスしたわけじゃない。
単純に1行が要件そのものに対してとは限らんと言ってる。
それに「VBAで1行で書けるぞ」が要件のことを言っていなくてもトータルで要件にそぐうこともあり得る。
フィルタのコードに1行、他に何十行かで要件を満たしているかもしれないわけだ。
>フィルター掛けときゃすげー楽になると言うならまだしも>>117とか恥の上塗りにしかなってないだろ
>>112=>>117とは限らん、というか違うと思うわけだが、イコールとは限らない以上、>>112の意図が「フィルター掛けときゃすげー楽になる」という可能性を排除できない。
つまり、君の言う「まだしも」の可能性が残っている。
それに、俺が書いたように>>112が要件にそぐわないものを出した可能性もある。
したがって、「1行で書ける」というのが要件そのものに対してではなくフィルタをがける処理のみに対してである可能性は十分ある。
これは日本語でのやり取りなら十分あり得ることだ。
>別に俺が出した要件じゃねーけどな
全く、馬鹿らしいがそんなことは想定済みだ。
こういう場合、要件出したのが君だろうが違かろうが「君の要件」と書いておけば通じるという想定だ。
それまでの君の発言を見て要件出した奴かどうかなんて調べるのがめんどうということだ。
>フィルター云々はいいとして要件にそぐわない事書いて意味あるんか?
って話な
そんなことは要件出した奴が判断することだし、俺はそんな所にレスしたわけじゃない。
単純に1行が要件そのものに対してとは限らんと言ってる。
それに「VBAで1行で書けるぞ」が要件のことを言っていなくてもトータルで要件にそぐうこともあり得る。
フィルタのコードに1行、他に何十行かで要件を満たしているかもしれないわけだ。
>フィルター掛けときゃすげー楽になると言うならまだしも>>117とか恥の上塗りにしかなってないだろ
>>112=>>117とは限らん、というか違うと思うわけだが、イコールとは限らない以上、>>112の意図が「フィルター掛けときゃすげー楽になる」という可能性を排除できない。
つまり、君の言う「まだしも」の可能性が残っている。
それに、俺が書いたように>>112が要件にそぐわないものを出した可能性もある。
したがって、「1行で書ける」というのが要件そのものに対してではなくフィルタをがける処理のみに対してである可能性は十分ある。
これは日本語でのやり取りなら十分あり得ることだ。
149デフォルトの名無しさん
2018/12/14(金) 19:35:29.16ID:GTuXeJsU150デフォルトの名無しさん
2018/12/14(金) 19:36:43.15ID:GTuXeJsU151デフォルトの名無しさん
2018/12/14(金) 20:29:48.28ID:8Omm9ucp152デフォルトの名無しさん
2018/12/14(金) 21:50:27.31ID:GTuXeJsU153デフォルトの名無しさん
2018/12/14(金) 22:24:25.69ID:OczD5cRe >>145
セルじゃなくてvariant型の配列。
セルじゃなくてvariant型の配列。
154デフォルトの名無しさん
2018/12/14(金) 22:48:04.67ID:yDEitqc6155デフォルトの名無しさん
2018/12/14(金) 23:06:35.41ID:GTuXeJsU156デフォルトの名無しさん
2018/12/14(金) 23:13:37.60ID:GTuXeJsU157デフォルトの名無しさん
2018/12/14(金) 23:48:38.10ID:yDEitqc6158デフォルトの名無しさん
2018/12/15(土) 03:21:06.31ID:WK8Eb1ay159デフォルトの名無しさん
2018/12/15(土) 07:16:14.22ID:lJT07BrA160デフォルトの名無しさん
2018/12/15(土) 08:17:58.44ID:B6remLfl いつになったら場違いだと気付くのだろうか。。。
161デフォルトの名無しさん
2018/12/15(土) 09:04:38.64ID:U64Nbokg でさ、ここ質問スレ
乱闘なら他でやれ、クズ共
乱闘なら他でやれ、クズ共
162デフォルトの名無しさん
2018/12/15(土) 10:21:31.76ID:WK8Eb1ay163デフォルトの名無しさん
2018/12/15(土) 10:31:11.19ID:WK8Eb1ay だいたい、俺の意見はお前と近いんだよ。
お前みたいな甘さが無いだけで。
だから「そこからどうするんだ」という発言が出てる。
頓珍漢だろうとは思ってるの。
確定してないから決めつけてないだけで。
だいいち、頓珍漢だとしてもお前の決めつけが間違ってるのは変わらないだろう。
頓珍漢だなんてのは反論になってないな。
だから日本語を勉強しようなという話になる。
お前みたいな甘さが無いだけで。
だから「そこからどうするんだ」という発言が出てる。
頓珍漢だろうとは思ってるの。
確定してないから決めつけてないだけで。
だいいち、頓珍漢だとしてもお前の決めつけが間違ってるのは変わらないだろう。
頓珍漢だなんてのは反論になってないな。
だから日本語を勉強しようなという話になる。
164デフォルトの名無しさん
2018/12/15(土) 10:57:25.02ID:0SCAvoVT >>162-163
頓珍漢の根拠まで書いてあるのに何を言ってるんだこのアホは w
>> 空白行が複数ある範囲から、空白行を除いて配列に取り込むのはどうやるのが効率がいい?
> なので、フィルターだけの事を言われても…
頓珍漢の根拠まで書いてあるのに何を言ってるんだこのアホは w
>> 空白行が複数ある範囲から、空白行を除いて配列に取り込むのはどうやるのが効率がいい?
> なので、フィルターだけの事を言われても…
165デフォルトの名無しさん
2018/12/15(土) 12:42:24.61ID:lWJaBIbu いつまでネコパンチ打ち合うつもりやねんおまえら
166デフォルトの名無しさん
2018/12/15(土) 14:45:59.06ID:945ViHWv 次の質問が来ないからじゃね
167デフォルトの名無しさん
2018/12/15(土) 15:45:43.01ID:n3n4s8WM >>166
じゃ、ひとつ
Excel VBAで、Google OAuth認証などをやってるが、Clien_IDやSecretはコード中に書くとしても、取得したAuth CodeやAccess_Token、Refresh_Tokenなどはどこに安全に格納出来るか?
.NETアプリやAccessのようにappconfigや仕舞えるテーブルが無いので、皆どうしているのかね?
じゃ、ひとつ
Excel VBAで、Google OAuth認証などをやってるが、Clien_IDやSecretはコード中に書くとしても、取得したAuth CodeやAccess_Token、Refresh_Tokenなどはどこに安全に格納出来るか?
.NETアプリやAccessのようにappconfigや仕舞えるテーブルが無いので、皆どうしているのかね?
168デフォルトの名無しさん
2018/12/15(土) 15:53:11.37ID:mgmsvi+C169デフォルトの名無しさん
2018/12/15(土) 16:03:58.72ID:VvS+qBfB VBAで何をやろうとしてるんだよ
何のためにそんな実装するのか詳しく
何のためにそんな実装するのか詳しく
170デフォルトの名無しさん
2018/12/15(土) 16:17:18.77ID:U8VjJ+lV app.configとかテーブルとかが安全だと思ってるなら、
セルに書いといて保存でもテキストファイル書き出しでも好きにすればいいんじゃね
セルに書いといて保存でもテキストファイル書き出しでも好きにすればいいんじゃね
171デフォルトの名無しさん
2018/12/15(土) 16:44:01.14ID:2qRdp2bE172デフォルトの名無しさん
2018/12/15(土) 16:57:49.47ID:WK8Eb1ay173デフォルトの名無しさん
2018/12/15(土) 18:04:57.01ID:lJT07BrA174デフォルトの名無しさん
2018/12/15(土) 18:13:07.03ID:zDjD9XpS175デフォルトの名無しさん
2018/12/15(土) 18:28:50.08ID:lJT07BrA > 元凶ってにはよくわかったよ。
煽ろうとしてカミカミとか恥ずかしすぎるww
煽ろうとしてカミカミとか恥ずかしすぎるww
176デフォルトの名無しさん
2018/12/15(土) 18:33:30.22ID:WK8Eb1ay177デフォルトの名無しさん
2018/12/15(土) 18:45:26.64ID:lJT07BrA178デフォルトの名無しさん
2018/12/15(土) 20:16:24.25ID:VvS+qBfB なんだこいつ病気か
179デフォルトの名無しさん
2018/12/15(土) 20:42:55.07ID:NkuNHsZU 病気の人に失礼だろそれは
180デフォルトの名無しさん
2018/12/15(土) 22:10:19.68ID:WK8Eb1ay181デフォルトの名無しさん
2018/12/15(土) 22:12:08.06ID:WK8Eb1ay 何故、お前が間違った決めつけをしたのか?
それはおまえの日本語解釈能力が低いからだ。
それはおまえの日本語解釈能力が低いからだ。
182デフォルトの名無しさん
2018/12/15(土) 22:33:13.95ID:7RBFgqMT お客さんが多いなあ
183デフォルトの名無しさん
2018/12/15(土) 23:20:05.72ID:lJT07BrA184デフォルトの名無しさん
2018/12/16(日) 07:19:47.75ID:48kCZeZq 単なる罵り合いを見せつけられるくらいなら過疎ってるほうがよっぽど良い
185デフォルトの名無しさん
2018/12/16(日) 15:01:54.86ID:wWzCJETE186デフォルトの名無しさん
2018/12/16(日) 15:15:50.29ID:Waa1ZwFh この罵り合いって一人で自演やってるの?
それとも馬鹿が2人もいるの?
それとも馬鹿が2人もいるの?
187デフォルトの名無しさん
2018/12/16(日) 15:21:47.19ID:7UXd2BE0 もう言ってることが無茶苦茶
> 反論出来ないからといって見当違いばかりだな。
またブーメランかよ w
> 反論出来ないからといって見当違いばかりだな。
またブーメランかよ w
188デフォルトの名無しさん
2018/12/16(日) 15:31:07.45ID:wWzCJETE >>187
頓珍漢でもお前は間違ってるのは認めるのかい?
頓珍漢でもお前は間違ってるのは認めるのかい?
189デフォルトの名無しさん
2018/12/16(日) 15:34:57.02ID:wWzCJETE190デフォルトの名無しさん
2018/12/16(日) 15:38:49.65ID:wWzCJETE 見当違いなのは、頓珍漢かどうかに関係なく間違いだと言ってるのに、いつまでたっても頓珍漢で押し通そうとしてるからなんだが。
191デフォルトの名無しさん
2018/12/16(日) 15:47:14.35ID:7UXd2BE0192デフォルトの名無しさん
2018/12/16(日) 16:18:10.73ID:wWzCJETE193デフォルトの名無しさん
2018/12/16(日) 16:23:40.16ID:7UXd2BE0 >>192
2通りの解釈?
後付していいなら2通りどころかなんとでも解釈できるように書けるぞ
> そのデータがワークシート上にあるんなら、オートフィルターかければ?
> VBAで1行で書けるぞ
でも、〇〇した方がもっといいけどな
ってか? w
2通りの解釈?
後付していいなら2通りどころかなんとでも解釈できるように書けるぞ
> そのデータがワークシート上にあるんなら、オートフィルターかければ?
> VBAで1行で書けるぞ
でも、〇〇した方がもっといいけどな
ってか? w
194デフォルトの名無しさん
2018/12/16(日) 18:04:23.80ID:wWzCJETE195デフォルトの名無しさん
2018/12/16(日) 18:20:18.12ID:7UXd2BE0196デフォルトの名無しさん
2018/12/16(日) 18:55:56.11ID:wWzCJETE197デフォルトの名無しさん
2018/12/16(日) 19:12:31.97ID:7UXd2BE0198デフォルトの名無しさん
2018/12/16(日) 19:15:43.10ID:wWzCJETE199デフォルトの名無しさん
2018/12/16(日) 19:18:42.74ID:wWzCJETE 悔しいのは分からんでも無いが、客観的に見て自分に間違いがあるなら認めような。
間違いが無いなら別の話に持ってこうとせずに真正面から反論すべきだな。
間違いが無いなら別の話に持ってこうとせずに真正面から反論すべきだな。
200デフォルトの名無しさん
2018/12/16(日) 19:29:40.20ID:7UXd2BE0201デフォルトの名無しさん
2018/12/16(日) 20:08:06.24ID:iM0z/gpL202デフォルトの名無しさん
2018/12/16(日) 22:36:05.00ID:7UXd2BE0203デフォルトの名無しさん
2018/12/16(日) 23:06:44.08ID:jPkme8um204デフォルトの名無しさん
2018/12/16(日) 23:17:12.24ID:7UXd2BE0205デフォルトの名無しさん
2018/12/17(月) 03:10:52.43ID:Lv/9aVPQ206デフォルトの名無しさん
2018/12/17(月) 03:13:56.86ID:Lv/9aVPQ 物事をきちんと分けて考えられないのもこのバカの特徴だな。
207デフォルトの名無しさん
2018/12/17(月) 07:18:53.33ID:QtVZQcqx208デフォルトの名無しさん
2018/12/17(月) 07:34:27.78ID:KD4HX3We まだやってんのw
209デフォルトの名無しさん
2018/12/17(月) 07:54:15.41ID:QtVZQcqx 2018/12/17(月) 03:10:52.43 ID:Lv/9aVPQ
夜中の3時とかよほど悔しかったみたいよ w
夜中の3時とかよほど悔しかったみたいよ w
■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 高市早苗総理「金利上昇よりも日本の成長が大事」 ★2 [Hitzeschleier★]
- 【将棋】福間香奈 女流六冠が会見 妊娠・出産でタイトル戦の事実上不戦敗 「妊娠したら、どちらか一方を諦めないといけない状況」 [冬月記者★]
- 【コメ】卸売業者「簡単に安売りできない」「大暴落起きれば大赤字に」 JA「新米の販売進度が近年になく遅い。コメの回転が悪い」 ★2 [Hitzeschleier★]
- 小泉防衛相「危険回避のための十分な情報なかった」「問題の本質は30分にわたるレーダー照射」…中国側の音声公開を強く批判 [♪♪♪★]
- 【野球】止まらぬ野球人口減少に危機感 ラミレス氏「野球人口は激減、人気自体も下がっている」「もっと野球ができる環境を整えるべき」 [冬月記者★]
- 「残クレ」でマイホーム、国が銀行向け保険 新型住宅ローン普及促す -日経 ★2 [少考さん★]
- 小泉防衛大臣「中国から通告はあったが具体的ではなかった」 [834922174]
- 【速報】共同通信スクープキタ━(゚∀゚)━!!「実際は日本の自衛隊機が中国機に対してレーダ照射ロックオンしていたことが発覚」 [339712612]
- Vtuberラーメン70%オフwwwwwwwww
- 【高市悲報】漁師さん「ハタハタが豊漁になるように祈願した!」1匹しか獲れなかったと話題になる😰 [616817505]
- 【んな🏡】お昼のまったりふな🍬ハウス🏰
- 【悲報】タマキン「高市さんはようやっとる!撤回の必要なし!」高市「早くトランプに会いたい🤗」国会にて [359965264]
