Excel VBA 質問スレ Part68

2020/08/30(日) 11:55:27.33

!extend:checked:vvvvv:1000:512
↑同じ内容を2行貼り付ける

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

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

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

2020/12/03(木) 13:04:06.25

好きなようにしてここからも関わりのないどこか遠くへ行ってね。
ずーっと複数人がしてた忠告に耳もかさず我を通した結果であって
最後くらい責任持ってケツ捲くってね

2020/12/03(木) 13:04:24.24

バレたら損害賠償モノだと思うし容易にバレると思うけど

2020/12/03(木) 13:10:53.58

会社の時間を使って作った会社の資産であるのに個人のものと勘違いしてる馬鹿

**847** (ﾌﾞｰｲﾓ MMfd-gkou) · 2020/12/03(木) 13:54:32.21

家で作ったプロシージャをtxtでコピーして会社にメールで送ってハメてただけだから　
ほとんど個人の時間削ったものだけどね
ちょっとやってみるかなあ

2020/12/03(木) 18:28:51.55

application.ontimeメソッドを使ってるのですが、

For i = 0 To Counter
Application.ontime StartTime + Interval * i, "renzoku"
Next i

これを停止させるのが難しそうだったので、
停止はさせないで、エクセルを閉じれば停止すると思ったのですが、
他のエクセルを開いた状態で、これを閉じたら、
またマクロが動き続けてしまいます、
ontimeメソッドを停止させるか、
マクロの書いてあるエクセルを閉じたら、
ほかのエクセルが開いていてもマクロを停止するようにはできないでしょうか？

2020/12/03(木) 18:35:32.96

ワークブックのイベントで検索

2020/12/03(木) 19:23:44.42

>>866
タイマーで設定した内容をどこかに覚えておいて、また停止させるマクロを動かす
面倒だけど、それ以外に方法はない

2020/12/03(木) 19:41:46.88

CSVのデータを開いて
全部その中で計算させて結果だけをマクロブックに取り込んでCSVを閉じる
初心者ながら成功した…うれしいわ

2020/12/03(木) 21:55:24.24

｢慶應卒の学歴なんていらない｣10代起業で成功する子の共通点
https://www.excite.co.jp/news/article/President_35457/
【アプリ開発で起業】必要な心得とマネタイズ方法のすべて
https://www.dreamgate.gr.jp/contents/column/application-development
学生起業家が開発、「人を軸に本を探すアプリ」とは？読書通じて「考える力」養って
https://newswitch.jp/p/20168
島田商高生がアプリ考案、発表　ＩＣＴ起業家育成プログラム
https://www.at-s.com/news/article/local/central/730010.html
医師コンビが「治療用アプリ」で起業、禁煙に続き高血圧治療アプリを開発
https://diamond.jp/articles/-/229375
好きが高じて“カレー起業”、キャッシュレス決済アプリ「TOKYO MIX CURRY」の挑戦
https://diamond.jp/articles/-/215868
起業で成功するキャリア形成の仕方とは？元プロサッカー選手で起業家の鈴木啓祐氏に聞いた
https://sogyotecho.jp/career-development/
年収3,000万超え!?個人開発で儲かっている海外コミュニティサイト5選！
https://note.com/taishikato/n/n7809a8ed3ffc

2020/12/04(金) 00:52:07.07

ほとんどの解説サイトではcells("A1")と記載されてますが、cells (1,1)の方が分かりやすいし、vbaも組みやすいのに、なぜA1と言う記載なのでしょうか？
ここの人たちはどっちを使ってますか？

2020/12/04(金) 01:43:32.26

>>871
range(″A1″)ね
初心者向けにイメージ掴ませやすいような表記をしてるだけでは？
インクリメントとか考えるとcells使う方が確かに分かりやすいけどどういう訳か初心者はcellsを理解してくれない

2020/12/04(金) 01:44:00.17

>>861
何もしないで放置しておけばいいよ
周囲の仕様変更で使い道なくなるだろ
後腐れなく異動しようぜ

VBS使うとウィンドウ非表示で目的のファイルの削除、その後にVBSファイル自身を削除ってのが出来るけど
そんな時限爆弾がスタートアップフォルダに入ってたなんてー（驚愕）

2020/12/04(金) 01:44:10.31

range("A1") と cells(1, 1) なら変わらないけど、k列とか言われるとね
固定された位置なら前者じゃないかしら
式の解析をする分だけ前者が遅い気がするけど

2020/12/04(金) 01:45:24.52

変数をつかうなら、cellsでね

2020/12/04(金) 01:46:09.78

行や列と指定に変数をつかうなら、です

