Excel VBA 質問スレ Part79(ﾜｯﾁｮｲあり)

■ このスレッドは過去ログ倉庫に格納されています
1デフォルトの名無しさん (ﾜｯﾁｮｲ aaa4-I2zm)
垢版 |
2023/01/28(土) 12:12:12.41ID:UjlIZ1Ov0
!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑同じ内容を3行貼り付けること

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

次スレは>>980が立てること
無理なら細かく安価指定

※前スレ
Excel VBA 質問スレ Part77
https://mevius.2ch.net/test/read.cgi/tech/1658009255/
Excel VBA 質問スレ Part78
https://mevius.2ch.net/test/read.cgi/tech/1667104996/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured
2023/03/06(月) 03:53:47.03ID:GSPsPwm3M
クラスの配列なら横への広がりのイメージだな
クラスの深さなら継承の概念が必要
本格的なオブジェクト指向言語なら普通に使われるけどなんちゃってオブジェクト指向のVBAでは記述できない
169デフォルトの名無しさん (ﾜｯﾁｮｲ 7b19-kCZp)
垢版 |
2023/03/06(月) 07:22:39.83ID:AsR8H3/e0
クラス使うと一挙に視野が広がるよ
ついでを言うと配列の代わりに
コレクションやディクショナリを
使うことも視野に入れるといいと思うよ
2023/03/06(月) 12:27:06.93ID:b2hOsO6/0
VBAもオブジェクト指向できるんか
2023/03/06(月) 12:41:06.98ID:xFg+nzlgM
プロパティ、メソッドなどの概念はオブジェクト指向からの由来
ただし本格的なクラスベースでもプロトタイプベースでもない独自体系の(中途半端な)オブジェクト指向
172デフォルトの名無しさん (ｱｳｱｳｴｰ Sae3-4fLd)
垢版 |
2023/03/06(月) 13:36:46.14ID:diWxUEyJa
あえて言えば
フォーム指向だな
2023/03/06(月) 14:45:16.86ID:9+J+ARGqM
敢えて言うならフォーム指向というよりコンポーネント指向
excel(Application)、book、worksheetなどすべてのオブジェクトはCOMコンポーネント
フォームもCOMコンポーネントの中のひとつ
2023/03/06(月) 14:57:08.93ID:qrIfb0I6M
>>170
C言語だってできるわ
データ(構造体)とそれを操作する関数を作っていくだけだ
2023/03/06(月) 15:12:57.72ID:ai8Q1Y+e0
>>167
たとえばエクセルブックは複数のワークシートをもってるが、それを配列で管理したりしてないだろ
まあ、VBAはコレクション系が弱いので配列で実装することもままあるがな

>>174
ここで言うオブジェクト指向できるかどうかってのは、
言語側にそのサポート機能がどのくらいあるかって話なんだと思わないかね？

太古のBASICはもとより、VisualBasicも出始めはオブジェクト指向を意識したものではなかったからな
互換性を残しつつオブジェクト指向を取り入れたのでかなり中途半端な出来なのはまあしょうがない
2023/03/06(月) 15:22:06.82ID:g0HnCWe20
リストやマップだって内部では配列使ってるでしょ
2023/03/06(月) 16:30:36.14ID:diWxUEyJa
VBAは糞だから廃止しても良いけど
代替がC#じゃなくてPythonになりかけたのは笑う
2023/03/06(月) 18:31:47.09ID:1WgjQ7Bk0
そういえば結局MSはVBAを完全に廃止はしないんだっけ？？
2023/03/06(月) 18:36:58.90ID:dmixHrui0
廃止はされないだろうけど棲み分けされる方向性にある

Office スクリプトと VBA マクロの違い
https://learn.microsoft.com/ja-jp/office/dev/scripts/resources/vba-differences
180デフォルトの名無しさん (ﾜｯﾁｮｲ 7b19-kCZp)
垢版 |
2023/03/06(月) 18:42:11.32ID:AsR8H3/e0
VBAのクラスは中途半端と言えばまぁそうだけど
VB.Net、おいてはC#とかをやる際の
練習には・・・いや、ちょっと厳しいか

