Excel VBA 質問スレ Part66

**1000** · 2020/05/10(日) 13:43:45.00

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

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

※デフォルト設定

**デフォルトの名無しさん** · 2020/05/12(火) 07:39:51.79

>>31
だからどこがブレてんだよwww
さっさと指摘しろな。

最初から場合によると言ってるがw
お前はIf文やSelect文を使えないのか?

**デフォルトの名無しさん** · 2020/05/12(火) 07:42:40.74

>>32
www
お前の考えだと頭が固くなるという話をしたのにw

そんな頭の固い話じゃ会話にならねえと言ってる。

あいかわらず日本語が未熟だなw

**デフォルトの名無しさん** · 2020/05/12(火) 07:45:00.31

>>33
全てに対応したやり取りなんて出来ないし、誰もやってないと言ってるんだ。
お前も出来ていない。

まともな奴ならそういう前提で会話してる。

**デフォルトの名無しさん** · 2020/05/12(火) 07:47:08.17

>>33
ところで、「・瞬時に5個思い付く(ﾄﾞﾔｱ)」が間違ってたことについては無視か?
触れて欲しくない?

そういうわけにはいかんぞ。
散々迷惑かけてるんだからな。

**デフォルトの名無しさん** · 2020/05/12(火) 07:50:53.21

>>33
これだけはその通りで草

**デフォルトの名無しさん** · 2020/05/12(火) 08:13:35.16

>>34
VBA10年おじさん大発狂の4連投してて草
高血圧だな、体は大事にしろよw

＞だからどこがブレてんだよwww
自分が日本語分かってねえじゃねえかw
「場合による」は後だしだぞww何通りかは思い付くの時点で名言してるか？ww

＞お前の考えだと頭が固くなるという話をしたのにw
お前のは表現のゆらぎじゃなくて、明確にずれてんだよw
ほら、1個か3個か？臆病者めwww

＞全てに対応したやり取りなんて出来ないし、誰もやってないと言ってるんだ。
10年おじさんなら最適解出せるだろ？w
「瞬時に思い付きます。でもそれは1通りでもあるし複数通りでもあるし、思い付かないかもしれません。私は10年以上のベテラン(笑)だけど雑魚ですすいません」って告白してもいいぞw

＞ところで、「・瞬時に5個思い付く(ﾄﾞﾔｱ)」が間違ってたことについては無視か?
最初から何個か名言しない臆病者のせいで仮に特定してあげてるだけだよww
お前のせいじゃんwww
5個のところ好きな数字にしろよww

数字特定したら次はほんとに「瞬時に思い付くか」テストしたげてもいいなw
てか>>28にも答えてないしなw
10年以上やってるのにww

**デフォルトの名無しさん** · 2020/05/12(火) 12:29:54.81

>>39
間違いを認めるか、間違って無い根拠を示せ。
逃げようとしてるのミエミエだぞw

↑もうこれを示さない限り先には進まん。

**デフォルトの名無しさん** · 2020/05/12(火) 13:47:56.69

>>40
言い返せないことを認めた負け宣言あざっすww
>>28もわかんないんだもんなw
よっわ、こりゃVBA10年おじさんだわww

**デフォルトの名無しさん** · 2020/05/12(火) 13:53:42.12

これに懲りたらてきとーなこと言ったり「10年以上前だけど(ﾄﾞﾔｱ)」とか言うの控えとけよww
こうやって恥かくからなww
あ、でもまた数年後思い出して修正するんでしたっけww
こいつのプロダクトとかアウトプットは信用できないなww

**デフォルトの名無しさん** · 2020/05/12(火) 16:56:54.34

その熱量を分けてくれ

**デフォルトの名無しさん** · 2020/05/12(火) 17:47:19.57

ここで教わった「空白になるまで」とか
「空白じゃなければ」
って言うのが自分の職場で凄い役に立って多用してますわ
ケースによるんだろうけどこれが当たり前なのかあまり使わない方がいいのはわからない
Sub　空白まで処理　()
　Dim gy As Long
　Do while cells(gy, 5) <> ""
　何かの処理
　gy = gy + 1
　loop
End Sub

