Excel VBA 質問スレ Part74

1 名前：デフォルトの名無しさん mailto:sage [2021/12/20(月) 01:40:59.22 ID:jnlr9GaR0.net] !extend:checked:vvvvv:1000:512 !extend:checked:vvvvv:1000:512 ↑同じ内容を2行貼り付けるナリ ExcelのVBAに関する質問スレナリ コード書き込みや作成依頼もOKナリ ※前スレ Excel VBA 質問スレ Part73 https://mevius.5ch.net/test/read.cgi/tech/1631485799/ VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured 183 名前：デフォルトの名無しさん [2021/12/31(金) 00:12:10.39 ID:8NNqkSwn0.net] >>180 vba自体はアホみたいに軽い 以下のような状態だと、良いpcを導入する意味はあるが・・・ 基本的にはｖｂａを基準にPC購入はあまり意味がないな ・重いブックを軽くしたい ・ものすごい手間を軽くしたい 184 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 00:31:59.05 ID:lr5eoeiP0.net] >>181 >>182 ありがとう 趣味程度にやってみようと思ってたから出しても7万位までのPCと思ってたんで。 メモリも8gくらいと思ってたけどやっぱ16g位で探してみよーかな 185 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 00:33:48.82 ID:pUbm5yFz0.net] エクセルはDataTableが最初から用意されているようなもんだから楽なんだよね これを他の言語でやろうとすると色々な設定か必要になるからお手軽にはできない 186 名前：デフォルトの名無しさん [2021/12/31(金) 00:35:47.83 ID:3bTQuPv+0.net] >>184 馬鹿のお前にはできないだけだろ 187 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 00:40:54.69 ID:XJlvK1q+0.net] >>183 今この時だけで考えるなら8GBでもまあギリギリいいけど、 もう数年以内に陳腐化する時期になって来てるから少し高くても16GBが良いよ。 ノートPCだと最近はメモリが直接基板に実装されてて増設出来ないというのも増えた。 個人的にはゲーミングとかのPCの主流が32GBくらいになってきて、 今は16GBが一般的なPCの主流かなという感覚。 188 名前：デフォルトの名無しさん [2021/12/31(金) 00:50:05.63 ID:2Zk/vij+0.net] ブラウザをOSにしたchromebookがあるのだから、ExcelをOSにしたExcelbookがあっても良いのでは？ 189 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 00:54:24.83 ID:lr5eoeiP0.net] >>186 久々にpc購入するので助言たすかります！ 16gのノート探してくる！ 190 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 00:56:59.16 ID:pUbm5yFz0.net] 何かの記事でエクセル方眼紙や文章作成はあかん、Wordでやれみたいなのを見たんだけど納得できん エクセルがあればWordは要らんわ 191 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 01:03:20.57 ID:pUbm5yFz0.net] >>182 セルの更新が噛んでいなければたいてい早いね 逆を言えばセルを大量に更新する作業は苦手、さらにそのセルを参照している他セルとかがあるとさらに遅くなる 192 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 02:56:55.14 ID:9dsRZQDG0.net] ExcelやるならゲーミングPC買えって言われたけど、根拠がわからん グラスや図形の表示強いとかか強力なGPU積んだゲーミングだけに 193 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 05:17:24.79 ID:jAwdB3GX0.net] 多くのセルに数式が入ってたら並列処理ができるマシンの方が計算スピードが速いということじゃないかな。 Excel に限らず数値計算をやるマシーンとしては並列処理を担当する GPU を乗せたゲームマシーンが適してるとはよく言われてるけどね。 194 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 05:42:28.72 ID:UU9o5XoI0.net] >>192 EXCELって2007から数式とかはマルチスレッドに対応してるのね。知らんかったわ。 ならついでにVBAの方もマルチスレッドに対応して組めるようにしておいてくれれば良かったのに。 195 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 05:50:27.02 ID:jAwdB3GX0.net] 線型計算は インテルのCPU の中に並列処理の計算機能があったと思う。エクセルも VBA もそれを利用してると思う。 これを越えた並列処理のプログラミングは言語自身が並列処理機能を持ってないと駄目だったような気がする。Juliaとかみたいに。 196 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 06:07:26.57 ID:sTYntvPC0.net] メモリだけやたら増やしてもリソースに制限があるからな 197 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 08:03:41.87 ID:9dsRZQDG0.net] あんまりゲーミングノートでExcelやりたくないわな、意識高い系に思われる？？ でも性能抜群だから良さそうね 198 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 08:33:02.95 ID:3Q2SwZ5h0.net] >>185 大晦日くらい子供じみた煽りやめたら 199 名前：デフォルトの名無しさん [2021/12/31(金) 11:35:03.81 ID:8NNqkSwn0.net] >>191>>196 グラフや画像を使いまくるならゲーミングPCもアリだが・・・ そもそもグラフそんなに使いまくらない上に、今試してみたけどそんなに重くない ＞意識高い エイリアンウェアでも無い限り、誰もノートPCのガワなんて見てないから気にするな 個人的にオススメはsurfaceかASUSの2in1。 200 名前：デフォルトの名無しさん [2021/12/31(金) 11:55:09.22 ID:MYEwtbNd0.net] ExcelだけでCPUファン全開にしてみろ 201 名前：デフォルトの名無しさん [2021/12/31(金) 12:22:47.21 ID:2Zk/vij+0.net] ExcelにCPUファンの回転数を制御する機能は無いので、SpeedFanのCOM版のようなソフトを呼び出すことになるのでは？ 202 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 12:30:09.65 ID:YvmYSF350.net] >>191 相談相手の考えだから中にはそういう人がいてもおかしくないんじゃね 10人に相談したら全員が同じスペックのPCをすすめるとでも？ 203 名前：デフォルトの名無しさん [2021/12/31(金) 12:33:05.83 ID:2Zk/vij+0.net] ハルカスの二階で今日まで全国の駅弁売ってるらしいけど。 204 名前：デフォルトの名無しさん [2021/12/31(金) 12:47:47.40 ID:8NNqkSwn0.net] >>202 なんで俺が天王寺に住んでる事知ってるの 205 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 13:04:43.84 ID:TPLe0a5e0.net] >>200 そうじゃなくて ファンが全開になるくらいのCPU使用率にExcelだけでしてみろ じゃないの 206 名前：デフォルトの名無しさん [2021/12/31(金) 13:11:46.46 ID:8NNqkSwn0.net] A列全部に"a"と入れてホイールグリグリするとCPUもGPUも100%行くな 207 名前：デフォルトの名無しさん [2021/12/31(金) 13:24:32.70 ID:2Zk/vij+0.net] 天王寺って富豪が住むところじゃなかったっけ。 208 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 15:43:40.65 ID:CE1IM8E70.net] >>193 > ならついでにVBAの方もマルチスレッドに対応して組めるようにしておいてくれれば良かったのに。 マルチスレッドでトラブルVBerが続出する未来しか見えない 209 名前：デフォルトの名無しさん [2021/12/31(金) 15:55:10.13 ID:2Zk/vij+0.net] さっきハルカス行ってきたけど、ハルカスとミオの間の信号のとこでコロナの陰謀を演説してる女性達が居たわ。 コロナで頭がおかしくなっちゃったんだろね。 210 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 16:59:02.91 ID:YvmYSF350.net] >>208 「コロナの陰謀」ってなんか映画のタイトルみたいだな 211 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 19:46:32.63 ID:9dsRZQDG0.net] わかた アザースかsurface買ってくる 212 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 19:50:48.59 ID:9dsRZQDG0.net] つうか同志達は今日年越しExcelやるでしょ？ 213 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 20:01:44.53 ID:ZQlVedJW0.net] >>192 EXCELは数値計算にＧＰＵ使うのか？ たんにゲーミングＰＣが、そこそこの性能だってだけじゃね 214 名前：デフォルトの名無しさん [2021/12/31(金) 21:14:15.54 ID:8NNqkSwn0.net] >>211 質問あったらやるかなぁ >>212 使わないよ ＞たんにゲーミングＰＣが、そこそこの性能だってだけじゃね そうそう ただ、グラボ代もったいないとは思うけど 215 名前：デフォルトの名無しさん [2021/12/31(金) 21:17:51.43 ID:Ev3FJm7o0.net] >>212 計算には使っていないぞ 描画だけ ゲーミング機だってGPUも色々あるし いつもの知ったかだろうな 216 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 21:52:34.38 ID:9dsRZQDG0.net] 年越しの瞬間に効果音が鳴るマクロ作ったりいろいろ遊べそうね 217 名前：デフォルトの名無しさん [2021/12/31(金) 21:58:02.47 ID:2Zk/vij+0.net] あと二時間しかない。 しかしExcelなら楽勝で出来るでしょう。 218 名前：デフォルトの名無しさん [2021/12/31(金) 21:59:34.78 ID:2Zk/vij+0.net] 今日見たコロナ陰謀説の人たちは通行人の邪魔にならないようにしてたし、維新や共産党よりだいぶマナーが良いな。 219 名前：デフォルトの名無しさん [2021/12/31(金) 22:07:44.53 ID:8NNqkSwn0.net] >>215 一瞬で終わってしまった Sub foo() Do If Now() > "2022/1/1 00:00:00" Then Beep Exit Sub End If Loop End Sub 220 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 22:28:49.69 ID:pUbm5yFz0.net] >>218 wavファイルでどうぞ 221 名前：デフォルトの名無しさん mailto:sage [2021/12/31(金) 23:09:39.31 ID:YvmYSF350.net] >>218 不等号は > じゃなくて >= だな 222 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 00:06:56.85 ID:DizA0src0.net] あ、ホントだ 鳴らない仕様ね つか開けましたおめでとう 223 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 00:07:03.49 ID:DizA0src0.net] あ、ホントだ 鳴らない仕様ね つか開けましたおめでとう 224 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 00:07:20.46 ID:DizA0src0.net] あ、ホントだ 鳴らない仕様ね つか開けましたおめでとう 225 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 01:06:32.10 ID:P7MxTR/l0.net] >>213，214 EXCEL for 下層国民というバージョンにはないが普通のバージョンは2016以降GPUが使用できる。 オプション→詳細設定→ハードウェアグラフィックアクセラレータで項目で設定できる。 貧相なノートPCだとこの機能が足を引っ張るので、EXCEL for 下層国民バージョンでは初めからGPU機能を搭載していないらしい。 お前らのエクセルはEXCEL for 下層国民　に違いない。 >>191 数値計算向きのノートPCに関しては下のリンク先に詳しい。 結果的にゲーム用のマシンになるとのこと。 https://student-notepc.com/gpgpu.html#calculation 226 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 01:10:43.70 ID:P7MxTR/l0.net] エクセルでのGPU利用については下のリンク先を見てください。 https://www.windows8-help.net/office/offce2016-gpushi/ 227 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 01:27:29.55 ID:KHDCojLG0.net] >>224 そのオプションは、あくまでも表示にGPUを使うかCPUでやるかの選択で 数値計算にGPUを使うようにはなってないだろって話なんだが GPU積むだけですべてのソフトが勝手にすべての数値計算をGPUでするわけじゃないんだよ Windowsに数値計算用のドライバなんてないから 228 名前：デフォルトの名無しさん [2022/01/01(土) 01:48:41.35 ID:fFMHRYWI0.net] >>224 馬鹿が恥の上塗りに来た 229 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 02:00:47.02 ID:P7MxTR/l0.net] >>226 そうなのか。すまん。 213，214にも早めにあやまっとくわ。 メンゴ 230 名前：デフォルトの名無しさん [2022/01/01(土) 08:47:41.52 ID:XIwan5C70.net] GPGPUは機械学習ぐらいでしか使わないよ 設定も大変なのだ 231 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 09:11:06.27 ID:+bE9Chjq0.net] みんな明けましておめでとう 232 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 09:31:17.86 ID:DizA0src0.net] 親切な人がいろいろ調べてくれて助かる ここの住人は口は悪いが根は優しいのね。 どこかのExcel板と大違いね てか開けましたおめでとう 233 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 18:50:55.82 ID:WKGWygZgM.net] ガチのプログラマにはバカにされ、一般的なExcel使いには理解されず、かといって言うほどExcelのワークシートの機能に詳しいわけでもない、 微妙な立場で辛い思いをしている人達だからね 234 名前：デフォルトの名無しさん mailto:sage [2022/01/01(土) 20:24:30.10 ID:DizA0src0.net] マクロは独特で勉強すればするほど面白いのにねえ まあワークシート関数はまた違った楽しさがありますな。 だいたいはどっちかに得意分野別れるみたいですね。 235 名前：デフォルトの名無しさん [2022/01/02(日) 00:02:48.18 ID:irXp1R560.net] >>233 お前みたいな頭の悪い奴には理解できないだけだぞ 236 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 00:19:50.24 ID:P5/NGbzA0.net] >>234 お客様？鏡はこちらでございます 237 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 02:38:22.72 ID:8OXF2lmH0.net] >>234 はいはい、正月だから酒浸りしてるのですね あまり人を見下した書き込みはやめた方がよろしいですよ。 238 名前：デフォルトの名無しさん [2022/01/02(日) 03:49:32.18 ID:irXp1R560.net] 悔しかったか？ 239 名前：デフォルトの名無しさん [2022/01/02(日) 03:53:45.10 ID:FrEqhrTc0.net] 正月の深夜から煽りとか、すげー人生やな・・・ 240 名前：デフォルトの名無しさん [2022/01/02(日) 03:57:56.02 ID:FrEqhrTc0.net] システム間でデータを受け渡す時の、相互変換用のファイルについて相談したいです 「入力」シートに貼り付け 「出力」シートをcsvで保存 csvをインポート という構成でよく作るんだけど、 オペレーターは削除や挿入をしてしまい、数式の参照がおかしくなる事がたまによくある ここに「tmp」シートを入れて、全てのセルにindirectをかますというのは良くないだろうか 241 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 06:49:15.75 ID:8OXF2lmH0.net] >>238 いやいや、５ちゃんは煽りあって喧嘩するのが常識と叩き込まれたから他スレで 242 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 08:00:02.64 ID:us56tuAr0.net] 宮D： 243 名前： 「日本には社会はなかったけど世間はあった」 「世間を意識することで、見ず知らずの他人も自分と同じように生活していると想像できた」 「ところが1960年代から始まる新住民問題で地域が崩壊、損得勘定で繋がった家庭も崩壊、今や会社も崩壊で、居場所も世間もなくなった」 [] [ここ壊れてます] 244 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 08:31:16.52 ID:i5Las0bb0.net] >>240 煽りや喧嘩はわかるけど>>234は煽りにすらなってない気が… 245 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 10:45:15.56 ID:xHoQz7cXd.net] >>239 良い悪いの話をするなら、そもそもCSVからCSVへの変換にいちいちExcel通すのが間違い 適当なスクリプト言語を使えばいいだけだし、どうしてもVBAならVBAだけでやっちゃって人間が介入する余地を無くせばよい 逆に人間が介入しやすいようにExcelにしてるんなら変なことしてわかりにくくするのは本末転倒 諦めて普通に素直に作るべき 246 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 10:56:54.18 ID:i5Las0bb0.net] >>239 オペレーターが何やってるのかわからんけどそれこそVBA使ってボタン１つで実行するようにできないのか？ 247 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 11:40:52.11 ID:P5/NGbzA0.net] >>239 して欲しい操作以外は出来ないようにすると良いです（入力の制約をしっかりする） 例えば入力に必要のないセルをすべてロックする、かつ入力を許容するセルには入力規則を適用する 他は入力フォームをモーダルで作ってそれ以外の入力は受け付けないとか 248 名前：デフォルトの名無しさん [2022/01/02(日) 12:15:24.12 ID:FrEqhrTc0.net] >>243-245 ありがとうございます ・経費精算システム→会計ソフトへのデータ移動 ・販売管理システム→会計ソフトへのデータ移動 を行っています 問題点は ・入力ミスが多すぎて目視確認が必要。会計ソフトで修正は手間＋見落としが多い ・経費精算システムは仮払設定ができない。 ・販売管理システムは、商品ごとに行が分かれるので恐ろしい量になる（間違いではないんだけど） ※経費システムは部門だけじゃなく、勘定科目も違う。ざっくり言うと仮払精算が出来ない このあたりをエクセルで置換＋チェックなどを行い、会計ソフトに取り込んでいる ソフトを変更するのはNGです 249 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 13:00:21.32 ID:P5/NGbzA0.net] >>246 経費精算、販売管理システムからデータを出力 →エクセルで入力データのチェック+仮払いのデータを追加 →csvで会計ソフトに渡すってことでいいのかな？ 経費精算、販売管理システムがファイルを吐いてくれるならそれを直接読む コピペしかできないならクリップボードのデータ(テキストデータと仮定して)を読み込んでワークシートに貼り付ける これらをVBAでやる（とにかくオペにいじらせない） エクセルをいじって貰うなら>>245のルールを守ったうえで入れて貰う そんくらいしか思いつかない 250 名前：デフォルトの名無しさん [2022/01/02(日) 13:30:03.08 ID:FrEqhrTc0.net] >>247 好き放題さわってもらう方が自由度が高くて良いと思ってたけど、そもそもそれがダメなのかな 難しいね ありがとう、制限かける方法で考えてみます 251 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 18:17:30.23 ID:RMMn37wZ0.net] 好き放題さわれるってことはつまり壊せるってことだ で、それのどこでＶＢＡが関係するんだ？ ちゃんとエラーチェックすればいいだけだと思うが 252 名前：デフォルトの名無しさん mailto:sage [2022/01/02(日) 21:53:37.95 ID:eY7Ft52F0.net] >>247 行の削除や挿入をvba側で拾って、cancelさせるか、数式等が壊れない様に処理すれば良いのではないでしょうか？ 253 名前：デフォルトの名無しさん mailto:sage [2022/01/03(月) 01:03:08.53 ID:DsJuTMFo0.net] プログラマだとその手のユーザーが自由に操作できる点を定義する事がエラーケースを抽出するためにはじめにやらなきゃ行けない事なんですよね。 中間システムをWEBシステムで作って数式を触らせないのがいいかと思う 254 名前：デフォルトの名無しさん mailto:sage [2022/01/03(月) 18:38:24.47 ID:l18z+rM90.net] つかうならクエリでしょ データの型もしっかり記述されるから生半可には壊れない へたにVB使うならクエリだけで済ますほうが100倍まし 255 名前：デフォルトの名無しさん mailto:sage [2022/01/03(月) 18:59:52.27 ID:+Dpm76/RM.net] >>252のクエリて具体的には何を指してる？ 256 名前：デフォルトの名無しさん mailto:sage [2022/01/03(月) 19:14:48.50 ID:0W6dPO/10.net] ガチガチに制限掛けるならExcelでやる意味が無い。 別に作った方が早いよ 257 名前：デフォルトの名無しさん mailto:sage [2022/01/04(火) 17:58:13.61 ID:mqLaSqQY0.net] [https://〜ナンチャラカンチャラ〜 連番」ってURLでDLできる.xlsファイルを 開始〜終了番号指定して一括DLするマクロ、ってググるレベルで作れるかな? 画像はよく聞くけど 258 名前：デフォルトの名無しさん [2022/01/04(火) 18:44:24.96 ID:OK++oBjt0.net] >>255 画像もエクセルファイルも一緒だよ ただダウンロードは若干クセがあってめんどくさい 数が少なければ A1=HYPERLINK("https://dotup.org/uploda/dotup.org"&2688739+ROW()&".jpg") 下にオートフィルして、クリックしていくってやり方が早い 259 名前：デフォルトの名無しさん mailto:sage [2022/01/04(火) 18:45:42.98 ID:fZv3oJzEa.net] 画像もテキストも同じファイルなんだぜ 260 名前：デフォルトの名無しさん [2022/01/04(火) 18:56:57.83 ID:OK++oBjt0.net] VBAのダウンロードって失敗しやすいんだよなーUAかなにかで弾かれてるのかね 今回はURLDownloadToFileの戻り値が変な値になって失敗している Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Private Declare PtrSafe Function DeleteUrlCacheEntry Lib "wininet" Alias "DeleteUrlCacheEntryA" (ByVal lpszUrlName As String) As Long Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Sub DownloadFile() '// URL設定 surl_1 = "https://dotup.org/uploda/dotup.org" surl_2 = ".jpg" sstart = "2688740" send = "2688742" sDir = "C:\Users\81909\Downloads\" '// ダウンロード For no = sstart To send sUrl = surl_1 & no & surl_2 '// キャッシュクリア Call DeleteUrlCacheEntry(sUrl) '// ダウンロード ret = URLDownloadToFile(0, sUrl, sDir, 0, 0) '// ダウンロード失敗時 If ret <> 0 Then Debug.Print a_sUrl & "：ダウンロード失敗" End If '// 1秒スリープ Call Sleep(1000) Next End Sub 261 名前：デフォルトの名無しさん mailto:sage [2022/01/04(火) 21:46:27.42 ID:IMaYzRnz0.net] すくなくともそのコードじゃ正しくURLを生成できてないと思うんだが 262 名前：デフォルトの名無しさん [2022/01/04(火) 21:48:53.92 ID:OK++oBjt0.net] 変なURLだけど、あってる 263 名前：デフォルトの名無しさん mailto:sage [2022/01/04(火) 22:43:25.62 ID:b8ABrTZwd.net] >>258 Debyg.Printのとこ変数名が間違ってない？ 264 名前：デフォルトの名無しさん [2022/01/04(火) 23:43:00.95 ID:OK++oBjt0.net] >>261 ホントだ でもそこじゃない。一行前のretのとこでまイナスが帰ってくる 265 名前：デフォルトの名無しさん mailto:sage [2022/01/05(水) 01:46:07.17 ID:oDwFVEwH0.net] 保存するファイル名まで指定する ret = URLDownloadToFile(0, surl, sDir & no & surl_2, 0, 0) 266 名前：デフォルトの名無しさん mailto:sage [2022/01/05(水) 06:38:46.88 ID:y8ka6aM8d.net] Sub DownloadFile() 　　'// 条件初期化 　　surl_1 = "https://dotup.org/uploda/dotup.org" 　　surl_2 = ".jpg" 　　sstart = "2688740" 　　send = "2688742" 　　sDir = "C:\Users\81909\Downloads\" 　　'// メインループ 　　For no = sstart To send 　　　　sUrl = surl_1 & no & surl_2　'// URL生成 　　　　Call DeleteUrlCacheEntry(sUrl)　'// キャッシュクリア 　　　　ret = URLDownloadToFile(0, sUrl, sDir & no & surl_2, 0, 0)　'// ダウンロード 　　　　Debug.? sUrl & "：ダウンロード"; 　　　　If ret = 0 Then　'// リターンコード判定 　　　　　　Debug.? "成功" 　　　　Else 　　　　　　Debug.? "失敗" 　　　　End If 　　　　Call Sleep(1000)　'// 1秒スリープ 　　Next End Sub 267 名前：255 mailto:sage [2022/01/05(水) 18:09:38.15 ID:VFU04QJY0.net] 258, 264さんのを参考にイジッたらできました！ ありがてぇ ありがてぇ… やれるもんですね 268 名前：デフォルトの名無しさん [2022/01/05(水) 18:29:34.28 ID:ak+ZFcPv0.net] >>263>>264 あ〜〜〜そこかぁ 指摘してくれてありがとうございました 269 名前：デフォルトの名無しさん mailto:sage [2022/01/05(水) 20:57:37.17 ID:gG/+AHf10.net] Windows 10 に、ダウンローダーのcurl が入った。 これは、PowerShell のcurl モドキとは違う コマンドプロンプトで、 where curl C:\Windows\System32\curl.exe curl --version curl 7.55.1 (Windows) libcurl/7.55.1 WinSSL 270 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 01:00:32.92 ID:/s4JxT0fM.net] https://forest.watch.impress.co.jp/docs/serial/yajiuma/1378774.html おまいらもなんか作れや 271 名前：デフォルトの名無しさん [2022/01/07(金) 01:06:18.78 ID:ju9GvXE10.net] >>268 昔ライフゲームや数独を解くソフトを作ったけど、 vbaでやる意味がないという結論に達したな あれ以来、エクセル関係ないものはほとんどvb.netを使ってる。 会社だとファイル操作もvbaを使うけど。 272 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 05:24:09.40 ID:wWvkPutSd.net] >>268 回転のアニメーションなしに色が変わるだけなのか もうちょっと凄い物を期待してた自分を責めたい まあ完成させたやつが一番偉いんで、文句言うならお前が作って見せてみろって話だな 273 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 07:12:56.65 ID:50haQjhj0.net] ルービックキューブか 昔I/oって雑誌に同じようなプログラム載ってたな その当時もルービックキューブ解くまでは載っていなかった 俺はジジイのSE兼PGだから ボケ防止にルービックキューブやってる。 F2Lとか覚えてないから最適解では無理かも知れないけど ただ解けるだけ、ってロジックだったらなんとかなるかも知れないな その前に表示ロジックを何とかしないとダメだろうけど。 274 名前：デフォルトの名無しさん [2022/01/07(金) 07:28:48.23 ID:Oy/+YEhFM.net] ボケ防止じゃなくハゲ防止には何がいいですか？ 275 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 08:26:31.04 ID:fls/ht/Kd.net] >>272 ハゲの90%は遺伝だから防止は困難 276 名前：デフォルトの名無しさん [2022/01/07(金) 08:50:30.17 ID:ju9GvXE10.net] >>270 同じ事を思っていた 277 名前：デフォルトの名無しさん [2022/01/07(金) 10:28:53.28 ID:45ZFzRQ9M.net] >>273 うるさいこのバカモンが 278 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 13:31:58.17 ID:nEFtmW5Dd.net] >>270 俺も思った 面倒だから作る気も起きないけど… 279 名前：デフォルトの名無しさん [2022/01/07(金) 14:44:09.64 ID:ju9GvXE10.net] >>272 ハゲ防止なんて100%不可能 みっともなく長髪にして隠したりするより、いっその事剃ってしまうぐらいの気概が必要 280 名前：デフォルトの名無しさん mailto:sage [2022/01/07(金) 17:26:57.35 ID:G8Exd8oP0.net] 変数名にNTRなんて使ってるのを見て吹いた 281 名前：デフォルトの名無しさん mailto:sage [2022/01/09(日) 04:59:41.15 ID:l1QF5IWO0.net] officetanaka.net/excel/function/tips/tips105.htm この回答を知恵遅れでしたのExcel板のバカどもかこの板のおまいらの誰かだろw 俺たちの回答が分からないのはアンタの勉強不足とかまさにw 282 名前：デフォルトの名無しさん mailto:sage [2022/01/09(日) 10:08:07.57 ID:AVz29wzk0.net] 過去に似たような経験あるの？ かわいそうにね 283 名前：デフォルトの名無しさん mailto:sage [2022/01/09(日) 16:28:30.35 ID:+qxN1lei0.net] >>279 敢えて反対させてもらうが 結果が合っていれば問題ない どんな素晴らしいコードでも検算は必要なんだから仕組みが理解できればどうでもいいよこんなの 特にVALUEを使わず1掛けるとかしたら可読性がなくなるだろうと VALUEが要らないならどうして関数として用意してあるのかと思うわ スマートなコードや保守性をとか考えるのは勝手だし他人も係るなら大切だがそれをチクチクつついて他人に押し付けるのは違うと思う まぁいつもお世話になってるサイトだが

---

---

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

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