でもObject指向言語いきなり入ると
継承ばっかに目が行って
移譲が疎かになったりするから
まぁいいんじゃないかな
2023/03/06(月) 21:16:37.56ID:1WgjQ7Bk0
やっぱ昔ながらのVBAがいちばんしっくりくるわ。
2023/03/07(火) 21:48:06.79ID:3iqfWDhi0
やっぱ昔ながらのBBAがいちばんしっくりくるよね
2023/03/07(火) 23:24:56.52ID:Rx98WF270
いや、BBAは55までが限界だわ。
2023/03/09(木) 18:56:56.85ID:P+HJFtzc0
ところでBBAの手前の年齢なら何て呼ぶ？
2023/03/10(金) 03:06:29.10ID:iWPdLzMM0
>>184
おばさま
2023/03/10(金) 12:22:39.19ID:bedhQt/D0
ちなみにお前らは おじさんやおっさん って呼ばれてもおかしくない年齢だよな？
2023/03/10(金) 13:34:04.07ID:p0hGObdpM
ExcelとVBAを使って商品の在庫管理をしようと考えています。
1つの商品の販売数は概ね1〜10程度に収まっていますが、たまにそれを超える数が出る事があります。
入力を簡単にするため10個以下のときはドロップダウンリストから選択し、それ以上の時は直接入力で
対応しようと思ったのですが、コンボボックスでは直接入力した値を取得できません。

直接入力とドロップダウンの両方で値を取得出来る方法はありませんか?
2023/03/10(金) 16:23:53.92ID:fVzcNxhh0
フォームコントロールのコンボボックスだとプロパティに無いから出来ない
もし、セルの[データの入力規則]でもいいなら、エラーメッセージタブの □ 無効なデータが入力・・・
のチェックを外せば、リスト外の文字列(数値含む)も入れられる
2023/03/10(金) 16:24:00.66ID:vz26ACYYd
そんなもん使い難いだけだわ
UIを良く考えよう
2023/03/10(金) 16:26:19.41ID:uJ3azY/w0
正直１桁ならコンボボックスより直接入力のほうが効率いいと思うが
2023/03/10(金) 16:56:09.67ID:fVzcNxhh0
日付も商品もマウスで選択するようなUIなら理解できる
マウスから手を放したくない　みたいな
2023/03/10(金) 17:10:02.40ID:Q4TOUEdVM
>>187
自分なら基本テキストボックスで直接入力
ただマウスで操作したい要望に対してはボックス横にスピンボタンを追加することで対処する
初期値を1、増減分も1にしておけば1桁程度の値ならコンボボックスと大して変わらないと思う
2023/03/10(金) 19:08:43.64ID:q/TVliTR0
回答：無理、諦めろ。で満場一致
2023/03/10(金) 20:38:33.64ID:iWPdLzMM0
回答2:何でそんな事やりたいのだろう…
2023/03/10(金) 23:47:02.61ID:Qa3px4vn0
今時PCが殆ど使えない、新しい事覚えようとしないオバさんに使わせるのでなるべくキーボード入力をしないよう、パッと見で簡単に見えるように作りたいのです。
本来ならこのオバさんクビにして新しい子雇うのが早いと思うのですが…
ありがとうございました。もう一度UI考え直してみます。
2023/03/11(土) 00:19:36.43ID:Khcebysn0
数字くらい入力できるだろう
197デフォルトの名無しさん (ｽｯﾌﾟ Sd7a-P/R7)
垢版 |
2023/03/11(土) 00:27:12.35ID:dLGlL2PJd
質問者も頭が悪い
わからない人になぜ標準と異なるインターフェースを使わせようとするのか
こういう人が現場に混乱をもたらす
2023/03/11(土) 02:08:47.98ID:WLmR0Ocq0
わざわざ個数をドロップダウンリストから選ぶとか面倒くさすぎるだろ
規則入力で制限して直接入力させろよ
2023/03/11(土) 04:45:31.59ID:ZWvVNp1O0
回答3:何でそんな事やらしてるのだろうか、
2023/03/11(土) 12:35:58.60ID:QVD3K1L30
いや、昨今のWebアプリ(というかWeb入力)画面は、そういうの多く成ってるぞ
和暦、年、月、日、数量なんかもそのたんびドロップダウンしてスクロールしてクリック
一月一日生まれならスクロール不要だけど、十二月三十一日生まれだと毎回面倒臭い　とか
おぢさんおばさんのUIと「新しい人」向けのUIも変わって来るんだろう、たぶん
社会に出た時にそういうUIが当たり前　なんてぇ連中にとっては「何で？」の疑問符も湧かないんだろ
タッチパネルUIがメインに成ってくと、やむを得ないとかなのか知らんけど(工夫が足りないだけ？)
2023/03/11(土) 13:08:52.71ID:M3BsWLaP0
左にラジオボタン用意して
●10以下 [ ドロップダウンで数を選択 ]
○直接入力 [ テキストボックス直接入力 ]
みたいにしたらどうかな。
直接入力したければできるようにどれが最適かわからなければ手段を複数開放しとけば許されるかも
2023/03/11(土) 13:20:16.65ID:QVD3K1L30
そういう小手先のお節介機能が、後々鬱陶しくなって属人化と揶揄されて忌避されてく元
シンプルイズベストに徹してみるのも、使い続けるためには必要　なのかも
2023/03/11(土) 14:59:28.59ID:ifuXB3L30
UIだけじゃなくて入力デバイスのことも考える必要があるって話だな