2020/12/04(金) 01:46:59.97

A1にoffsetもありか

2020/12/04(金) 02:20:30.55

>>872
あ、rangeでした
普段使わないから間違えた
たまにしか使わないからサイト検索しながら組んでるんてすけど、分かりにくいからやめてほしい…

2020/12/04(金) 02:33:53.57

>>878
いつものあいつ

2020/12/04(金) 06:54:12.47

rangeは範囲を選択するときは便利だけど1つのセルならcellsだね
まあ範囲も動的ならrangeの中にcells使うけど

2020/12/04(金) 06:57:58.98

rangeは名前付けてるセルを指定するときに使う

2020/12/04(金) 10:09:04.15

最初の頃はExcel上とかRangeだとA1(A列、1行)って列、行の順なのにCellsは行、列の順だから混乱した記憶がある

2020/12/04(金) 12:34:38.31

歴史的にはR1C1方式の方が先なんだけどな

2020/12/04(金) 14:03:07.99

>>830
入構2週間前からの体温を記録する資料の提出を入構2週間前切ってから要求された場合とかな
vbaじゃなくワークシート関数でできるけど

**デフォルトの名無しさん** (JP 0H5e-SdFS) · 2020/12/04(金) 14:09:34.65

ユーザーフォームで使用するSubやfunctionプロシージャって標準モジュールに書くのが一般的？
独学だからよく分かんないのよね

**デフォルトの名無しさん** (JP 0H5e-SdFS) · 2020/12/04(金) 14:11:25.58

↑ユーザーフォームで呼び出すの方が適切だったかな

2020/12/04(金) 15:05:45.91

個人的な好みだけどそのフォーム内でしか使わないならPrivate Subでサブルーチン作っちゃうかなぁ
クラスモジュールとフォームの両方から呼び出したいとかだと標準モジュールに書かざるを得ないけど
まぁそれにしてもプロシージャの頭にコメントで処理名、機能、引数、返り値、備考を書くようにはしてるからそこに何処から呼んでるかとかぐらいは書いておくけど

2020/12/04(金) 15:08:50.81

どうでもいいんじゃない？
モジュール化云々が問題になるような粒度の責務をVBAに負わせている時点でシステム全体の設計を疑ったほうがいい

**デフォルトの名無しさん** (JP 0H5e-SdFS) · 2020/12/04(金) 15:29:16.67

>>887
確かにワークブックイベントでユーザーフォームのpublic Subが呼び出せなかったからどこに書いたらいいのか迷ってしまったんだ
クラスの理解はなかなか難しい
参考になりました！

2020/12/04(金) 17:33:04.77

中学数学からはじめる微分積分
https://www.youtube.com/watch?v=4p1rwfXbCoY&;t=4341s
中学数学からはじめる相対性理論
https://www.youtube.com/watch?v=voFHToRM4xI&;t=10s
中学数学からはじめるAI(人工知能)のための数学入門
https://www.youtube.com/watch?v=7A05OamqCyc
中学数学からはじめる三角関数
https://www.youtube.com/watch?v=OLqgs4fJl7Y&;t=3803s

2020/12/04(金) 22:21:10.08

クラスで挫折したけどユーザー定義型で大満足です

2020/12/06(日) 04:50:03.54

汎用性が高そうなのは標準モジュールにするぐらいの適当さでいいよ
VBAのメリットは手軽に書けるとこだし

それより出来るだけメソッドで処理を区切るといいよ
メソッド名で何してる部分なのか分かりやすくなるし、
変数の使い回しが避けられたり、コピペしやすくなったりメリットが多い

2020/12/06(日) 10:12:36.99

必要なパラメータが少なければな
毎回フォームのValue読むとか最低だし

2020/12/06(日) 12:03:36.23

課題が集約されてるサイトとかありますか？
検索してもIf文を使ってなど基本問題しかなく、もっと実用的なツール作成などの課題が欲しいです

2020/12/06(日) 12:46:36.44

こんなツールが欲しいってのを作ればいいじゃん

2020/12/06(日) 17:40:13.12

>>894
課題が集約されたくなるBGM
https://www.nicovideo.jp/watch/sm35359889

2020/12/06(日) 22:20:11.18

もう課題じゃなく必要なものを作ればいいんじゃね
必要なものがないなら何で勉強してんだよ

2020/12/07(月) 03:29:03.52

欲しいのは課題じゃなくて解答だろう

2020/12/07(月) 16:02:20.71

ここに見つけた課題の質問はするなよ

2020/12/07(月) 16:07:44.46

VBAなんて解説サイト沢山あるんだから、
その場その場で分からない所をググればいいんじゃないの

