[過去ﾛｸﾞ]
Excel VBA 質問スレ Part68 (1002ﾚｽ)
Excel VBA 質問スレ Part68 http://mevius.5ch.io/test/read.cgi/tech/1598756127/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
104: デフォルトの名無しさん (ﾜｯﾁｮｲ 27ce-n8ne) [sage] 2020/09/07(月) 22:49:52 ID:744b2nM10 >>102 Dim objLinks As String http://mevius.5ch.io/test/read.cgi/tech/1598756127/104
105: デフォルトの名無しさん (ﾜｯﾁｮｲ bfc9-XrX+) [sage] 2020/09/07(月) 22:54:20 ID:VQNIMFGd0 >>103 IEの代替え何使ったらいいの？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/105
106: デフォルトの名無しさん (ﾜｯﾁｮｲ 27ce-n8ne) [sage] 2020/09/07(月) 23:07:32 ID:744b2nM10 >>105 データをダウンロードするだけならブラウザを使わずに直接ネットアクセスした方が早くて簡単 色んな方法があるけどXMLHTTPとかWinHttpRequestとか調べてみ http://mevius.5ch.io/test/read.cgi/tech/1598756127/106
107: デフォルトの名無しさん (ﾜｯﾁｮｲ bfc9-XrX+) [sage] 2020/09/07(月) 23:17:00 ID:VQNIMFGd0 >>106 ありがとうございます 'JavaScriptを実行しFormを送る処理 objIE.Navigate "JavaScript:doAction('/文字列')" みたいなことしないとアクセスできないサイトのデータが取得したいのですが 他に方法ありますか？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/107
108: デフォルトの名無しさん (ﾜｯﾁｮｲ e7e6-n8ne) [sage] 2020/09/07(月) 23:22:23 ID:sgrgY4Mk0 JavaScriptを読んで何やってるか調べろ http://mevius.5ch.io/test/read.cgi/tech/1598756127/108
109: デフォルトの名無しさん (ﾜｯﾁｮｲ 27ce-n8ne) [sage] 2020/09/07(月) 23:49:39 ID:744b2nM10 >>107 Form送信は単純なHTTPアクセスで代替できるケースが多いから、これもブラウザを使う必要はない てか、WEBの構造はVBA関係ないし http://mevius.5ch.io/test/read.cgi/tech/1598756127/109
110: デフォルトの名無しさん (ﾜｯﾁｮｲ e761-Mi9Z) [sage] 2020/09/07(月) 23:56:10 ID:UwONkXQv0 エクセル2010です。 上書き保存時にすべてのシートでA1セルを選択するようにしたいのですが、 Ctrl+S時とボタンのクリックイベントで挙動が違うことにハマってます。 1枚目シートにactiveXコントロールのボタンを配置し、VBAの構成は以下です。 1. シートモジュール : ボタンのクリックイベントにThisworkbook.saveだけを書いています。 2. ThisWorkbookモジュール : beforeSaveイベントで3を呼び出し。 3. 標準モジュール : 全シートのA1セルを選択するSubプロシージャ。ForEachでまわすだけ。 Ctrl+Sの際は2→3でうまくいきます。 ボタン押下の場合は、1→2→3と流れてはいるものの、なぜか各シートがactivateされなず、activeSheet.Range("A1").Selectが働きません。 1のクリックイベントから直接3を呼び出すのは、うまく行きます。 何故このような挙動になるのか分からず数日ハマってます。 どなたか、ご教示よろしくお願いします。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/110
111: デフォルトの名無しさん (ﾄﾞｺｸﾞﾛ MM7b-aCGe) [] 2020/09/08(火) 02:03:49 ID:weDKADyMM >>110 for i= activeworkbook.worksheets.count to 1 step -1 apprication.goto activeworkbook.worksheets(i).range("a1") next i activeworkbook.save スマホ打ちだから綴りミスはあるかも http://mevius.5ch.io/test/read.cgi/tech/1598756127/111
112: デフォルトの名無しさん (ｱｳｱｳｶｰ Sa9b-vRCQ) [sage] 2020/09/08(火) 07:47:00 ID:vMdvrooDa >>110 For eachで全シート回してるならActivateしなくても、 sh.Range("A1")で行けないか？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/112
113: デフォルトの名無しさん (ｱｳｱｳｶｰ Sa9b-vRCQ) [sage] 2020/09/08(火) 07:48:01 ID:vMdvrooDa >>112 間違えたsh.Range("A1").Selectだわ http://mevius.5ch.io/test/read.cgi/tech/1598756127/113
114: デフォルトの名無しさん (ﾜｯﾁｮｲ 27da-XrX+) [sage] 2020/09/08(火) 10:40:31 ID:C66iYfBu0 >>110 働かないという場合の原因で以下のことを調べてみ 1.実は働いていたがその後に別の動作をしたため働いていないように見える 2.働こうとしたが、なんらかの異常が出て失敗している 3.その処理が実行されていない（on errorやifの条件、イベント発生していないなど） http://mevius.5ch.io/test/read.cgi/tech/1598756127/114
115: デフォルトの名無しさん (ﾜｯﾁｮｲ 272c-3NJ+) [sage] 2020/09/08(火) 11:03:00 ID:0vfIbeP00 >>105 漏れは、yahoo のログインとか、 Ruby, Selenium Webdriver で、ブラウザを自動操作してる 単純なダウンロード・スクレイピングなら、RubyのNokogiri。 外部コマンドなら、curl, wget http://mevius.5ch.io/test/read.cgi/tech/1598756127/115
116: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM8f-dQ4P) [] 2020/09/08(火) 11:52:57 ID:POT3YWITM Application.EnableEvents=Falseしてるとか？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/116
117: デフォルトの名無しさん (ﾜｯﾁｮｲ 0701-4dlc) [sage] 2020/09/08(火) 16:58:59 ID:qXkQmTRa0 “>-1”&i て書いたときに >-2, >-3... っていうふうに比較値が意図せず負に進むんだけど正の値に足したい場合ってどうすれば良いでしょうか。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/117
118: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa8b-vi+Z) [sage] 2020/09/08(火) 18:39:01 ID:p9XW8v7Na >>117 VBAの挙動の問題 -を文字列、1を数値として認識してる そもそも、-1をダブルクォーテーションで括ってるのは文字列として-1を認識させたい時のみにするのが基本 なので、ダブルクォーテーションを取ってやれば意図通り動くはず http://mevius.5ch.io/test/read.cgi/tech/1598756127/118
119: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM8f-dQ4P) [] 2020/09/08(火) 19:07:42 ID:Pjd0b/NhM へー、そんな挙動するんだ。知らなかった >-11 >-12 >-13 になると思ってたよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/119
120: デフォルトの名無しさん (ﾜｯﾁｮｲ e77c-ALHH) [sage] 2020/09/08(火) 19:08:20 ID:E23V8S4o0 >>113 activeじゃないシートはselectできないと思うが http://mevius.5ch.io/test/read.cgi/tech/1598756127/120
121: デフォルトの名無しさん (ﾜｯﾁｮｲ e77c-ALHH) [sage] 2020/09/08(火) 19:10:47 ID:E23V8S4o0 >>110 Forの中身が間違ってるとか別のブックを見てるとか ほんとに選択したいシートが選択されてるか確認した？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/121
122: デフォルトの名無しさん (ﾜｯﾁｮｲ 0701-biH0) [] 2020/09/08(火) 20:06:33 ID:qXkQmTRa0 >>118 クォーテーション外してやってみたけど上手くいかないです... 初心者なんで拙いですが、一応自分で書いたものをのせます。 既出のデータを整理して2次元チャートを作成する目的です。 Dim cnt As Integer Dim x As Long Dim y As Long x = 0 y = 0 For x = 0 To 10 For y = 0 To 10 cnt = WorksheetFunction.CountIfs(Range("B2", Range("B2").End(xlDown)) "<=" 0 + x, Range("B2", Range("B2").End(xlDown)) ">= -1" & x, Range("C2", Range("C2").End(xlDown)) "<= 0" & y, Range("C2", Range("C2").End(xlDown)) ">= -1" & y) Cells(x , y) = cnt Next y Next x http://mevius.5ch.io/test/read.cgi/tech/1598756127/122
123: デフォルトの名無しさん (ﾜｯﾁｮｲ e77c-ALHH) [sage] 2020/09/08(火) 20:34:38 ID:E23V8S4o0 いつも人任せだな… そのcountifの引数の中身が自分の意図した内容かなんで確認しないの？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/123
124: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fb5-/qgI) [sage] 2020/09/08(火) 21:43:07 ID:MiWYYVaX0 もう30過ぎて勉強もなぁ…って手が進まない VBAを知識をパンパンに詰め込んでああこれねって感じでカタカタと打ち込んでプロシージャ作りたいもんだわ http://mevius.5ch.io/test/read.cgi/tech/1598756127/124
125: デフォルトの名無しさん (ﾜｯﾁｮｲ e77c-ALHH) [sage] 2020/09/08(火) 21:57:43 ID:E23V8S4o0 考えることを人に丸投げしてるだけで勉強は関係がない http://mevius.5ch.io/test/read.cgi/tech/1598756127/125
126: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fb5-/qgI) [sage] 2020/09/08(火) 22:00:12 ID:MiWYYVaX0 人に丸投げというかネットで拾ったものの組み合わせでいつも何とかしてしまう 知識がほとんど入らない 異動希望出してるしなぁ http://mevius.5ch.io/test/read.cgi/tech/1598756127/126
127: デフォルトの名無しさん (ﾜｯﾁｮｲ 5f1f-W64q) [sage] 2020/09/08(火) 22:06:16 ID:aT8iqlgZ0 エクセルの指定列から3列コピーしてその4列目に挿入して貼り付けた後セルに入ってる値を消すコードをRangeじゃなくてCellsでやりたいです。 clmtar=10 10〜13列をコピー 14列目に挿入 14〜17列目のセルの値クリア。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/127
128: デフォルトの名無しさん (ﾜｯﾁｮｲ c73d-vi+Z) [sage] 2020/09/08(火) 22:11:08 ID:+kf0/gdp0 >>127 コピー後の値を消すの？ 元通りになるだけだと思うけど http://mevius.5ch.io/test/read.cgi/tech/1598756127/128
129: デフォルトの名無しさん (ﾜｯﾁｮｲ 27da-XrX+) [sage] 2020/09/08(火) 22:29:42 ID:C66iYfBu0 >>126 愚痴る暇があったら入門書かって１ページでもいいから読んでろ http://mevius.5ch.io/test/read.cgi/tech/1598756127/129
130: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fb5-/qgI) [sage] 2020/09/08(火) 22:34:56 ID:MiWYYVaX0 >>129 すんません…なんか職場でおばちゃんがあれも作ってとか調子こいてるだけで こりゃまた愚痴だわ これぞ！っていう入門書ありますかね イチからガチで鍛えてみるかな http://mevius.5ch.io/test/read.cgi/tech/1598756127/130
131: デフォルトの名無しさん (ｱｳｱｳｴｰ Sa1f-16Fo) [sage] 2020/09/08(火) 22:36:08 ID:8mxHLcBxa >>126 なんとかできてるならそれも実力のうちなのだと思うよ 楽しい、自分ならこうしてみたい、こうしたらどうなるのだろう とかがないならそこまでだけど http://mevius.5ch.io/test/read.cgi/tech/1598756127/131
132: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fb5-/qgI) [sage] 2020/09/08(火) 22:40:05 ID:MiWYYVaX0 ネットで検索 プロシージャを組み合わせたり簡単なところをイジる 出きたと思ったら会社のメルアドにプロシージャ貼り付けたテキスト送る 会社で組み合わせる UserFormのボタンに割り当て これでごまかしつつやってきた 圧倒的な知識が欲しいなぁと http://mevius.5ch.io/test/read.cgi/tech/1598756127/132
133: デフォルトの名無しさん (ﾜｯﾁｮｲ 27da-XrX+) [sage] 2020/09/08(火) 22:47:12 ID:C66iYfBu0 >>130 それすら他人に頼るようじゃいつまでたっても進まない http://mevius.5ch.io/test/read.cgi/tech/1598756127/133
134: デフォルトの名無しさん (ﾜｯﾁｮｲ e77c-ALHH) [sage] 2020/09/08(火) 22:50:54 ID:E23V8S4o0 今までどおり困ったら初心者ですとか勉強中ですとかで知識ないアピールで人にやらせて突っ込まれたら謎の正当化とどうでもいい言い訳で誤魔化してやっていくんだろうな http://mevius.5ch.io/test/read.cgi/tech/1598756127/134
135: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fb5-/qgI) [sage] 2020/09/08(火) 22:52:28 ID:MiWYYVaX0 ネットで調べてなんとかなってしまう時代のせいだよね 俺は悪くない http://mevius.5ch.io/test/read.cgi/tech/1598756127/135
136: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa8b-yCsQ) [sage] 2020/09/08(火) 23:27:06 ID:HhRrDF1oa そういう人が増えてきたからあんまり教えないようにしてる http://mevius.5ch.io/test/read.cgi/tech/1598756127/136
137: デフォルトの名無しさん (ﾜﾝﾄﾝｷﾝ MM7a-nV8z) [] 2020/09/09(水) 00:19:56 ID:akgtbWjMM ゆとり世代の特徴だぞ http://mevius.5ch.io/test/read.cgi/tech/1598756127/137
138: 110 (ﾜｯﾁｮｲ 5961-RQWs) [sage] 2020/09/09(水) 00:23:30 ID:Lvk20igu0 >110です。 書き込み後にいろいろググったところ、いくつかのサイトで コードからの保存はbeforeSaveイベントが正常に働かない旨の記載がありました。 今回の事象もこれに当たるのかなと考えています。 そんな訳で、ボタンでの保存はenableEventsをfalseにして別処理にしました。 回答くださった皆様、ありがとうございました。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/138
139: デフォルトの名無しさん (ﾜｯﾁｮｲ eab5-mjPJ) [sage] 2020/09/09(水) 00:53:57 ID:0o8c0VF10 別にここで聞いても答えなんて返ってこないし期待してないのでご安心を http://mevius.5ch.io/test/read.cgi/tech/1598756127/139
140: デフォルトの名無しさん (ﾜｯﾁｮｲ 39e6-Pwf7) [] 2020/09/09(水) 01:12:42 ID:VoppH/up0 足し算がわかりませんとか言われても入門書でも読めとしか言えないよな http://mevius.5ch.io/test/read.cgi/tech/1598756127/140
141: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-zN8f) [sage] 2020/09/09(水) 04:06:45 ID:Y+JI74HRa 入門書読めと言うとどの入門書がいいか聞いてくるよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/141
142: デフォルトの名無しさん (ﾜｯﾁｮｲ 6a42-vvkI) [sage] 2020/09/09(水) 08:19:04 ID:z9RILJ2v0 入門書を紹介すると今度はどこで買えばいいか聞いてくるよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/142
143: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/09(水) 09:27:32 ID:8tppu1V70 通販で買えって言うとお金がないって言ってくるよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/143
144: デフォルトの名無しさん (ﾄﾞｺｸﾞﾛ MM12-1HGn) [sage] 2020/09/09(水) 09:43:27 ID:9AZapVJXM お金あげると姿をくらますよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/144
145: デフォルトの名無しさん (ﾜｯﾁｮｲ 397c-bL/7) [sage] 2020/09/09(水) 10:03:14 ID:I5K9tGVf0 しかも捨て台詞付きで http://mevius.5ch.io/test/read.cgi/tech/1598756127/145
146: デフォルトの名無しさん (ﾌﾞｰｲﾓ MM8e-+eY2) [sage] 2020/09/09(水) 10:37:20 ID:KbsHkxtjM すみません。ちょっと長くなってしまうのですがTreeViewをいじっているうちに分からない事があったので教えて下さい。 TreeViewの子ノードをD&Dでリストボックスにコピーする動作を作っていたのですが、ドラッグ開始時点のSelectedItemを取得しようとすると１度子ノードをクリックした上でD&Dを行う必要がありました。 その為、既定引数の?POS,yPOSを使ってHitTestをSelectedItemに代入しようとしました。 しかしそれが上手く動作せず色々調べた結果、 xとyに*15をすると言う記述を見つけ試してみたところ、思い通りの動作を得られました。 しかしながらこの15はなんの15なんだ。他の環境ではこの数値は変わるのか。変わるならば何を元に算出すれば良いのだろうか。 という疑問が浮かびました。 お手数をお掛け致しますがお分かりになる方がいらっしゃいましたらご教授頂けませんでしょうか。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/146
147: デフォルトの名無しさん (ﾜｯﾁｮｲ 6a2f-sa+Q) [sage] 2020/09/09(水) 14:26:55 ID:dKuEV/F30 まずその15をかけるってどこに書いてあったんだよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/147
148: デフォルトの名無しさん (ｱｳｱｳｶｰ Sa55-hUiG) [sage] 2020/09/09(水) 16:31:31 ID:0Qh2iKtEa Windows標準のシステム解像度だとピクセルとTwipsの比率が1:15だからってスタックオーバーフローに書いてあった http://mevius.5ch.io/test/read.cgi/tech/1598756127/148
149: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-AH3D) [] 2020/09/09(水) 17:07:35 ID:cdbk3sfrM c言語のdefineに相当する文法は無いですか? constだと違和感がありますので http://mevius.5ch.io/test/read.cgi/tech/1598756127/149
150: デフォルトの名無しさん (ﾌﾞｰｲﾓ MM8e-+eY2) [sage] 2020/09/09(水) 17:36:02 ID:KbsHkxtjM >>148 助かります ありがとうございました という事は使用環境次第では正常に動作しない場合も有り得るって事なのですね。対策を検討してみます。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/150
151: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-PnJR) [sage] 2020/09/09(水) 17:50:55 ID:jCqtOC3ba >>149 どこに違和感があるのかを言わないと案を出せません http://mevius.5ch.io/test/read.cgi/tech/1598756127/151
152: デフォルトの名無しさん (ﾜｯﾁｮｲ 2a1f-ah1O) [sage] 2020/09/09(水) 20:59:39 ID:ynJDkc680 >>128 コピー後挿入したら隣に3列追加されてセルの長さもコピーした3列と同じになりますよね？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/152
153: デフォルトの名無しさん (ﾜｯﾁｮｲ 397c-bL/7) [sage] 2020/09/09(水) 21:05:53 ID:I5K9tGVf0 列幅をコピーすればいいのでは… http://mevius.5ch.io/test/read.cgi/tech/1598756127/153
154: デフォルトの名無しさん (ﾜｯﾁｮｲ 3d3d-PnJR) [sage] 2020/09/09(水) 21:18:50 ID:Uey8EdNp0 >>152 幅を一緒にしたいなら最初からそう書けば良かったのに http://mevius.5ch.io/test/read.cgi/tech/1598756127/154
155: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-Sism) [] 2020/09/10(木) 00:02:31 ID:a+RPoaYl0 >>149 あなたが思っているC言語のdefineの使い方は、コンパイラが置換するもので、定数の概念とは少し違いますよ？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/155
156: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-Sism) [] 2020/09/10(木) 00:04:04 ID:a+RPoaYl0 >>152 そもそも列の挿入操作が必須なのか？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/156
157: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-Sism) [] 2020/09/10(木) 00:05:42 ID:a+RPoaYl0 列の挿入なんてあちこちに影響するから、やりたがる理由がわからない。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/157
158: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-zN8f) [sage] 2020/09/10(木) 01:40:18 ID:JZj4+m/Aa 条件付き書式が壊れたりすると面倒 http://mevius.5ch.io/test/read.cgi/tech/1598756127/158
159: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-Sism) [] 2020/09/10(木) 02:24:17 ID:a+RPoaYl0 自分の操作と同じ手順を踏みたいだけなんだろうね プログラマではない素人感覚 http://mevius.5ch.io/test/read.cgi/tech/1598756127/159
160: デフォルトの名無しさん (ｱｳｱｳｴｰ Sa52-psz/) [] 2020/09/10(木) 04:18:44 ID:026ADmyCa test http://mevius.5ch.io/test/read.cgi/tech/1598756127/160
161: デフォルトの名無しさん (ﾌﾞｰｲﾓ MM8e-4twR) [sage] 2020/09/10(木) 07:50:51 ID:T4cQI13RM 超初心者なんだけど 配列の中から指定値の近似値の座標を検索するのにいい感じの方法はないでしょうか (以下、以上、完全一致全て含めての近似値) http://mevius.5ch.io/test/read.cgi/tech/1598756127/161
162: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 08:50:52 ID:l+lun8zfM どうせ大した数じゃないんだろ 総なめしろよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/162
163: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-PnJR) [sage] 2020/09/10(木) 09:29:12 ID:rdKJuFJTa >>161 for eachで比較対象値と指定値を全て比較して、結果出力してその中でMIN関数使えば http://mevius.5ch.io/test/read.cgi/tech/1598756127/163
164: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/10(木) 10:03:54 ID:QatXFD490 >>161 前もってソートした配列作って二分探索か、 配列の値-指定値の絶対値が最小になる値を探す http://mevius.5ch.io/test/read.cgi/tech/1598756127/164
165: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 10:32:25 ID:vUgEJ8vWd Min(Abs(配列-指定値)) http://mevius.5ch.io/test/read.cgi/tech/1598756127/165
166: デフォルトの名無しさん (ﾌﾞｰｲﾓ MMc9-4twR) [sage] 2020/09/10(木) 12:18:21 ID:tJgZROmkM 指定値と配列値の差分を絶対値にして比較した場合、 指定値が5だとして 配列 差分(ABS) 4 1 7 2 となり、最小の差分は1とわかる 座標を知りたいので指定値(5)-差分(1)=4となり、配列の中から4を検索して座標を調べればいいのかなって思ってたんだけど 絶対値で出てくると5-1か5+1どっちを検索すればいいか不明じゃないですか？ そこらへんを解決する方法があれば聞きたいです http://mevius.5ch.io/test/read.cgi/tech/1598756127/166
167: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 12:33:38 ID:l+lun8zfM ひとつに絞りたいならお前がルールを決めればいい お前に決定権がないなら保護者に聞け http://mevius.5ch.io/test/read.cgi/tech/1598756127/167
168: デフォルトの名無しさん (ﾜｯﾁｮｲ 7d01-pVuC) [sage] 2020/09/10(木) 12:50:19 ID:/arv21np0 ExcelVBAのフレームワークってないんですか？ PHPやJavascriptはまずフレームワーク覚えるもんだと思うのですが VBAだとそういうのが見当たらなくって・・・ http://mevius.5ch.io/test/read.cgi/tech/1598756127/168
169: デフォルトの名無しさん (ﾌﾞｰｲﾓ MM81-m2CW) [sage] 2020/09/10(木) 12:52:37 ID:sAyQhYLaM 見よう見まねで結構大掛かりなマクロを作った 情シスには程遠い事務の部署で 改善賞1万円 うーんもうちょい欲しかった http://mevius.5ch.io/test/read.cgi/tech/1598756127/169
170: デフォルトの名無しさん (ｽﾌｯ Sd0a-EJMP) [sage] 2020/09/10(木) 13:06:54 ID:PB4qSPsyd オフイスを便利に使うためのお手軽言語でフレームワークの勉強とかやってたら非効率な上に大したメリットもない http://mevius.5ch.io/test/read.cgi/tech/1598756127/170
171: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-ruyw) [sage] 2020/09/10(木) 13:09:58 ID:4uvZuCuyM フレームワークという意味ではVBAそのものがVB6のOffice向けフレームワーク さらに言えばExcel向けに特化したものがExcelVBA 他のOfficeソフトにもそれぞれのVBAがある http://mevius.5ch.io/test/read.cgi/tech/1598756127/171
172: デフォルトの名無しさん (ﾌﾞｰｲﾓ MMc9-4twR) [sage] 2020/09/10(木) 13:11:29 ID:XKC0VKf0M >>167 一つに絞りたいというか最も近しい値を知りたいのです 指定値が5のとき、配列が4と7なら4を、3と6なら6の座標を調べたい 1万行は超えるから総なめはちょっと… http://mevius.5ch.io/test/read.cgi/tech/1598756127/172
173: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 13:21:59 ID:4mlwjCSed >>172 パソコンにとっては「たった」1万行だよ 総舐めが一番簡単だし、開発時間も含めれば一番早い http://mevius.5ch.io/test/read.cgi/tech/1598756127/173
174: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 13:23:29 ID:4mlwjCSed 総舐めでもここでグダグタ言ってる間に結果が出る http://mevius.5ch.io/test/read.cgi/tech/1598756127/174
175: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 13:38:32 ID:l+lun8zfM >>172 は？ 質問は4と-4だろ？ もう俺が決めてやるよ -4にしろ、はい解決 http://mevius.5ch.io/test/read.cgi/tech/1598756127/175
176: デフォルトの名無しさん (ﾜｯﾁｮｲ 6aad-+eY2) [sage] 2020/09/10(木) 13:41:25 ID:Yq3PJL3D0 セルを弄くり回すとかじゃなくて配列のまま総舐めするなら1万行ぐらいすぐ終わるでしょう 指定した値aの近似値が欲しいなら If a-x<=Array(i) And a+x>=Array(i) Then とかで引っ掛かる奴を引っ張り出すなりなんなりすりゃあ良い http://mevius.5ch.io/test/read.cgi/tech/1598756127/176
177: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 13:43:28 ID:l+lun8zfM あ、ごめん 俺が質問を勘違いしてたわ http://mevius.5ch.io/test/read.cgi/tech/1598756127/177
178: デフォルトの名無しさん (ﾜｯﾁｮｲ 6aad-+eY2) [sage] 2020/09/10(木) 13:48:20 ID:Yq3PJL3D0 近似値の範囲が不定で最も近い値を探すって言うならRank関数とかLarge関数とかSmall関数使うのも手 http://mevius.5ch.io/test/read.cgi/tech/1598756127/178
179: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 13:50:34 ID:l+lun8zfM >>168 各オブジェクトに多数のイベントが設定されているでしょ windowsのプログラミングはイベントドリブンが基本 ブックが開いた、ボタンが押された、マウスが動いたなどのイベントに対するコードを書いていけばアプリケーションが完成する http://mevius.5ch.io/test/read.cgi/tech/1598756127/179
180: デフォルトの名無しさん (ﾜｯﾁｮｲ 3dad-sCec) [] 2020/09/10(木) 18:35:00 ID:VdzBOqiR0 すみません今宿題でこれやってるんですけど打ち込んでもなにも出ないのですがなぜでしょう http://mevius.5ch.io/test/read.cgi/tech/1598756127/180
181: デフォルトの名無しさん (ﾜｯﾁｮｲ 3dad-sCec) [] 2020/09/10(木) 18:36:01 ID:VdzBOqiR0 https://i.imgur.com/poQzyJO.jpg これです http://mevius.5ch.io/test/read.cgi/tech/1598756127/181
182: デフォルトの名無しさん (ﾜｯﾁｮｲ 6a42-vvkI) [sage] 2020/09/10(木) 19:09:29 ID:yo745YZ80 打ち込んだだけで実行してないからじゃね http://mevius.5ch.io/test/read.cgi/tech/1598756127/182
183: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MM3e-Krlo) [sage] 2020/09/10(木) 19:30:20 ID:L0+T18/AM どこに打ち込んだかも分からないしなんとも http://mevius.5ch.io/test/read.cgi/tech/1598756127/183
184: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM3e-Pwf7) [] 2020/09/10(木) 19:46:53 ID:cO3BfNoWM 汚えコードだな http://mevius.5ch.io/test/read.cgi/tech/1598756127/184
185: デフォルトの名無しさん (ﾜｯﾁｮｲ 6d63-PnJR) [sage] 2020/09/10(木) 19:55:23 ID:T9YJeJvx0 >>166 コードが汚すぎる http://mevius.5ch.io/test/read.cgi/tech/1598756127/185
186: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/10(木) 20:10:09 ID:QatXFD490 >>181 セルの幅や高さは初期状態？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/186
187: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/10(木) 20:12:24 ID:QatXFD490 あ、なんでもない http://mevius.5ch.io/test/read.cgi/tech/1598756127/187
188: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/10(木) 20:17:20 ID:QatXFD490 普通に動いたんで入力ミスとか環境の問題かな http://mevius.5ch.io/test/read.cgi/tech/1598756127/188
189: デフォルトの名無しさん (ｽｯﾌﾟ Sdea-ah1O) [sage] 2020/09/10(木) 20:49:46 ID:Rp5mNNXSd パズルゲームを作ってます。 セルを奇数列から横2マス選択してドラッグさした場合に、移動先が同じ奇数列から始まる場所なら許可。偶数列から始まる場所に移動した場合は不可にして移動をキャンセルさせたいんですがどうしたら出来ますか？良いEVENTってあるんですかね？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/189
190: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 21:52:44 ID:WalExY5Hd >>180 そのまま入力してちゃんと動いたから、問題文には間違いはない https://i.imgur.com/kojc0gJ.png それにしても学校の宿題だとしたらひどすぎるな 先生がこんなに汚いコードしか書けないとか生徒がかわいそう http://mevius.5ch.io/test/read.cgi/tech/1598756127/190
191: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 21:54:41 ID:WalExY5Hd ああ最後の方に入力ミスあったわごめん http://mevius.5ch.io/test/read.cgi/tech/1598756127/191
192: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 21:56:12 ID:WalExY5Hd >>189 SelectionChange http://mevius.5ch.io/test/read.cgi/tech/1598756127/192
193: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-Sism) [] 2020/09/10(木) 21:56:18 ID:a+RPoaYl0 >>181 コメント行の終わりにシングルクォーテーションが付いているのは初めて見たw コメントというより、文字列リテラルに見えてくるw http://mevius.5ch.io/test/read.cgi/tech/1598756127/193
194: デフォルトの名無しさん (ﾜｯﾁｮｲ 3d3d-PnJR) [sage] 2020/09/10(木) 21:57:24 ID:b8lNN7jK0 >>190 こんな意図がこんなに読みづらいコード初めて見たわ http://mevius.5ch.io/test/read.cgi/tech/1598756127/194
195: デフォルトの名無しさん (ｱｳｱｳｴｰ Sa52-v0oT) [sage] 2020/09/10(木) 22:01:54 ID:qPrgFXQ2a >>181 先生変数宣言しないの？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/195
196: デフォルトの名無しさん (ｱｳｱｳｶｰ Sa55-hUiG) [sage] 2020/09/10(木) 22:06:42 ID:YMu2GFxia 教師は必ずしもコード書いてた人じゃないししゃあないんちゃう http://mevius.5ch.io/test/read.cgi/tech/1598756127/196
197: デフォルトの名無しさん (ﾜｯﾁｮｲ 668e-0TEw) [] 2020/09/10(木) 22:22:10 ID:6Lj7sAI40 >>180 馬鹿過ぎる帰れ http://mevius.5ch.io/test/read.cgi/tech/1598756127/197
198: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 22:28:05 ID:WalExY5Hd >>193 HTMLみたいにコメントが改行で終わるとは限らない言語はまれによくあるけどな それよりもインデントの汚さと、Cellsのパラメータにx, yを使ってるあたりがめちゃくちゃ気になる http://mevius.5ch.io/test/read.cgi/tech/1598756127/198
199: デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-pVuC) [sage] 2020/09/10(木) 22:28:20 ID:QatXFD490 Kirakira1 のコードにそっくりなのが検索で見るかるけど そっちでは変数宣言しているｗ http://mevius.5ch.io/test/read.cgi/tech/1598756127/199
200: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-PnJR) [sage] 2020/09/10(木) 22:31:17 ID:/qwml5cpa これか https://my-tax-nology.com/excel-vba-animation-rnd-function-cells-glitter >>マクロ（Excel VBA）を使えば、簡単なアニメーションを作ることができます。 >>アニメーションを作っていると楽しいだけでなく、プログラミングのスキルアップに繋がります。 なるほど？？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/200
201: デフォルトの名無しさん (ｱｳｱｳｴｰ Sa52-ndeh) [sage] 2020/09/10(木) 22:37:08 ID:uWh6vQvPa エクセルVBA は当分なくならないですかね http://mevius.5ch.io/test/read.cgi/tech/1598756127/201
202: デフォルトの名無しさん (ｽﾌｯ Sd0a-7JDO) [sage] 2020/09/10(木) 22:43:44 ID:WalExY5Hd >>200 VBAを教えてるサイトでコメントをシングルクォートで閉じたりカッコを全角で書くやつなんて世界に一人しかいない 本人ならDimやインデントはちゃんと書くはずだし、完全にパクリだな http://mevius.5ch.io/test/read.cgi/tech/1598756127/202
203: デフォルトの名無しさん (ﾜｯﾁｮｲ 3dad-IT/D) [] 2020/09/10(木) 22:59:03 ID:VdzBOqiR0 180ですなんとかできました。ド素人なんで申し訳ない このコードはそんなできのいいものじゃないんですか？ 先生凄く威圧的でいつもそんなんもわからんのかみたいな喋り方なんすけど http://mevius.5ch.io/test/read.cgi/tech/1598756127/203
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 799 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.028s