ところで入力させるのはどこなんだよ？
シートなら>>188で解決だから、シートに入力させればいいんじゃねえか
2023/03/11(土) 15:12:26.79ID:ifuXB3L30
>>187-188
ちょっと気になって試したが

Private Sub UserForm_Initialize()
Dim i
For i = 0 To 10
ComboBox1.AddItem (i)
Next
End Sub
Private Sub CommandButton1_Click()
MsgBox ComboBox1.Value
End Sub

普通にできるじゃねえかよ
2023/03/11(土) 20:57:24.16ID:ZWvVNp1O0
あらまw
なんだったんだここ2～3日のやりとりはw
2023/03/12(日) 11:03:12.50ID:cLh0uqXM0
初心者がよく確認しないで先走っただけのこと
207デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MMee-Cjjx)
垢版 |
2023/03/14(火) 22:17:45.06ID:XoNyGxquM
ttps://my.au.com/cmn/WCV009001/WCE009001.hc
のようなサイトにおいて、ボタンのid属性などが不明の場合、
どのようにすれば
objIE.document.getElementById(“nav-search-submit-text”).Click
のようにクリック処理が記述できるのでしょうか？
2023/03/15(水) 00:41:25.72ID:1KS7hC690
他のgetElementなんちゃらを使えばいいんでねーの？
2023/03/15(水) 01:44:42.30ID:gRjLR93x0
>>207
まずhtmlソース全部見る
タグとかクラス名とかinnerHTMLとか、そこを一意に識別する方法を考える
210デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MMee-Cjjx)
垢版 |
2023/03/15(水) 19:59:06.05ID:kKwjf9a5M
>>208,209
ありがとうございます。
2023/03/22(水) 19:26:33.26ID:K2J+yUPS0
VBAをやらざるを得なくなってしまい、半月ほど初心者向けサイトをざっと見したんだけど、復習しながら練習するのにいいサイトとかないですかね？？YouTubeとかでもいいです。
212デフォルトの名無しさん (ｱｳｱｳｳｰ Sa95-XfdO)
垢版 |
2023/03/22(水) 20:16:54.25ID:imBU3GyRa
教えてもらうくせに上から目線でサイト探しているの？
2023/03/22(水) 20:27:03.12ID:dusedFZ60
え？どこが上から目線？
全然普通の態度だと思うが。
2023/03/22(水) 20:35:07.68ID:7ng/morp0
できないと言う勇気
2023/03/22(水) 21:02:59.43ID:jPt3JN/N0
VBA やりたい事でググれば大抵出てくるOffice田中のサイトでいいんじゃないの
2023/03/22(水) 21:57:37.59ID:PR1CLsM8r
俺も別段上から目線だとは思わんな
vba100本ノックでググればいいよ
2023/03/22(水) 23:19:15.71ID:K2J+yUPS0
>>215
>>216
ありがとうございます。
218デフォルトの名無しさん (ｱｳｱｳｳｰ Sa95-XfdO)
垢版 |
2023/03/22(水) 23:32:19.46ID:7f9FP/voa
半年探していいサイトが無かったように聞こえたな
219デフォルトの名無しさん (ｱｳｱｳｳｰ Sa95-XfdO)
垢版 |
2023/03/22(水) 23:32:43.87ID:7f9FP/voa
半月だ
2023/03/23(木) 00:54:29.33ID:RkaYGDJV0
ここ最近は神髄というサイトが人気あるらしいね。
例の老舗さんはネタ切れ感あるとか？？
2023/03/23(木) 03:04:12.23ID:0YnebeJA0
いいサイトが見つからないから勉強ができないって言い訳はするなよ
2023/03/23(木) 08:19:59.99ID:rqWr880TM
いうほどいいサイトってなくね？
コード書く練習したいなら100本ノックくらいしか思いつかんわ。
サラッと目通しただけじゃ難易度高いだろうが
223デフォルトの名無しさん (ﾜｯﾁｮｲ 89f9-lgPN)
垢版 |
2023/03/23(木) 09:53:16.93ID:B+OiUivh0
その都度ググればよくね？
俺はそうしてる
2023/03/23(木) 11:11:45.25ID:8DIiCOGWM
ChatGPTに聞きまくり+ネットのコピペまくりでごまかしてるわ
コメントつけて何とか弄れるようにはしてあるけど
無駄だったり重複する処理を消したりはしない、というか下手に出来ない
225デフォルトの名無しさん (ｽﾌﾟｯｯ Sd73-LK7t)
垢版 |
2023/03/23(木) 12:55:45.78ID:c5DGLB5Nd
>>224
こんなのが作ったVBAを使わされる方がかわいそう
2023/03/23(木) 13:23:54.81ID:0YnebeJA0
不具合が起きてもコピペだから原因がわからず自分が作ってないから直せませんとか言うのが見えてる
2023/03/23(木) 16:13:34.30ID:RkaYGDJV0
今注目してるのはOffice 春だな。
なかなか痒いところに手が届く技を紹介してくれている。
2023/03/23(木) 18:42:46.38ID:0YnebeJA0
興味を持つのは自由だが専用スレでやれよ
2023/03/25(土) 17:09:50.33ID:zf3m1D9l0
恐ろしいぐらいめんどくさかったけど複雑な処理をするマクロが完成して改善の部門賞で去年3万貰えたけどそれを超えるマクロが完成しそう
こりゃ社長賞狙えるかな
230デフォルトの名無しさん (ｽﾌﾟｯｯ Sd62-sLGM)
垢版 |
2023/03/25(土) 17:16:33.67ID:JIVU3ZWvd
典型的な頭の弱い社畜の書き込み
井の中の蛙
2023/03/25(土) 17:20:16.80ID:zf3m1D9l0
だよな、ここの人らって本当に井の中の蛙だわ
異動してpythonに移行する前に作り上げて10万かっさらうわ
232デフォルトの名無しさん (ﾜｯﾁｮｲ 8619-+msU)
垢版 |
2023/03/25(土) 20:39:39.60ID:1snJqDno0
まぁEXCEL VBAはEXCEL扱うのはめっぽう強いし
ちょこっとした処理を作るのに長けているから
プログラマ主体でなくて業務側についてる人でも多く使っているからね。