カンニングokの試験のために勉強するようなもん
時間の無駄

2020/12/07(月) 21:46:54.62

ここで質問する人の検索能力

2020/12/07(月) 22:20:43.96

能力以前に検索する気が

2020/12/07(月) 22:30:31.51

検索語の先頭にはvbaを書くのが基本

2020/12/07(月) 22:57:19.40

検索するより聞いた方が早いとか思ってる初心者

2020/12/08(火) 00:07:01.16

>>894ですがレスくれた方どうもです
作りたいもの作れってのはその通りなんですけど特になくて...
依頼されて作るのは楽しくて会社でもツール作成をやらせてもらってるんですが、家でも勉強がてら何か作りたくてレスした次第です
作りたいもの考えることにします

2020/12/08(火) 00:16:40.59

無いよそんなの

2020/12/08(火) 01:50:26.85

いつもののあいつだぞ

2020/12/08(火) 02:39:59.03

まわりが振り回されるだけ

2020/12/08(火) 06:50:25.81

作りたいもの無いなら筋トレでもしてた方がマシやろ

2020/12/08(火) 20:06:03.71

ピボットフィールド名に変数を使うとエラーになりました。
変数は使えないのでしょうか？何か方法あれば教えてください。

.Sheets("X").PivotTables("Y").PivotFields（変数）

2020/12/08(火) 20:15:21.56

またおm

2020/12/08(火) 20:25:01.68

職場が古臭い超巨大組織で、EXCELしか使えないからVBA
勉強してるんだけど、柔軟というか互換性重視しすぎというか
何でも許しすぎというか（暗黙のなんちゃらが多い）、てんこ
盛りすぎて使いにくいなこれ…

継承無いのも地味に痛い。普段めったに使わないけど、「ここは
インヘリタンスとポリモーフィズムっしょ」ってところで使えない。

2020/12/08(火) 20:34:22.37

>>912
そのまま上司に言えばいいんじゃね

2020/12/08(火) 20:56:41.26

自己解決しました
お騒がせしました

2020/12/08(火) 21:38:29.64

クラスじゃダメなんですか？

2020/12/08(火) 21:50:04.46

>>913
EXCELで絵が描けるってだけで驚く職場ですわ。

「python とかC#　か、せめてJAVAを…」って言ったら

py　の時点で「はあ？」になって、「上司の自尊心を傷つけた
角」で有罪ｗ

2020/12/08(火) 22:09:36.03

何か覚えたら人に知ったかぶりたくなる小学生じゃないんだからさ…

2020/12/08(火) 22:26:44.03

こんなのが職場にいたらちょっと困ります

2020/12/09(水) 01:31:58.28

すげぇ早口でオタギレしてそう

2020/12/09(水) 01:41:07.54

VBAがなくなると脅されています
その時にはVBSもなくなりますか？

2020/12/09(水) 02:14:11.71

無くならなくないよ！目を覚ませ！！！

2020/12/09(水) 02:18:54.70

>>920
ソース出せよ、あとどこからいつなくなるのかによる

2020/12/09(水) 02:53:27.53

https://www.bulldog.co.jp/common/upload/product/20170124163441_1485243281733.jpg

2020/12/09(水) 08:12:10.11

西日本では中濃は殆ど見かけない

2020/12/09(水) 09:50:23.00

https://www.otafuku.co.jp/image/product/325.jpg

2020/12/09(水) 09:53:21.34

目玉焼きには中濃ソース派

2020/12/09(水) 13:03:56.69

>>916
典型的な無知無能の知ったかオタク馬鹿

**デフォルトの名無しさん** (JP 0H9f-WYZ/) · 2020/12/09(水) 17:45:40.43

クラスを変数の格納で試しに使ってみたけど、値渡しのときに複数のsheetやRangeを一つのobjectとして送れるのが便利だった
それがいいのか悪いのかもすら分からんけど
あと宣言を減らせるのもいいな

2020/12/09(水) 19:30:15.22

>>928
それって単なるTypeで定義するのとなんか違うの？

2020/12/09(水) 21:52:52.42

>>912
PowerShellはダメなのか？
Windowsに最初から入ってるし継承使えるけど

2020/12/10(木) 01:02:36.47

互換性というより下手な拡張のせいだと思うが
a&b&c と書けないのがムカつく

2020/12/10(木) 01:11:19.37

すでに引いてある枠線をすべてオートシェイプに置き換えることはできますか？
一括で変換できれば楽なんですが

そのようなことをしたい理由はExcelは先の太さのバリエーションがないのでオートシェイプで任意の太さの線にしたいからです

2020/12/10(木) 01:16:47.80

