Excel VBA 質問スレ Part58

**デフォルトの名無しさん** · 2018/11/19(月) 06:47:24.99

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

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

**デフォルトの名無しさん** · 2018/12/19(水) 08:15:13.01

>>250
ThenからEnd Ifまでは処理をいくつ書いてもすべて実行される
If 条件 Then
　処理1
　処理2
　処理3
End If

**デフォルトの名無しさん** · 2018/12/19(水) 08:19:00.70

>>251
> ハンバーグを作るという要件に対して>>112はマッシュポテトを元々作るということになっていると思った。
何度書いても頓珍漢なものは頓珍漢なままだよ

> なお反論したいなら
>> マッシュポテトはハンバーグの付け合わせだから元々作ることになっている。
> が正しいと言う根拠持ってきてからにしてくれ
に答えられないなら黙ってた方がいいぞ w

**デフォルトの名無しさん** · 2018/12/19(水) 08:27:36.44

>配列への格納とオートフィルターが常に関係するわけじゃないのと同じでハンバーグとマッシュポテトは常に関係するわけじゃない
それぐらいは理解できるよね？

常に関係しなくても全くかまわないんだよ。
普通の人間は相手が何かを言った時、それはどういう意味か理解しようとする。
理解しないと頓珍漢かどうかも分からないから当然のことだ。
常に関係するわけじゃなくても、>>112の頭の中ではハンバーグの付け合わせにマッシュポテトを考えたのだろうくらいは想像する。
そういう想像も全くせずに頓珍漢だというなら1分に言及することなく最初から頓珍漢だと言うだろう。

そこでお前はお前の理解の元に「じゃがりこにお湯を注いだくらいでハンバーグが1分で出来るの?」と発言したのと同じ状態になっている。
俺はそのお前の理解の元がおかしいのではないかと言っている

**デフォルトの名無しさん** · 2018/12/19(水) 08:30:26.96

>>253
頓珍漢であってもお前は「じゃがりこにお湯を注いだくらいでハンバーグが1分で出来るの?」と発言した状態になっている。

この発言が正しいのか?

**デフォルトの名無しさん** · 2018/12/19(水) 12:22:13.52

なんでプログラム板住民は機械言語じゃなくて自然言語の言葉尻を捉えて追求したがるの？

**デフォルトの名無しさん** · 2018/12/19(水) 12:31:57.08

>>254
> 普通の人間は相手が何かを言った時、それはどういう意味か理解しようとする。
だから>>113で
> フィルタ掛けた結果を一気に配列に読み込むってできたっけ？
って確認してる
それに対して>>117みたいな頓珍漢なレスが来たんだが w

>>255はマジで意味不明だから無視するね

**デフォルトの名無しさん** · 2018/12/19(水) 12:56:12.77

>>257
相変わらずのバカっぷり。

お前の>>118で「(要件を満たすのに)VBAで1行で書けるぞ
って方法があるみたいなことを書いてるので聞いただけ」という発言に対して俺は「>>112の発言の1行とは(オートフィルタを掛けるのに)VBAで1行で書けるぞ」という意味なのでは?聞いたんだが。

**デフォルトの名無しさん** · 2018/12/19(水) 17:12:30.63

>>258
> (オートフィルタを掛けるのに)VBAで1行で書けるぞ
だからその回答になんの意味があるんだよ？
って何度も書いてあるんだが
意味があるというならその意味を書いてみなよ

**デフォルトの名無しさん** · 2018/12/19(水) 17:42:15.83

相変わらず何の臆面もてらいもなくRubyを持ち出すヴァカ w

**デフォルトの名無しさん** · 2018/12/19(水) 18:26:58.94

>>259
意味が有ろうが無かろうがお前の解釈が間違いだと言ってる。

意味が無かったらお前の間違いは無くなるのか?
無くならねえよ。

**デフォルトの名無しさん** · 2018/12/19(水) 18:39:33.72

元々のやり取りは以下の通り。