他の言語使っててもUTとかの際に
エビデンス取るとき整合確認とかで
EXCELの数式やVBA知ってると
かなり時間短縮出来たりするし。
2023/03/26(日) 02:18:50.58ID:Vzczu/7L0
ちょっとした処理に適しているのがExcelマクロだい。
2023/03/26(日) 21:50:17.38ID:XuHk6gkC0
VBAはネットに転がってるのがいいよね
2023/03/26(日) 22:54:45.65ID:Vzczu/7L0
VBA基地外が転がってる
2023/04/01(土) 10:04:12.82ID:UPkZGiTza
ＶＢＡでゼビウス作りたいです
2023/04/01(土) 10:41:21.61ID:Fre5vyIa0
まず許可とらないと
2023/04/01(土) 19:42:02.16ID:Fre5vyIa0
https://xtech.nikkei.com/it/pc/article/NPC/20080321/296775/
もう15年も前の記事だが
2023/04/04(火) 05:43:03.68ID:gM2C6lf70
Excelの罫線が太すぎるので
ある範囲の入力済セルの下に
例えば0.5ptのオートシェイプを引きたいです
どのようにしたらできますか？
2023/04/04(火) 11:13:58.48ID:H3UIOgUM0
入力済セルの下にオートシェイプの線を貼り付ける
線の書式の幅を 0.5pt にする
2023/04/04(火) 16:48:55.55ID:gM2C6lf70
>>240
VBAで自動でやりたいです
2023/04/04(火) 17:42:01.18ID:7A3Dl4jZd
ほんとにオートシェイプでやるの？
あら手の嫌がらせかな
2023/04/04(火) 19:06:27.39ID:gM2C6lf70
>>242
どうしても細い線が引きたいけどないのでそうするしかないんです
2023/04/04(火) 19:29:11.09ID:S7HWOC1cd
>>243
ダイアログの「なし」の下の破線が一番細い実線だよ
0.5ptって訳じゃないけどこれで代用はできない？
https://i.imgur.com/FI2RhpR.png
2023/04/04(火) 19:40:07.41ID:CrO9FoIt0
やりたければやればいい
何がわからないのかわからない

