返信先:@misosirudonついでにサイバー戦士うんこって505回出てくるVBAのコードあげる Sub SasenU() Dim U For U = 1 to 505 　MsgBox "サイバー戦士うんこ" Next MsgBox "ウンターネットはお前を見ている" End Sub

返信先:@misosirudonExcelのVBAエディタに以下のコードを記述して実行することで時間を潰そう🤩 Sub SasenU() MsgBox "サイバー戦士うんこ" End Sub

#ブラウザの自動操作 68 Selenium VBA で， Chromeの画面上にある 特定のラジオボタン要素が 選択済み(checked)かどうか 判定するには。 guru99.com/ja/checkbox-an… If 要素.IsSelected Then MsgBox "選択済みです。" Else MagBox "選択されていません。" End If

9:00:00や11:00:00などの表記で時刻になってしまう場合、11:00になるようにするなら、 Format関数を使い"hh:mm"とすれば良い。 一旦debug.printやmsgboxで表示を確認してセルに入力すれば、 入力した痕でどうしようなどにもならない。 #VBA

VBAにて　" (ダブルクォーテーション)を文字列として表示させるには """ とする意外に文字コードを使う方法もあります。 Chr(34) が、"(ダブルクォーテーション)となります。　 MsgBox String(4,Chr(34)) で "(ダブルクォーテーション)が4つ表示されます。 #Excel #VBA

VBA 「Option Explicit」は絶対に入れておこう。 一番の理由は、 hoge = ”ABC” Msgbox(hoga) のときにエラーを吐いてタイプミスに気づく。 #プログラミング初心者 #プログラミング初心者と繋がりたい pic.x.com/RJxRrk6Lwz

返信先:@megumi766288260VBA（Visual Basic for Applications）は、Excelのマクロ機能で、自動化に便利です。優しくステップバイステップで説明しますね。 1. VBAを始める: ExcelでAlt+F11押してエディタ開く。 2. 簡単例: モジュール挿入 → Sub Hello() MsgBox "こんにちは!" End Sub と入力。F5で実行。 3. クイズ用:

○ VBA select case ステートメントは複数の条件判定を同時に行う場合に使う 条件は大小の評価や開始値to終了値や論理和が設定可能 select case 対象 　case is <1 msgbox ”1未満” 　case 1 to 10 　 msgbox ”1～10” 　case 11,12 msgbox ”11か12” 　case else その他 end select

○ VBA 参照渡し:引数にbyref を記述する、あるいは省略も可 sub マクロ名1 () 　a= 10 call マクロ名2(a) end sub sub マクロ名2(byref b as long) 　b=b*2 msgbox a&b end sub 上記はメッセージボックスに2020と表示される

○ VBA 値渡し:引数にbyval を記述する sub マクロ名1 () 　a= 10 call マクロ名2(a) end sub sub マクロ名2(byval b as long) 　b=b*2 msgbox a&b end sub 上記はメッセージボックスに1020と表示される

○ VBA sub/functionどちらのプロシージャも引数に変数を定義し、その変数に呼び出し元のプロシージャで設定した引数を代入できる sub マクロ名1() 　a=100 call マクロ名2(a) end sub sub　マクロ名2(b as long) b=b*100 　msgbox b end sub 上記結果は10000がメッセージ出力される

#ブラウザの自動操作 68 Selenium VBA で， Chromeの画面上にある 特定のラジオボタン要素が 選択済み(checked)かどうか 判定するには。 guru99.com/ja/checkbox-an… If 要素.IsSelected Then MsgBox "選択済みです。" Else MagBox "選択されていません。" End If

通常のメッセージボックスに『？』 アイコンを表示する場合は MsgBox "kasumi" ,vbQuestion とカンマ区切りだが、vbYesNoと 組みあわせる時は If MsgBox ("uni",vbYesNo + vbQuestion) = vbYes Then 上記のように『＋』にする。 #VBA