俺はしたいと思わないな

2020/12/10(木) 01:50:46.90

いつものあいつだろ

2020/12/10(木) 02:22:09.00

>>932
君ならできるだろ

2020/12/10(木) 03:30:03.52

ヤればできる！
避妊は忘れずに！

2020/12/10(木) 08:21:16.51

何かもうここ機能していないですね
荒らししかいない感じだ

2020/12/10(木) 10:17:08.09

なら、お前が質問しろよ！

2020/12/10(木) 10:17:31.42

なら、お前が質問しろよ！

**デフォルトの名無しさん** (ｽﾌｯ Sdff-kNbH) · 2020/12/10(木) 10:44:14.39

>>932
できる

**デフォルトの名無しさん** (JP 0H4f-WYZ/) · 2020/12/10(木) 17:55:13.02

>>929
読み取り専用にしたいとか変数格納時にチェックしたいとかかなあ
typeもろくに使ってないから難しい質問

2020/12/10(木) 18:15:54.30

>>941
まあそう言う要件あるならそりゃクラスにするしか無いわな

2020/12/10(木) 20:13:35.89

>>932
一回しか行わないわけだし手でやるのが普通ですよ
それにセルのサイズ変えたらズレるし
全部のセルの罫線みるのにどんだけ掛かるかw

2020/12/10(木) 20:47:29.63

どんだけ掛かるんだ？

2020/12/10(木) 21:11:52.00

Ｃ列になし、0、文字列があって、
条件分岐で
C列が文字列であれば転記する文字列をそれに変更。転機列のD列には転記しない
Ｃ列がなしであれば同じ行のＤ列を見に行ってブランクであれば文字列を転記、文字が既にあれば転記しない
Ｃ列が0であれば次の文字列まで移動

上記のようなのは関数だと不可能だと思うので、マクロでどのように作ればいいでしょうか

2020/12/10(木) 21:12:58.79

その通り作ればいいですよ

2020/12/10(木) 21:21:26.02

>>945
>Ｃ列がなしであれば同じ行のＤ列を見に行ってブランクであれば文字列を転記、文字が既にあれば転記しない
この意味が分からんのだけど誰か翻訳頼む。

2020/12/10(木) 21:43:23.69

ある程度自分で考えてそれでもわからない部分を聞くとかならともかく、丸投げ質問はスルーでおk

2020/12/10(木) 21:46:13.21

>>947
自分はむしろ
「C列が文字列であれば転記する文字列をそれに変更」
の方が分からん

2020/12/10(木) 21:49:42.57

この手のタイプは自分の見てるものが他人には見えてないってことがいつも抜け落ちてる

2020/12/10(木) 21:55:21.01

仮に転記文字列がEなら

Cが0(数値)
　次のCまで移動
Cがなし
　D列がブランクならEからDに転記
Cが文字列
　EをCの文字列に変更、Dはそのまま
じゃないの？

でもなしとブランクが分かれてるのが謎

2020/12/10(木) 22:36:37.55

すいませんちょっと言葉が足りませんでした。
なしは単なる文字列のなしです
IFでなしという文字列があれば、現在設定している文字列をD列に書き出していく処理になります
Ｃ列　　　Ｄ列
りんご　
なし
0
0
みかん
なし
↓
Ｃ D
りんご　　(ブランク)
なしりんご
0 (ブランク)
0 (ブランク)
みかん (ブランク)
なしみかん

上記のような処理を作りたいです。

2020/12/10(木) 22:48:25.04

どうぞ作ってください。

2020/12/10(木) 22:56:25.81

条件分岐の所だけでもこういう感じで作ればいいというような回答を頂ければ助かります
かなり丸投げな質問になってすいません

2020/12/10(木) 22:57:22.97

四角投げくらいかな？

2020/12/10(木) 22:59:02.40

ちょっとみただけだけど関数でも頑張れば
作れそうに見えるがどうだろうか

2020/12/10(木) 23:05:18.21

回答しても助けになりそうも無い

2020/12/10(木) 23:06:01.55

別に頑張らなくても関数で出来た
頭硬すぎだろう

2020/12/10(木) 23:24:54.94

なしって入ったときに出てくるのがなしの1個上のセルの内容と決まってるなら関数でも書けるね

2020/12/10(木) 23:35:14.23

このなぞなぞを思い出した
http://nazo2.myaasensei.com/?eid=90

なしなら「梨」と表記するか
別の果物、ぶどうとかすればいいのに
紛らわしい

2020/12/10(木) 23:53:09.24

>>952
その条件通りにそのまま書き起こせば実現できることじゃないのか、複雑な処理がいるわけでもなし