丸投げしたいなら初めからそう言っとけ
2023/04/04(火) 19:57:30.78ID:renXLxQ5r
流石に何も調べず「こうしたいんです」って言われてもね
調べた上で質問しろよ流石に
2023/04/04(火) 19:57:38.37ID:gM2C6lf70
>>244
プリンタの問題なのかその破線だと印刷されません
ブラザーのモノクロレーザーなんですが
色々と調べたところインクジェットだと滲むから印字されるけどレーザーだと細すぎて印刷できないみたいです
2023/04/04(火) 20:11:18.91ID:5YvJO7dSd
>>247
レーザーでも印刷はできる
プリント解像度が合ってないから変えて試せ
要件としてはプリンターで細い罫線を出力したいが正しいのに、
情報小出しにするのはなぜ？
249デフォルトの名無しさん (ｽﾌﾟｯｯ Sd1f-j25d)
垢版 |
2023/04/04(火) 20:27:01.14ID:6BEiQs1Sd
馬鹿は馬鹿な頭で馬鹿な方法を考えついて馬鹿な質問をする法則
例の零細企業の馬鹿でわかったはずだろ？
2023/04/04(火) 21:06:09.03ID:gM2C6lf70
>>248
考えた結果、オートシェイプで線を引くしかない、となったのでそれのやり方を聞きました
ブラザーのサポートにも問い合わせたけどそういうものみたいです
2023/04/04(火) 22:10:24.26ID:gM2C6lf70
ちなみに点線は印刷業界でいうヘアラインというやつでプリンタの一番細い線を出すという命令なので
いいプリンタほどほぼ印字されないそうです
なので設定は無関係です
300dpiにすれば印字されますが文字が汚いです