Sub 作成者を入力させる　()
　Dim Ib As String
　Ib = Inputbox ("フルネームで入力して下さい","作成者","")
　If Ib <>"" Then
　Range("A4").value = Ib
　Else
　Msgbox ("後で入力して下さい",vbokonly,"作成者欄")
　End If
End Sub

ここら辺とか職場で多用してたら俺です。
あと色々覚えて作ってて思うのが絶望的に変数の名付け方にセンスが無い…
データ型は深く覚えなくてもいいってサイトで見たけどVbMsgBoxResultとか前スレで教えたくた人のおかげで役立ってるし多分覚えた方がいいデータ型も結構あるんだろうなぁと

　

**デフォルトの名無しさん** · 2020/05/12(火) 18:29:41.52

if文ってスゲー便利！って言ってるのと変わらんぞ
条件ループなんてプログラミング言語として最低限の必須機能

**デフォルトの名無しさん** · 2020/05/12(火) 18:56:23.44

>>45
変わらんぞというかまさにそこに感動してるレベルの入門者ですよ
ただ毎日コードを何かしら書かないとすぐ忘れ書き方のルールを忘れちゃいますわ

ある程度多用する基本的なコードは自分でテンプレ作ってそこから引用してるから
必要なコードは必要な時だけそこから引っ張れば良いという人ももいたけどやっぱこのマクロ作ろうと思ってカタカタと悩まずに打って作れるようになりたいですね

**デフォルトの名無しさん** · 2020/05/12(火) 19:58:51.70

>>44
繰り返しの内側やIF文の内側ではインデント(字下げ)すると読みやすくなる
あと個人的には変数宣言(Dim)の下に空行入れてる

**デフォルトの名無しさん** · 2020/05/12(火) 20:04:14.59

システムにお願いしても駄目ならプロセスのプライオリティを
思い切り上げて他のプロセスをできるだけ起動させないとか。

**デフォルトの名無しさん** · 2020/05/12(火) 20:42:29.83

>>44
書けないとか忘れるなんて言ってるけどただのネタだろ？

普通にコピペしたら Msgbox とはならない
自動的に MsgBox に修正されるからな

**デフォルトの名無しさん** · 2020/05/12(火) 20:49:40.88

>>49
いや、ここでのレスは手打ちだよ
そのぐらい練習癖つけないと忘れちゃう
とにかく体に無意識に覚えさせたい

**デフォルトの名無しさん** · 2020/05/12(火) 20:54:41.98

は？手打ちならVBEに入力しなきゃ意味ないだろう
それとも常時Excelに触ることができない環境でイメージトレーニングでもしているの？
それならキーボードじゃなくて手書きをお勧めするよ

**デフォルトの名無しさん** · 2020/05/12(火) 20:57:51.11

自治厨うざっ

**デフォルトの名無しさん** · 2020/05/12(火) 21:00:50.06

いやVBE触りながらスマホで2ちゃんもやってるんよ
家帰ってダラダラしたいのに勉強しなきゃという強迫観念すらあるんですわ
そのぐらい使いこなせるようになりたひ

**デフォルトの名無しさん** · 2020/05/12(火) 21:01:39.78

>>41
逃げるのかねwww
間違いを認めるか、間違って無い根拠を示せ。

**デフォルトの名無しさん** · 2020/05/12(火) 21:03:00.03

へー、スマホで打ち込んだのか
スゲーな
尊敬するわ

**デフォルトの名無しさん** · 2020/05/12(火) 23:00:42.24

プログラミングはif文に始まりif文に終わる

**デフォルトの名無しさん** · 2020/05/12(火) 23:09:10.91

endifで終わるとか言ってみる

**デフォルトの名無しさん** · 2020/05/12(火) 23:41:32.90