>>112「VBAで1行で書けるぞ」
>>113(お前)「フィルタ掛けた結果を一気に配列に読み込むってできたっけ？」
>>119(俺)「1行とはフィルタ掛ける部分のことを言ってるんじゃない?」
>>118(お前)「要件とは違うフィルタだけのことを言われても」
>>123(俺)「そうだけど、>>112で言ってる1行はフィルタだけと受け取る方が自然」
>>124(お前)「ガイジなのかな?」

どっちがガイジだよ

**デフォルトの名無しさん** · 2018/12/19(水) 18:41:10.55

vbaでcsv出力するとしたら色々やり方あるけど何が良いんだろう
fso?

**デフォルトの名無しさん** · 2018/12/19(水) 19:02:08.13

>>261
> 意味が有ろうが無かろうがお前の解釈が間違いだと言ってる。
> 意味が無かったらお前の間違いは無くなるのか?
> 無くならねえよ。
根拠出さないと何度繰り返してもそれこそ「意味ないぞ」w

>>262
誰も自然かどうかなんて聞いてないからな
ガイジかもしれないと思うのは当たり前のこと

**デフォルトの名無しさん** · 2018/12/19(水) 20:15:44.96

>>262
くだらない言い争いの元ってこれなのか？
：で区切れば1行で書けるだろ。

お前ら馬鹿か？

**デフォルトの名無しさん** · 2018/12/19(水) 21:21:27.33

>>250
Thenのあとに続けて同じ行に命令書いてないか？
Thenで改行したら、End If（かElse）まで条件判定で実行されるぞ

**デフォルトの名無しさん** · 2018/12/19(水) 22:17:38.71

>>266
あれは確かに糞仕様といっていいね

**デフォルトの名無しさん** · 2018/12/19(水) 22:22:43.60

>>264
根拠は何度も出している。
日本語が不自由なお前が理解出来て無いだけ。

そりゃお前は自然かどうかは聞いてないさ。
お前が聞いたこと以外を言うとガイジになるなら皆がガイジはお前と言うだろう。

**デフォルトの名無しさん** · 2018/12/19(水) 22:34:20.70

シートは回転できないでしょうか?
マリオカートの地面みたいな感じで。

**デフォルトの名無しさん** · 2018/12/19(水) 23:00:26.30

>>269
Excel単独ではできない

**デフォルトの名無しさん** · 2018/12/19(水) 23:22:19.99

カメラ機能で貼り付けて回転させればワンチャン

**デフォルトの名無しさん** · 2018/12/19(水) 23:48:46.06

>>263
outputもあるよ

**デフォルトの名無しさん** · 2018/12/20(木) 00:16:14.50

バカとバカの死闘もう決着ついたんか？バカ勝った？

**デフォルトの名無しさん** · 2018/12/20(木) 06:48:12.04

>>268
> 根拠は何度も出している。
> 日本語が不自由なお前が理解出来て無いだけ。
ん？
２通りの解釈ガーってやつのこと？
どう解釈しても頓珍漢なことに変わりないと何度も書いてるし、そもそもその２通りの解釈すら具体的に提示されてない

> そりゃお前は自然かどうかは聞いてないさ。
> お前が聞いたこと以外を言うとガイジになるなら皆がガイジはお前と言うだろう。
会話の中でいきなり聞いてもないことを喋りだす？
お前がコミュ障であることはわかったよ w

**デフォルトの名無しさん** · 2018/12/20(木) 08:04:34.66

>>274
どうしょうも無いバカ。
頓珍漢でもお前は間違いと言ってるだろ。
その根拠も既に何度も書いてる。
2通りの解釈も何度も書いてる。

オ―トフィルタを掛ける処理のみを1行と解釈するのと要件全てを満たす処理に1行と解釈するのの2通りだ。

日本語か通じないバカ。
>>119、>>123、>>146、>>148、>>156、>>180、

**デフォルトの名無しさん** · 2018/12/20(木) 08:05:15.91

>>189、>>205、>>215、>>221、>>258で提示してるわ。

アンカー多すぎて怒られる程提示してる。

**デフォルトの名無しさん** · 2018/12/20(木) 08:11:10.39

>>274
会話のやり取りとして関係有るなら聞かれたこと以外を話すのは全くおかしくない。
少なくとも>>118と>>123のやり取りをおかしいというならガイジはお前だろう。