印刷のアドバイスを聞きたいわけでも情報を後出ししているわけでもなく、
オートシェイプで線を引くコードが知りたかっただけです
2023/04/04(火) 22:16:45.73ID:KVvIoDM70
絶対に自分で調べたほうが早いし楽だし拡張性あるのに、頑なに人に聞くやつっているよな
ggrks
2023/04/04(火) 22:33:10.85ID:zXZGFdaS0
Sub Macro1()
Dim rr As Range
Set rr = Selection
rr.Parent.Shapes.AddLine(rr.Left, rr.Top + rr.Height, rr.Left + rr.Width, rr.Top + rr.Height).Select
With Selection.ShapeRange.Line
.Weight = 1
.ForeColor.RGB = RGB(0, 0, 0) '255,255,153 薄いイエロー 204,255,255 薄いブルー
End With
rr.Select
End Sub

Sub Macro2()
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlHairline 'xlThin
.ColorIndex = xlAutomatic
End With
End Sub
Macro1が直線を引く場合　Macro2が罫線を引く場合　Weight = 1を0.5にしても変わらない　xlHairline細線xlThin極細
直線を引くと消す作業が必要に成る
2023/04/04(火) 22:57:58.66ID:H3UIOgUM0
下線を付ける場合って普通はアンダーライン機能使うし、空欄の下線なら＿＿＿　（シフト+「ろ」）
~~~~~~~~~~ (半角波線) ^^^^^^ (ハット)　で上行の強調みたいな書き方したり
─────　(罫線文字）　━━━━━　(罫線文字太い)　　でたいていは済むと思うが
2023/04/04(火) 23:21:59.65ID:gM2C6lf70
下線というのはセル毎の仕切り線という意味でした
わかりにくくてすみません
256デフォルトの名無しさん (ﾜﾝﾄﾝｷﾝ MMdf-QXPF)
垢版 |
2023/04/04(火) 23:30:14.47ID:khpg5U9yM
>>249
馬鹿は馬鹿な質間の後に後出し条件を付けるも追加で
2023/04/05(水) 00:53:07.23ID:ab4hIo8m0
>>256
別に全然後出しとは思ってないけどね
細い線が出したいです、ではなくて
自動でオートシェイプで線を書く方法を教えてください、なんだから
2023/04/05(水) 00:54:17.99ID:ab4hIo8m0
ろくなやついないみたいだからよそいくね
259デフォルトの名無しさん (ﾜﾝﾐﾝｸﾞｸ MM03-5SDg)
垢版 |
2023/04/05(水) 01:00:51.04ID:XcJibMPkM
何が問題なのかわからない馬鹿ばっかのところが見つかるといいね
2023/04/05(水) 01:20:39.85ID:Yfsd/RuOd
知恵遅れ袋があるじゃないか
2023/04/05(水) 07:58:24.80ID:nt1BQkgU0
>>257
それは自分が思う解決方法であって目的は細い線を印刷することだろ
2023/04/05(水) 08:35:05.20ID:xBlgsSX7d
罫線文化は日本特有だからそろそろ辞めよう
2023/04/05(水) 11:17:22.11ID:hwWjK5am0
そういい続けてもう何年になるだろうか
2023/04/05(水) 11:34:30.61ID:Pachb7xx0
>>258
オイオイw　提示したコード試したンか？w　オートシェイプの線と罫線と両方をサンプルして
尚且つ、線種や色を改良しやすいように例示もしたってのに　
出力できる太さに限界があるなら色を変えることで改善させるのもひとつの解決策だろうに
265デフォルトの名無しさん (ｽﾌﾟｯｯ Sd9f-j25d)
垢版 |
2023/04/05(水) 14:48:49.66ID:RBswHKfYd
>>264
そういうまともな発想が通じない自分の馬鹿な解決方法とやらに拘るのが馬鹿の馬鹿たる所以だ、残念なことに
2023/04/05(水) 19:37:02.68ID:/dmeuB+9M
どこが日本特有だよ
タイやら中国やらアメリカやらからデータ来るけど罫線なんて普通に使いまくりだぞ
文化じゃねーよ無職知ったかかよ
2023/04/09(日) 10:12:35.57ID:RxxIHycr0
さて、そろそろ書けますか？
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。