スマホは本当に入力がむずかしい
iphoneだけど、@ とか？とか；とか、
半角と全角を見分ける方法ないですかね

**デフォルトの名無しさん** · 2020/05/12(火) 23:46:48.30

>>58
馬鹿は消えろ
死ね

**デフォルトの名無しさん** · 2020/05/13(水) 00:01:32.19

>>58
表示フォント変えられないのか？

**デフォルトの名無しさん** · 2020/05/13(水) 08:48:22.54

>>41
なんだ、敗走か?
言い返せなくなると敗走?

「・瞬時に5個思い付く(ﾄﾞﾔｱ)」が間違ってたことに反論出来なくて敗走?

**デフォルトの名無しさん** · 2020/05/13(水) 14:24:20.48

>>58
俺より馬鹿じゃないから気にしなくて良いよ！

**デフォルトの名無しさん** · 2020/05/13(水) 16:28:05.50

VBA7以前でPtrSafe付コードを修正する際にコンパイルエラーを避けるには、該当箇所を一つずつコメントアウトしないといけないのでしょうか

**デフォルトの名無しさん** · 2020/05/13(水) 19:05:47.04

'変数cに列番号が記録されており、その右隣の列から右に向かって最終列（変数LastCol）までに一つ目の文字列"型式"がある１つ手前の列番号を変数ccに記録したいのですが、これであってますか？
　

cc = Range( c : LastCol ).Find("型式").Columns - 1

64 · 2020/05/13(水) 19:07:10.17

↑１行目だけでする場合をお願いします

**デフォルトの名無しさん** · 2020/05/13(水) 19:55:58.54

検索条件が甘いのと見つかんないとエラーが出るのが問題だけど
cc = Range(Columns(c + 1), Columns(LastCol)).Find("型式").Column - 1

**デフォルトの名無しさん** · 2020/05/13(水) 19:57:35.91

有ってない

64 · 2020/05/13(水) 20:29:22.37

>>66
ありがとうございますm(__)m

**デフォルトの名無しさん** · 2020/05/14(木) 10:15:33.79

>>41
結局、勝ち負けだけで論理的に正しい間違いはどうでも良い奴だったな。
こういう奴は確かに拘ることをしないからいつまでたっても初心者を脱っすることが出来ない。

実際には言い負かされてるんだが言い負かされなかった形だけあれば満足すると。

こういう糞がどこで自尊心を保っているのか全く理解出来んw

**デフォルトの名無しさん** · 2020/05/14(木) 10:46:53.77

基地外同士のケンカがやっと終わったか
最初に引いた奴の方が偉いな

はい次の方

**デフォルトの名無しさん** · 2020/05/14(木) 14:49:40.82

>>70
悔しいのか?

**デフォルトの名無しさん** · 2020/05/14(木) 15:41:22.22

>>71
くやしいです！！
https://stat.ameba.jp/user_images/20170614/14/go-go-yukarin/d2/54/j/o0925096013960484198.jpg

**デフォルトの名無しさん** · 2020/05/14(木) 19:23:42.76

ネットで拾ったコードをつぎはぎ足してoffice2010のExcelで使ってたけど
今年会社がやっと2019に上げるらしい
使えなくなるコードがあったら終わるわ

**デフォルトの名無しさん** · 2020/05/14(木) 20:29:36.41

32bit→64bitならエラーが出るかもだが、それ以外は特に変更はないはず

**デフォルトの名無しさん** · 2020/05/14(木) 21:48:19.93

クラス化して再利用考えて作ってたのですが、getter経由で取得したデータを処理したり、ボタン関係の養生したり、フォームに描画反映したりでユーザーフォームにコードが集中してしまいました
構造が悪いのでしょうか

ユーザーフォーム
-ボタンイベントコールバッククラス
-シートのデータ書き換えクラス
-割込タイマークラス
-シリアル機器インターフェースクラス
--各機器のラッパークラス
---COMポートクラス

**デフォルトの名無しさん** · 2020/05/14(木) 21:52:56.60

>>75
何でクラス化したのにフォームに集中するの?
寧ろクラスに分割されるんじゃなくて?

**デフォルトの名無しさん** · 2020/05/14(木) 22:15:42.82

>>75
単純にGetter以外のメソッドを実装すればいいのでは？

**デフォルトの名無しさん** · 2020/05/14(木) 22:42:08.69

>>73
MDIとSDIの違いに気をつけて

**デフォルトの名無しさん** · 2020/05/14(木) 23:22:45.71

ユーザーフォームは俺のようなVBA超初心者にとって憧れだわ
ある程度マクロ作ったら

とりあえずThisWorkbookのとこで
Private sub Workbook_Open()
UserForm1. Show
End Sub
を作って
ユーザーフォームのShowModalをFalseにする
↓
で使えるのはコマンドボタンという…
ボタンクリックに標準モジュールで作ったプロシージャ名を貼り付けると…

毎回これじゃそりゃ上達しないわ
もっとコード覚えて効率的な高見を目指したいところだけど脳がついていかない

**デフォルトの名無しさん** · 2020/05/14(木) 23:30:25.59

>>79
それで十分

**デフォルトの名無しさん** · 2020/05/14(木) 23:40:56.55

>>80
いや、流石にこれじゃいかんわ情けないと自覚

標準モジュールにあるプロシージャが自作のコードならまだしもマクロの記録を無駄な動きだけ消して貼り付けたりネットのをパクって少しいじったりするだけ

ユーザーフォームもコマンドボタン以外に使い方わからず使ってないし
CSVやtxtを読み込んだりとかそういう特殊な事書ける人は凄いわ
若い頃から情報システムとかそういう勉強すればよかったわ

英語　資格　PCスキルの時代は変わらんね

**デフォルトの名無しさん** · 2020/05/14(木) 23:50:14.00

>>76>>77
ポーリングしてる機器Aの状態に応じて機器B、Cに異なるコマンドを送ってデータを取得する様な処理が何通りか合って多くなってます。インターフェースクラスとの間に処理クラスみたいなのを入れるのでしょうか

**デフォルトの名無しさん** · 2020/05/15(金) 00:17:59.54

>>82
データの取得をクエリサービスクラスに分離してください
フォームクラスはフォーム自身の管理とサービスの呼び出しだけを行うものです

**デフォルトの名無しさん** · 2020/05/15(金) 00:41:48.57

>>81
今はボタン使うマクロしか作る予定がないだけだと思うが。
csvを使うマクロが必要になった時に調べるだろうし、
今は知らないからって自虐的になる必要ないんでは？

>>82
一般的にオブジェクト指向は「最終的にやらせたいこと（＝やれること）」をメソッドとしてクラスに定義にして、
そのための条件や必要なデータなどはクラス自体が判断したり取得したりするか、引数として与える
もし、Getter等でデータをメインルーチンに集めて統合的に処理するなら従来の手続き型になる

今回の例で言えば、
機器BCからから受け取ったデータを処理するPublicメソッドを定義したクラスを作って
機器Aに応じて機器BCにコマンドを送ったりっていった処理は、そのクラス内でやるのがいいかも

**デフォルトの名無しさん** · 2020/05/15(金) 01:33:02.14

ExcelフォームにExcelグリッドコントロールがあればむてきだたかもしれない

**デフォルトの名無しさん** · 2020/05/15(金) 01:38:53.47

割り込みとかコールバックとかわからないシロートの発想で笑える

**デフォルトの名無しさん** · 2020/05/15(金) 01:42:44.01

>>84
CSVを扱う必要性がじりじり迫ってるんだけどネットにあるコードの窃盗常習犯で覚える脳みそがないからノースキル野郎　
当然モチベもないから全然進んでない

①ダイアログで任意のCSVデータを選択して
それを今開いているシートに読み込まれる(CSVデータは読み込んだ後に自動で閉じる)
(元々シートにグラフがあるがそれはそのまま)

②このシートをブック内の一番右にシートをコピー

多分②はどこかで拾えそうだけど①のプロシージャがありそうでなかなかネットから盗めず激ムズ　
ここの勉強できる人達は勝ち組だよ

**デフォルトの名無しさん** · 2020/05/15(金) 02:20:59.50

勝ち組かどうかは別問題だな

**デフォルトの名無しさん** · 2020/05/15(金) 09:02:28.91

非表示のシートがいくつかある状態で、一番右端のシートをアクティブにしたいのですが、worksheets.countで取得しようとすると、非表示のシートが選択されてしまいます
表示されているシートの一番右端をアクティブにするにはどうすればいいですか？

**デフォルトの名無しさん** · 2020/05/15(金) 09:32:08.17

質問がおかしかったので書き直します

マクロブックでなくアドインでやっています
一番右端のシートから値を取ってきて、その後に作成する新規のシートに貼り付けたいです
Sheets(WorkSheets.Count).Activateで、表示上の一番右端のシートをアクティブにすることはできるのですが、操作ができません
非表示のシートがいくつかあり、シート番号は若くてもそちらがWorkSheets.Countで選ばれているようで、値はそこから取ってきてしまっているみたいです
エクセルの表示上のシートの並びで、一番右端を選択してそこから値を取りたいのですが、どうすればいいでしょうか？

**デフォルトの名無しさん** · 2020/05/15(金) 09:38:25.85

For i = Worksheets.Count To 1 Step - 1

If Worksheets(i).Visible Then
Worksheets(i).Activate
Exit For
End If

Next

**デフォルトの名無しさん** · 2020/05/15(金) 12:19:24.18

>>91
あー、なるほど
カウントを減らしていって最初にヒットしたVisibleでループを抜ければいいんですね
助かりました、ありがとうございます

**デフォルトの名無しさん** · 2020/05/15(金) 12:51:25.51

シート1にラベルやタイトルや色を設定した
雛型になるグラフがあって
それをアクティブなシートにコピーして貼り付けられる事コード、もし出来れば教えて下さい。

今はシート1に戻ってグラフをコピーして
貼りたいシートに戻って貼り付け
をやってます
数値は反映させなくて雛形になるグラフをとにかくすぐにアクティブなシートに持ってきたいです

マクロの記録でもやり方わからずです…

シート1にある("グラフ1")というのを
アクティブなシートに貼り付け、わかりませぬ

**デフォルトの名無しさん** · 2020/05/15(金) 13:03:29.53

Ruby なんか、こういう感じで、CSV ファイルを1行ずつ処理していくだけ。
GUI で処理すると、Rubyよりも何倍も難しい

require 'csv'

file_path = ARGV[ 0 ]

# 引数には、ファイルパスを渡す。input.csv
# CSV ファイルを、1行ずつ処理する
CSV.foreach( file_path ) do |row|
puts "#{ row[ "col_1" ] } : #{ row[ "col_2" ] }" # 列1・列2
end

**デフォルトの名無しさん** · 2020/05/15(金) 17:00:34.32

シート1にあるグラフ1をアクティブシートにコピペ

調べてみたところ結局俺がやりたいのはシンプルにこれか
マクロの記録だと限界あるわ。

**デフォルトの名無しさん** · 2020/05/15(金) 19:22:44.18

Sub 数値反転()
Dim ms As VbMsgBoxResult
Dim gg As Long
ms = MsgBox("マイナス値？", vbYesNo, "B列C列を確認")
If ms = vbYes Then
gg = 113
Do While Cells(gg, 2) <> ""
Cells(gg, 17) = Cells(gg, 2) * -1
Cells(gg, 18) = Cells(gg, 3) * -1
gg = gg + 1
Else
Do While Cells(gg, 2) <> ""
Cells(gg, 17) = Cells(gg, 2)
Cells(gg, 18) = Cells(gg, 3)
gg = gg + 1
Loop
End If
End Sub

ドヤ顔でいけるだろと思ったらnoを選択するとElseの次のDo whileのところでエラーになりますけどどう手直ししたらいいですか

**デフォルトの名無しさん** · 2020/05/15(金) 19:26:11.81

>>96
vbNoのとき、ggはいくつ？

**デフォルトの名無しさん** · 2020/05/15(金) 19:30:22.00

>>97
レスした後にvbnoの時のgg入れ忘れてたと思ってElseの後に
gg=113を入れたけどやっぱりエラーになりました
根本的にルールが間違ってます？

**デフォルトの名無しさん** · 2020/05/15(金) 19:39:43.78

1つめの Do while に対応する Loop がない

**デフォルトの名無しさん** · 2020/05/15(金) 19:49:26.82

>>99
ほんと恥ずかしすぎるミスでした。
ありがとうございます。　
間違っといてなんだけど自分の考え方が間違ってない事もわかってホッとしました。
何言ってんだこいつと思われて当然ですがそんな気持ちです

**デフォルトの名無しさん** · 2020/05/15(金) 20:01:55.19

>>100
そもそもそれ以前に馬鹿過ぎて話にならない

**デフォルトの名無しさん** · 2020/05/15(金) 20:42:05.52

インデントで分かったりしないもんかね

**デフォルトの名無しさん** · 2020/05/15(金) 20:58:58.45

VSのエディタなら勝手にやってくれるけどExcelVBEはそこまで親切じゃないから、
　・Doと書いたら、中間の処理書く前にLoopをセットで先に書く。
　・中間の処理はインデント付ける
こうしないと長い処理だとミスる。

**デフォルトの名無しさん** · 2020/05/15(金) 21:24:59.09

田中先生ユーチューバーになってたんか。
エクセル系ユーチューバーは前からいるけど
彼らのチャンネル登録者数どんどん抜いてくな。
マクロ以外にもエクセルの機能全般もアップしてるし
他のエクセルユーチューバ―はもう躍進することはないな。
ご愁傷さま。

**デフォルトの名無しさん** · 2020/05/15(金) 21:26:28.78

インデントしてるとVBEが勝手に空行にもインデント用スペースいれやがる

**デフォルトの名無しさん** · 2020/05/15(金) 22:51:12.17

マクロの処理だけmsオーダーで止めて、シートでの作業には影響させない方法ってありますか？
sleepやapplication.waitを使うと、止めている間はマウスポインタが待機中に切り替わって気が散ります。

**デフォルトの名無しさん** · 2020/05/15(金) 23:02:13.60

意味が解らん

**デフォルトの名無しさん** · 2020/05/15(金) 23:07:56.71

DoEvents を定期的に入れてあげて妥協するのがいいのでは

**デフォルトの名無しさん** · 2020/05/16(土) 00:10:47.87

気が散るほうが悪い

**デフォルトの名無しさん** · 2020/05/16(土) 00:24:20.49

waitが長いと入力作業とかできんだろうな
マルチスレッドできたっけ？

**デフォルトの名無しさん** · 2020/05/16(土) 00:27:49.65

>msオーダー
ジェイッ、ジェイッ、ジェイッ、ジェイッwwww

>>107
俺もわからん。
どういう意味だろう。

**デフォルトの名無しさん** · 2020/05/16(土) 00:41:23.65

馬鹿は全角英文字、自分勝手な略語を使う法則

**デフォルトの名無しさん** · 2020/05/16(土) 02:12:04.53

非表示にすれば気にならないとか？

**デフォルトの名無しさん** · 2020/05/16(土) 02:34:42.15

msオーダーって何？

**デフォルトの名無しさん** · 2020/05/16(土) 05:07:24.47

マイクロ秒で処理するってことかな？

**デフォルトの名無しさん** · 2020/05/16(土) 08:49:36.47

あーミリ秒指定でマクロを止めたいってことか？
それでもまだわからん

**デフォルトの名無しさん** · 2020/05/16(土) 09:59:53.95

せめてmsecオーダーと書けばわかりやすいのに
しかも100ミリとかじゃないか？数ミリは気づかないはず
GetInputStateとDoEventsでどうにかできんか

**デフォルトの名無しさん** · 2020/05/17(日) 13:30:28.43

>>110
マルチプロセスならできそうな気がしない？
知らんけど

**デフォルトの名無しさん** · 2020/05/17(日) 13:48:57.86

[現象]
excelの vbaエディタで、フォントの設定が出来なくなった。
ツール－オプション－エディタの設定を選択すると、excelが強制終了してしまう。

[環境]
windows10 pro
office personal 2019

[発生時の操作]
エディタの設定を、MSpゴシックから、 Ricty Diminished（Ricty Diminished Discordだったかも）
に変更した直後から発生するようになった。

http://blog.higty.xyz/post/vbe-setting-error/
https://www.moug.net/tech/exvba/0150130.html
ここを見ましたが、レジストリキー：HKEY_CURRENT_USER\Software\Microsoft\VBA\7.1\Common が存在しません。

よろしくお願いします

**デフォルトの名無しさん** · 2020/05/17(日) 14:05:50.89

>>119
死ね

**デフォルトの名無しさん** · 2020/05/17(日) 14:06:13.48

>>119
ワークシートのページレイアウトからテーマは変更できる？

**デフォルトの名無しさん** · 2020/05/17(日) 14:11:19.59

>>120
この馬鹿モンが

**デフォルトの名無しさん** · 2020/05/17(日) 14:12:58.27

>>121
はいできますがそれでは解決しないのです

**デフォルトの名無しさん** · 2020/05/17(日) 14:21:32.25

>>123
まずレジストリのVBA\7.1\Commonが存在しないことが異常だから、Excelを再インストールするのが一番の早道な気がする

**sage** · 2020/05/17(日) 14:31:40.69

>>121
123 は私の書き込みではないのですが、レイアウトを変更して何かファイルを保存すれば
レジストリキーが作成されるということかと思い試しましたが、作成されませんでした
>>124
やはりそれしかないですかね。

**sage** · 2020/05/17(日) 14:34:16.22

>>125
×レイアウトを変更して
○テーマを変更して

**デフォルトの名無しさん** · 2020/05/17(日) 15:10:42.19

>>104
萩原をおぎわらって読んだりIndirectをインディレクトって言ってたから
そっ閉じしたわ。

**デフォルトの名無しさん** · 2020/05/17(日) 16:08:33.48

インストロールと言ったら怒られたナリみたいなもんか。

**デフォルトの名無しさん** · 2020/05/17(日) 16:57:48.19

奇天烈大百科が巻物だったら、まさしくインストロールだぞ

**デフォルトの名無しさん** · 2020/05/17(日) 17:38:29.95

奇天烈大百科が巻物だったら、まさしくインストロールだぞ
↓
If the eccentric encyclopedia is a scroll, it's just an installation.
↓
風変わりな百科事典が巻物なら、それは単なるインスタレーションです。

意味がさっぱり分からなかったので、Google翻訳かけてみたら、意味が分かるようになったぞ。

**デフォルトの名無しさん** · 2020/05/17(日) 18:09:25.04

英語の方が簡単なんだよ
早くそれに気づけ

**デフォルトの名無しさん** · 2020/05/17(日) 21:52:01.62

textboxの値チェックがうまく行きません。20~100までの範囲を入れたいのでchangeイベントで値がこの範囲か監視してます。
100を超えていたら100に、20を下回ると20になる様にリミッタを付けました。
すると100にした後にキーボード操作で30にしようとすると、0を消した時点で強制的に20になり、そこから何か押すと100になってしまいます。
どうすれば上手くいくのでしょうか。

**デフォルトの名無しさん** · 2020/05/17(日) 22:01:56.66

>>132
そういう時はスピンボタンを使った方がいいよ