Excel ： 小ネタ集 プログラム

わずか一行ですが、覚えるほどでもないですが、知らないと苦労するTips集です。




Homeに戻る > 小ネタ集に戻る
  • 宣言しない、変数を使用できないようにする - Option Explicit
  • 警告音を鳴らす - Beep
  • 配列の次元の下限値を取得 - Range("L8") = LBound(ary)
  • 配列の次元の上限値を取得 - Range("L8") = UBound(ary)
  • 配列を初期化する - Erase ary
  • 動的配列を消去する - Erase ary
  • 変数が配列かどうか調べる - Range("L8") = IsArray(ary)
  • 要素のデータをセットし、配列を作成する - s = Array("住宅", "自動車", "ビジネス", "不動産")
  • 配列から一致する文字列を検索する - Range("L8") = Filter(s, "ビジネス", True)
  • 配列の要素のデータを結合する - Range("L8") = Join(s, "")
  • 日付に変換可能か調べる - Range("L8") = IsDate("2007/02/31")


  • 数値に変換可能か調べる - Range("L8") = IsNumeric("987a654")
  • 数値に該当する文字列を取得する - Range("L8") = Choose(2, "一階", "二階")
  • 色番号に対応するRGB値を取得する - Range("L8") = QBColor(12)      '赤
  • 変数がNULLかどうか判定する（NULLの場合はTRUE) - Range("B10") = IsNull(i)
  • Windowsのフォルダを取得 - Range("B8") = Environ("WINDIR")
  • VBAでワークシート関数を使う - SUM関数 - ln = Application.WorksheetFunction.Sum(Range("B14:B18"))
  • VBAでワークシート関数を使う - Average関数 - ln = Application.WorksheetFunction.Average(Range("B14:B18"))
  • VBAでワークシート関数を使う - MAX関数 - ln = Application.WorksheetFunction.Max(Range("B14:B18"))
  • VBAでワークシート関数を使う - MIN関数 - ln = Application.WorksheetFunction.Min(Range("B14:B18"))


Homeに戻る > 小ネタ集に戻る

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved