[過去ﾛｸﾞ]
Excel VBA 質問スレ Part68 (1002ﾚｽ)
Excel VBA 質問スレ Part68 http://mevius.5ch.io/test/read.cgi/tech/1598756127/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
237: デフォルトの名無しさん (ﾜｯﾁｮｲ 668e-0TEw) [] 2020/09/14(月) 20:46:20 ID:LbAMjRkX0 +=使えるだろうが http://mevius.5ch.io/test/read.cgi/tech/1598756127/237
238: デフォルトの名無しさん (ﾜｯﾁｮｲ 0a4b-FgeY) [sage] 2020/09/14(月) 20:54:32 ID:P2Bbq2Qk0 使えません http://mevius.5ch.io/test/read.cgi/tech/1598756127/238
239: デフォルトの名無しさん (ﾜｯﾁｮｲ 668e-0TEw) [] 2020/09/14(月) 20:56:59 ID:LbAMjRkX0 あー、VB.Netスレだと思ってた。スマン、死んでくる。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/239
240: デフォルトの名無しさん (ﾜｯﾁｮｲ 0a4b-FgeY) [sage] 2020/09/14(月) 21:01:00 ID:P2Bbq2Qk0 逝かないで http://mevius.5ch.io/test/read.cgi/tech/1598756127/240
241: デフォルトの名無しさん (ｻｻｸｯﾃﾛﾚ Spbd-jNRp) [sage] 2020/09/14(月) 21:01:06 ID:K/D9SivKp 制御構造は、キーワードの選び方がやや独特だけど、基本的なものについては、概ね他の言語と同等のことはできると思う。 どちらかというと、変数の宣言・定義が一緒にできないとか、配列・コレクションの要素参照が角括弧でなく丸括弧だとか、プロシージャ呼び出しの丸括弧の要否とかの方が不便さを感じるかな。まぁ、これらも慣れと言われればそれまでだが。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/241
242: デフォルトの名無しさん (ﾜｯﾁｮｲ a95f-hUiG) [sage] 2020/09/14(月) 22:06:22 ID:9LhT2bwK0 gotoとラベルでできるっちゃあできるけどcontinueとbreakが欲しい http://mevius.5ch.io/test/read.cgi/tech/1598756127/242
243: デフォルトの名無しさん (ﾜｯﾁｮｲ 393d-jNRp) [sage] 2020/09/14(月) 22:20:37 ID:8aASiVNY0 breakは、一応Exit 〜が概ね対応しているのでは（While〜Wendでは使えないけど）？ 脱出するループを明示的に指定するので、breakより便利な場合もごくたまにある。もっとも、二重のForループから抜ける場合などは結局GoToに頼ることになるので中途半端ではあるけど。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/243
244: デフォルトの名無しさん (ﾜｯﾁｮｲ 397c-bL/7) [sage] 2020/09/14(月) 23:27:12 ID:EMg7ooaX0 俺もたまにラベルでcontinueするけどめちゃくちゃ見栄え悪くて嫌 http://mevius.5ch.io/test/read.cgi/tech/1598756127/244
245: デフォルトの名無しさん (ｽｯﾌﾟ Sd0a-4Ha4) [sage] 2020/09/15(火) 08:35:58 ID:Ny+/GOwEd >>232 >>233 基本、それは使わないな。 読みやすさとか構造の分かり易さ優先。 勿論、時と場合による。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/245
246: デフォルトの名無しさん (ﾜｯﾁｮｲ 11cc-QmsY) [sage] 2020/09/15(火) 09:16:48 ID:Ty4jOAMY0 ユーザーフォームの２つリストボックスで選択された値を変数に代入する方法を教えてください ■Module1 Public str As String ■ThisWorkbook Sub tes1() UserForm1.Show vbModeless Range("A1").Value = str End Sub Sub tes2() Range("A2").Value = str End Sub http://mevius.5ch.io/test/read.cgi/tech/1598756127/246
247: デフォルトの名無しさん (ﾜｯﾁｮｲ 11cc-QmsY) [sage] 2020/09/15(火) 09:17:03 ID:Ty4jOAMY0 ■UserForm1 Private Sub UserForm_Initialize() Dim r As Long For r = Year(Date) - 1 To Year(Date) + 2 UserForm1.ListBox1.AddItem r & "年" Next r For r = 1 To 12 UserForm1.ListBox2.AddItem r & "月" Next r UserForm1.Show vbModeless End Sub Private Sub OKbtn_Click() str = Replace(UserForm1.ListBox1.Text, "年", "") & "_" & Replace(UserForm1.ListBox2.Text, "月", "") Unload UserForm1 End Sub テストで変数strをＡ１・Ａ２に入れたいのですが、この方法だとどちらも入りません。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/247
248: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MM3e-FgeY) [sage] 2020/09/15(火) 09:33:07 ID:q5KWnXWXM ボタン押してstrに代入するところModule1.strじゃないとダメなんじゃないの http://mevius.5ch.io/test/read.cgi/tech/1598756127/248
249: 246 (ﾜｯﾁｮｲ 11cc-QmsY) [sage] 2020/09/15(火) 09:45:50 ID:Ty4jOAMY0 >>248 試しましたがだめでした 追記 ブックを開いたまま、tes1を２回目に実行するとA1には書き込みますが、 ブックを開いて、１回目のtes1実行ではA1には書き込まれないようです。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/249
250: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MM3e-FgeY) [sage] 2020/09/15(火) 09:57:04 ID:q5KWnXWXM モードレスだから ボタン押した時にUnload UserForm1する前にModule1.tes2を呼び出さないとだ Sub tes1() UserForm1.Show vbModeless End Sub Sub tes2() Range("A1").Value = str Range("A2").Value = str End Sub http://mevius.5ch.io/test/read.cgi/tech/1598756127/250
251: 246 (ﾜｯﾁｮｲ 11cc-QmsY) [sage] 2020/09/15(火) 11:27:58 ID:Ty4jOAMY0 >>250 ありがとうございました。解決しました http://mevius.5ch.io/test/read.cgi/tech/1598756127/251
252: デフォルトの名無しさん (ﾜｯﾁｮｲ 799c-m1Uj) [sage] 2020/09/15(火) 18:56:31 ID:Nzz3069/0 AccessVBAを使用しているのですが、標準モジュールを変数に格納する方法がわかりません。 フォームコントロールの様に変数に入れて扱う方法はありませんでしょうか。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/252
253: デフォルトの名無しさん (ﾜｯﾁｮｲ 6de5-Pwf7) [] 2020/09/15(火) 19:29:57 ID:pZ4d9dfu0 ありません http://mevius.5ch.io/test/read.cgi/tech/1598756127/253
254: デフォルトの名無しさん (ﾜｯﾁｮｲ 97da-GUw/) [] 2020/09/16(水) 00:02:05 ID:chmz5kZM0 Sub test() MsgBox Me.TextBox1.Value Me.Name="a" Me.Name="Sheet1" End Sub 1回目の実行 OK 2回目の実行 MsgBoxでエラー 3回目の実行 OK 4回目の実行 MsgBoxでエラー なんでやねん! http://mevius.5ch.io/test/read.cgi/tech/1598756127/254
255: デフォルトの名無しさん (ﾜｯﾁｮｲ b7da-Cup9) [sage] 2020/09/16(水) 01:13:07 ID:fUx+IXsk0 >>254 F8 でステップ実行してみ、あとエラーの内容くらい書いてもよくね？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/255
256: デフォルトの名無しさん (ﾜｯﾁｮｲ f79c-b3rt) [sage] 2020/09/16(水) 10:04:16 ID:HoY0/Pv80 >>253 ありがとうございます。 フォームを格納できるなら標準モジュールも出来るのかと思って質問しました。 標準モジュール内に書かれた関数の引数として参照先の標準モジュールを渡したかったのですが、別の方法を考えてみます。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/256
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 746 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.011s