**デフォルトの名無しさん** · 2018/12/20(木) 08:32:01.59

>>275-277
> オ―トフィルタを掛ける処理のみを1行と解釈
要件を満たさない頓珍漢な回答

> 要件全てを満たす処理に1行と解釈
それかと確認したらより頓珍漢な>>117がしゃしゃり出てきた w

いずれにせよ質問者の要件満たしてないクズ解釈

> 日本語か通じないバカ。
お・ま・えだよ

> 会話のやり取りとして関係有るなら聞かれたこと以外を話すのは全くおかしくない。
お前はあえて無視してるみたいだけど>>113で関係性を問うてるからその解釈は無理がある

**デフォルトの名無しさん** · 2018/12/20(木) 09:21:52.23

まだ分かってないのかよ。
お前が>>112が頓珍漢かどうかを判定するところでお前はもう間違っている。
ということはお前は>>112が頓珍漢かどうかも判定出来ていないということだ。
だから結果的に>>112が頓珍漢だったとしてもお前も頓珍漢なんだよ。

お前は間違った判断の元に>>112を頓珍漢と言ってる。

>普通に一気に配列に読み込んで空白行を詰める処理を入れればいいかと

に対して「空白行を詰める処理を入れれば」の文言を理解出来ずに、配列に空白行が残るなとどしてお前の案を頓珍漢と断じることに問題は無いのか?
文言を理解出来ない方が頓珍漢だろう。

これと同じでお前の>>112を頓珍漢だとする根拠が間違ってる。

**デフォルトの名無しさん** · 2018/12/20(木) 09:43:04.50

https://youtu.be/HjJjqSjTJwY

