Excel VBA

書式

Select Case 値{ Case 数値1 To 数値2 xxxCase Else  値がどのCaseの値にも一致しない場合に実行コードEnd Select

値がCaseの値と一致すれば、一致したCaseの処理のみ ...

Excel VBA

書式
Case Is 比較演算子
Isと比較演算子で比較しています。
Case文の後ろにIsを利用して、比較演算子で比較を行います。

使用例

Sub testFunc() Dim score ...

Excel VBA

書式

Select Case 変数名{  Case 値1    処理コード1 xxx  Case Else   Caseの値に一致しない処理コードEnd Select

値がCaseの値と一致すれば、一致したCaseの処理のみ ...

Excel VBA

関数
WorksheetFunction.RoundDown(引数1、引数2)
引数1 切り下げる対象の数値を指定します
引数2 切り下げた結果の桁数を指定します
RoundDown は、 数値を 常に ...

Excel VBA

関数
WorksheetFunction.Round(引数1、 引数2)
引数1 四捨五入する対象の数値を指定します
引数2 四捨五入した結果の桁数を指定します
数値num_digits 0 (ゼロ) ...

Excel VBA

書式
WorksheetFunction.RoundUp(引数1、引数2)
引数1 数値: 切り上げの対象となる実数値を指定します。
引数2 桁数: 数値を切り上げた結果の桁数を指定します。
Round ...

Excel VBA

環境
Windows 10 64bit
Excel 2013
ディレクトリ:C:\test10
ファイル名:Book1.xlsx result.txt
セルのA1に「住所」、B4に「川崎」があり ...

Excel VBA

環境
Windows 10 64bit
Excel 2013
シート名 arkgame
一つ目吹き出し:Shapes(1)

使用例

Sub funA() Dim target As S ...

Excel VBA

環境
Windows 10 64bit
Excel 2013
書式
シート名 = ActiveSheet.Name
すべてのシート数 Worksheets.Count

使用例 ...

Excel VBA

環境
Windows 10 64bit
Excel 2013

使用例
MsgBox の引数
vbAbortRetryIgnore
、、 の各ボタン
vbOKCancel ...

Excel VBA

環境
Windows 10 64bit
Excel 2013
シート名 arkgame
吹き出し:Shapes(1)

使用例

Sub FunA() 'シート名arkgame Sheet ...