この人の頭いい自慢、笑いがとまらない(ﾜﾗ
自画自賛のみの動画。
自分が恥ずかしくならないのか？
たぶん恥ずかしい動画と気づいたらすぐ消すだろうが今はそれに気づいていない。

とにかく笑えます。

**デフォルトの名無しさん** · 2018/12/20(木) 12:23:32.88

>>279
> お前が>>112が頓珍漢かどうかを判定するところでお前はもう間違っている。
根拠のない妄想乙

> ということはお前は>>112が頓珍漢かどうかも判定出来ていないということだ。
妄想に基づく頓珍漢な解釈乙

> だから結果的に>>112が頓珍漢だったとしてもお前も頓珍漢なんだよ。
もう論理も何もない幼児が喚いてるレベル

> お前は間違った判断の元に>>112を頓珍漢と言ってる。
それ、お・ま・え

> に対して「空白行を詰める処理を入れれば」の文言を理解出来ずに、配列に空白行が残るなとどしてお前の案を頓珍漢と断じることに問題は無いのか?
バカなの？
書いてあって理解できないことと、書いてもないことは全然違う話
そんな理解力もないから
> これと同じでお前の>>112を頓珍漢だとする根拠が間違ってる。
なんて頓珍漢な結論で玉砕するんだよ w

**デフォルトの名無しさん** · 2018/12/20(木) 12:50:33.53

>>281
根拠は既に何度も書いているのに理解出来ないバカ。
反論出来ないからもうそれでやり過ごそうとする意図がミエミエ。
もうお前の根拠無いは通じない。
根拠はあると言ってるし、場所も言っている。
その根拠がおかしいというならわかるが無いじゃ話にならん。

ところで全く笑わせてくれるが、お前の発言こそ全部ブーメランだ。

>それ、お・ま・え
プッ。
俺は>>112を頓珍漢だなんて断じて無いんだが。
日本語ワカリマスカ?

全然違う話ではない。
間違った判断の元に相手を断じれば、結果的に頓珍漢でも頓珍漢でなくても間違いだ。
書いてある、書いてないは関係ない。
この例は、お前の主張通りだと断じる側が頓珍漢で間違った判断をすれば断じられる側が頓珍漢になってしまうのか?という例だ。

2通りの解釈ができなかったお前が>>112を頓珍漢と断じてもダメということだ。

**デフォルトの名無しさん** · 2018/12/20(木) 16:14:40.53

馬鹿の馬鹿による馬鹿同士の罵り合い

**デフォルトの名無しさん** · 2018/12/20(木) 17:25:31.33

これ何日連続でやってんの？

**デフォルトの名無しさん** · 2018/12/20(木) 17:43:06.63

>>112からなら10日間かな。
>>112は（このレスを含まないで）コメント数44件になっているw

**デフォルトの名無しさん** · 2018/12/20(木) 17:56:31.30

（このレスを含まないで）のアスペ感w

**デフォルトの名無しさん** · 2018/12/20(木) 18:37:50.96

>>282
> 2通りの解釈ができなかったお前が
まだ言ってるの？
お前はわざと無視してるけどそんな可能性は>>113で確認してる
>>112が回答すれば良かったものをガイジの>>117がしゃしゃり出てきて頓珍漢なレスしただけだろ w

**デフォルトの名無しさん** · 2018/12/20(木) 18:42:03.57

>>284
このスレをこれで埋め尽くすまでじゃね？ w

**デフォルトの名無しさん** · 2018/12/20(木) 20:10:52.84

>>288
もう相当飽きとるでおまえみたいなバカがおもろいんは一時的なもんやし

**デフォルトの名無しさん** · 2018/12/20(木) 22:31:27.95

VBAエンジニアって宣言するのって恥ずかしいことなのかな？
ツイッターのWEB屋達からは苦笑されるし、現場でもVBAは簡単的な扱いで
あまりいい意味で捉えられないように感じる

経歴的にVBA触ってた時間が長いし、
Windows と相性良いし、
VBAなんで叩かれてるんだろう？

**デフォルトの名無しさん** · 2018/12/20(木) 22:38:23.73

webパーはバカやからおいとくとしても
VBAエンジニアとゆうてもうたら言語としてのVBAをメンテナンスしとるエンジニアと思われるやろ
そこはただのエンジニアでええねん開発言語として主にVBAつことるゆうだけで

てかVBA叩いとるのこのスレにおるプロさんゆうバカな連中だけやぞw

**デフォルトの名無しさん** · 2018/12/20(木) 23:05:37.29

ロックマン作れるレベルなら、バカにされないんじゃないの?

**デフォルトの名無しさん** · 2018/12/20(木) 23:13:35.65

>>290
恥ずかしいんじゃなくて、根本的に間違ってるんだよ

アプリの開発にはVBAは適してないし、普通は使わない
ちょっとでも複雑なことをしようとするとAPIが必須になるし、ツールも貧弱で開発の効率が悪いから
そして、ワークシートに付属のマクロを書くだけの人はエンジニアと呼べるレベルにないことが多い

まあVBAで作られた社内アプリもあちこちで見た事あるけど、とにかく結果さえ出ればいいって感じでひどいもんだった
体裁の整ったアプリも作れないことはないけど、それこそVBAでは無駄に手間がかかるだけで、ようするに言語(道具)の選び方が適切じゃない

**デフォルトの名無しさん** · 2018/12/20(木) 23:17:37.85

>>292
趣味ならいいけど一般的に商品はVBAで作るわけにいかない
同じ物がVB.netならもっと少ない手間で作れるんだから、開発コストの無駄遣いになる

**デフォルトの名無しさん** · 2018/12/20(木) 23:19:19.18

「趣味でシステムエンジニアやってます」というのは成立しないと思うのは俺だけか？
趣味の一つとして認知されてるんなら、ここまで俺が書いたことは完全にひっくり返ってしまう

**デフォルトの名無しさん** · 2018/12/20(木) 23:22:10.52

別に国家資格が必要なわけじゃないから「俺は(VBA)エンジニアだ」と名乗るのは自由
聞いた人がどう思うか、どう思われるかはわからない

**デフォルトの名無しさん** · 2018/12/21(金) 00:33:22.33

>>290

　VBAは、あくまでOffice付属のマクロ言語なので、そこに何十年(最大24年)もしがみついてるとかだと、
自己紹介でそうと言われたら、叩くまではないにしても、「はぁ」で流しはするかも知れない。
　他の色々出来る中で、「VBAも触れます」なら、構えられることもないんじゃないかな。

**デフォルトの名無しさん** · 2018/12/21(金) 00:45:40.95

情報処理資格を受かった学生が「こんなの誰でも受かりますよ」って言うけど、
10年以上受からない奴は「いや、そんな簡単じゃないよ」って答える

会社では、新人・老害の会話が噛み合わないw
そういう老害が新人に教えるから、矛盾だらけw

勉強していない奴は、システムを組めない。
何も知らんからw

データ処理に適さない、表示情報が入った、Excel, PDF を成仏させる供養寺を、
住職(エンジニア)が開催してるw

**デフォルトの名無しさん** · 2018/12/21(金) 01:07:43.82

普通にプロとしてやってる人なら、言語仕様とライブラリ構成さえわかれば、どんな言語でも一定の結果は出せるもんだ
VBAだって言語の一つとして、文法や演算子、変数タイプ、組み込み関数なんかが把握できればプログラムは書けて当たり前なんだよ

**デフォルトの名無しさん** · 2018/12/21(金) 02:33:59.15

>>287
バ－カw
お前が確認したのはお前の1通りの解釈を元に一気に配列に読み込めるかどうかだけだ。

本来、以下のようにすべきところを
Function Check112(strHatsugen As String) As String

If strHatsugen="要件全てを1行" Then
Check112="頓珍漢"
Else If strHatsugen="オ－トフィルタのみ1行" Then
Check112="頓珍漢"
End If

End Function

お前のコードは以下の通りだ。
Function Check112(strHatsugen As String) As String

If strHatsugen="要件全てを1行" Then
Check112="頓珍漢"
End If

End Function

お前のコードではstrHatugen="オートフィルタのみ1行"の場合、戻り値は"頓珍漢"とならない。

**デフォルトの名無しさん** · 2018/12/21(金) 03:18:22.04

空白を取り除いて配列に入れるのって、結局どうやるのが一番シンプル？
マルチステートメントはとりあえず無しとして、作業シートを使って3行までは短縮できたけど
(セル範囲が決め打ちだからできたとは言えないかな

Sheets("Sheet1").Range("A:C").AutoFilter Field:=1, Criteria1:="<>"
Range("A1:C5").Copy Destination:=Sheets("Sheet2").Range("A1")
ary1 = Sheets("Sheet2").Range("A1:C3")

**デフォルトの名無しさん** · 2018/12/21(金) 05:00:28.02

>>300
夜中まで必死に考えたんだろうな… w

**デフォルトの名無しさん** · 2018/12/21(金) 07:57:42.03

>>290
他の言語と比べて微妙だから
vbaでも出来るけど他の言語ならもっと楽　なんで使わないの言語使えないの？て思考する人が一定数いるから

**デフォルトの名無しさん** · 2018/12/21(金) 08:20:20.78

>>302
普段から寝るのはあんなもんだ。

>>301
実際のところ、俺も「普通に一気に配列に読み込んで空白行を詰める処理を入れればいいかと」だね。

でも、データ総数300とかじゃどんなやり方でも良いし、気にしない。
効率を気にするなどと言っていても、実際は他で大きなロスしてても気にしない奴多数。
動かした所で大きなロスをしてる所がデータ読み込み部分と分かってから考えれば良い。
俺は一気に配列に読み込むのに慣れてるし、それで早いからそうするのが普通なだけで。

そもそもこういう場合でよくよくやりたいことの詳細を聞くと配列に取り込む必要が無かったりする場合も多い。

**デフォルトの名無しさん** · 2018/12/21(金) 08:22:45.52

>>301
あと、コードの量を減らすのはあまり意味が無い。
速度のためにコードの量はかなり増えることがある。

**デフォルトの名無しさん** · 2018/12/21(金) 08:32:12.60

誰でも知ってるようなことでドヤ顔ww

**デフォルトの名無しさん** · 2018/12/21(金) 15:58:03.36

突っ込みが幼稚

**デフォルトの名無しさん** · 2018/12/21(金) 20:47:54.84

VBとVBAを間違えてるやつがいるよな

**デフォルトの名無しさん** · 2018/12/21(金) 22:54:11.09

>>307
>>307

**デフォルトの名無しさん** · 2018/12/22(土) 04:42:53.90

アンカーを重ねて煽るのは幼稚

**デフォルトの名無しさん** · 2018/12/22(土) 06:45:30.74

>>310
>>307

**デフォルトの名無しさん** · 2018/12/22(土) 21:23:35.57

アンカーだけで煽った気になるのは幼稚

**デフォルトの名無しさん** · 2018/12/23(日) 00:54:04.25

>>312
>>307

**デフォルトの名無しさん** · 2018/12/23(日) 09:47:19.69

>>313-314
>>312

**デフォルトの名無しさん** · 2018/12/23(日) 10:45:49.13

>>314
>>307

**デフォルトの名無しさん** · 2018/12/23(日) 14:14:36.79

バカvsバカはまだ静かに継続中かw

**デフォルトの名無しさん** · 2018/12/23(日) 15:09:00.33

listviewでマルチセレクトから通常にもどすさいに再描画してるんですが、そのさい行がずれるんですが　listboxのtopindexみたいなものはないのでしょうか?　どうすればずれないようにできますか？

**デフォルトの名無しさん** · 2018/12/23(日) 19:45:55.65

チェックボックス有効無効をきりかえるため再描画してます。その際行がずれます。　すみませんでした。

**デフォルトの名無しさん** · 2018/12/24(月) 22:13:09.28

Excel VBAにlistviewなんてあったか？

**デフォルトの名無しさん** · 2018/12/24(月) 22:49:04.51

あるよぉ

**デフォルトの名無しさん** · 2018/12/24(月) 23:02:54.97

参照設定でね。

**デフォルトの名無しさん** · 2018/12/24(月) 23:56:46.20

それはVBAじゃないし
何を参照設定したかちゃんと書けよ

**デフォルトの名無しさん** · 2018/12/25(火) 00:16:00.70

参照設定もVBAの機能の一つだろ
デフォルトでもいくつか入ってるし、ファイル操作する時はFSOを追加するし、Outlookの操作も定番のテクニックだし

**デフォルトの名無しさん** · 2018/12/25(火) 01:26:51.15

ListViewはライセンス的に微妙なんだよな。
配る場合はダメだった気がする。

恐ろしく面倒な方法で実装すればライセンス的にも問題無いけどそこまでやれる人は殆どいないと思う。

**デフォルトの名無しさん** · 2018/12/25(火) 01:55:29.77

あとツールボックス右クリックでその他のコントロールを参照設定とは呼びたくないな。

**デフォルトの名無しさん** · 2018/12/25(火) 07:15:44.70

>>325
設置すると勝手に参照設定されますから、同じことです

**デフォルトの名無しさん** · 2018/12/25(火) 08:33:21.08

お前が呼びたいとか呼びたくないとか、お前の気分なんぞ知ったことではない

**デフォルトの名無しさん** · 2018/12/25(火) 18:45:28.39

Excel に入ってるんじゃないの？

**デフォルトの名無しさん** · 2018/12/25(火) 23:18:20.70

入っとるね

**デフォルトの名無しさん** · 2018/12/26(水) 01:42:12.21

いまのExcel VBAに標準でListViewあるのか？

**デフォルトの名無しさん** · 2018/12/26(水) 05:15:51.11

標準の意味とは

VBA可の環境ならコントロールの追加は誰でもできるが

**デフォルトの名無しさん** · 2018/12/26(水) 13:12:31.75

シートのコピーでafter:＝worksheets.countしても最後尾に追加されないことがあるんだけど何これ
通常なら問題無い非表示シートだか同名シートだかが混ざると不穏な動きする

**デフォルトの名無しさん** · 2018/12/26(水) 17:11:11.31

>>332
思い込みで書いててて仕様を正確に理解してない
コード晒してみ

**デフォルトの名無しさん** · 2018/12/26(水) 17:49:40.48

>>332
afterに入れるのはシートオブジェクトやで？

**デフォルトの名無しさん** · 2018/12/26(水) 21:16:35.59

>>332
https://sugoikaizen.com/excelvba/worksheets_sheets/

**デフォルトの名無しさん** · 2018/12/27(木) 18:50:28.99

Worksheets.Countだけ指定して最後尾にシート追加することもできるんだな。初めて知ったわ。

**デフォルトの名無しさん** · 2018/12/28(金) 00:28:35.21

>>333
解決してるけど状況だけ説明
Thisworkbook.Worksheets("雛形").Copy After:=Thisworkbook.Worksheets(Worksheets.Count)
普通に実行出来て追加される　けど末尾に追加されない
雛形シートは非表示で他にブック開いてないのが前提
原因は他の非表示シートが末尾にあったから？ぽい見えるシートの末尾に追加されてた
原因があってるのかは不明だけどコピーの前に全シート表示させる処理書いたら想定どおりに末尾に追加されたから解決としてそれ以上調べてない

**デフォルトの名無しさん** · 2018/12/28(金) 08:07:29.84

>>337
これで解決は酷いなあ。
このコードじゃダメだろ。
初心者が一番ハマるのに引っ掛かってる。

Worksheets.Countはどのブックのシート数を示してるの?
人間の思い込みと現実が違うことはよくある。
ブックが複数開いてたらThisworkbookがActiveとは限らない。

まあ、これが原因かどうかは分からんけど。

**デフォルトの名無しさん** · 2018/12/31(月) 13:34:36.98

コピーしたシートも非表示に設定されてるからじゃね？

**デフォルトの名無しさん** · 2019/01/03(木) 20:12:26.04

すみません、一般論として教えてください

一つのプロージャ内に複数のForNext文を使う場合
カウンタ変数はそれぞれ用意したほうがいいんでしょうか？
それとも全部「i」とかで固定したほうがいいんでしょうか？

**デフォルトの名無しさん** · 2019/01/03(木) 20:38:50.80

単純にカウンタとしてしか意味が無くて充分に短いループなら全部iでいいよ

**デフォルトの名無しさん** · 2019/01/03(木) 20:52:55.74

>>341
ありがとう
これまで全部「i」で統一してて他で使いたいときは違う変数に明け渡したり…ってしてたんだけど
この前業者の人が書いたコードを見たらそれぞれに変数を与えてたので…
デバッグの時に有利？とか何かプログラム業界の常識みたいなのがあるのかな？と気になって

**デフォルトの名無しさん** · 2019/01/03(木) 21:24:04.00

>>342
自分の頭使えよ

**デフォルトの名無しさん** · 2019/01/03(木) 21:38:30.48

>>342
他で使いたいときに明け渡すなら最初からそれぞれ違う名前にした方がいいんじゃね

**デフォルトの名無しさん** · 2019/01/03(木) 22:08:38.04

>>343
ここ質問スレだからそういう幼稚な発言はやめようね。
色んなレベルの人がいるから。

**デフォルトの名無しさん** · 2019/01/03(木) 22:16:13.64

>>340
そもそもプロは1つのメソッドに複数のループを書かない

**デフォルトの名無しさん** · 2019/01/03(木) 22:45:11.18

>>340
「プロシージャ」な
procedure

**デフォルトの名無しさん** · 2019/01/03(木) 22:57:49.15

>>342
ループがネストする場合にi,j,kとしたりするのは
FORTRAN由来でコンピュータ黎明期からある
https://qiita.com/yaju/items/38f63900491d4ac51af7
座標だとx,yとかで回したりもするがあまり長い名前は使わない方が良いかと

**デフォルトの名無しさん** · 2019/01/03(木) 23:18:24.27

i,j,kは慣習だけど、それ以外はループ変数といえど意味のある変数名を使うほうがいいぞ
長い名前使うなとか、インタプリタ時代の悪習でしかない

いかにわかりやすい変数名つけるかはセンスもあるけどな

**デフォルトの名無しさん** · 2019/01/03(木) 23:56:28.99

俺は行ならrow、列ならcolumn、インデックスならindexとかにして
なるべくi, j, kとか使わないわ、別にこだわりはないけど

**デフォルトの名無しさん** · 2019/01/04(金) 00:30:47.29

俺は一文字だけじゃ見失うから
iii jjj kkk ccc rrrって3文字連打してる
別の変数名への置換もしやすいしね