概要：FizzBuzzの先にある「プログラミング思考」の重要性
プログラミング学習の登竜門として知られる「FizzBuzz問題」。3で割れるならFizz、5で割れるならBuzz、両方ならFizzBuzzと出力するこのアルゴリズムは、一見すると単純な条件分岐の練習に過ぎません。しかし、実務の現場では、このロジックが複雑なデータ加工や条件判定の基礎となります。
本稿では、生成AIであるGeminiを活用し、単なるFizzBuzzを超えた「条件可変型のFizzBuzz発展問題」に挑戦します。なぜVBAでこのロジックを磨く必要があるのか。それは、Excelという環境において、膨大な行数のデータに対し、柔軟かつ高速にビジネスルールを適用する能力が求められるからです。AIを単なるコード生成機として使うのではなく、論理的思考のパートナーとして活用し、保守性の高いコードを書くための実践的なアプローチを解説します。
詳細解説：条件の抽象化とモジュール化
実務でFizzBuzz的なアルゴリズムを実装する場合、最も避けるべきは「マジックナンバー（直接埋め込まれた数値）」です。例えば、「3」や「5」という数値をコード内に直書きしてしまうと、仕様変更のたびにコードを修正しなければなりません。
VBAにおいてプロフェッショナルなコードを書くためには、以下の三つのステップが重要です。
1. パラメータの外部化：判定基準となる数値や文字列を、Excelのセルや定数として定義する。
2. ロジックの汎用化：特定の数値に依存しない、ループ処理と条件判定の分離。
3. エラーハンドリング：ゼロ除算や不正な入力に対する防御的プログラミング。
Geminiを活用する際は、「このFizzBuzzを、条件が動的に変更可能な関数として設計してほしい」といった、抽象度の高いリクエストを送るのがコツです。AIが提示するコードに対して、なぜその設計が必要なのかを問い直すことで、自身のエンジニアリングスキルも向上します。
サンプルコード：動的FizzBuzz実装
以下は、引数で判定ルールを指定できる汎用的なFizzBuzz関数のサンプルです。
' 汎用的なFizzBuzz判定関数
' param1: 判定用辞書（Dictionaryオブジェクト推奨）
' param2: 判定対象の数値
Public Function GetFizzBuzzResult(ByRef rules As Object, ByVal target As Long) As String
Dim result As String
Dim key As Variant
result = ""
' Dictionaryのキーをループして判定
For Each key In rules.Keys
If target Mod CLng(key) = 0 Then
result = result & rules(key)
End If
Next key
' 結果が空なら数値を返す
If result = "" Then
GetFizzBuzzResult = CStr(target)
Else
GetFizzBuzzResult = result
End If
End Function
' 実行用プロシージャ
Public Sub RunFizzBuzz()
Dim rules As Object
Set rules = CreateObject("Scripting.Dictionary")
' ルールを動的に設定（拡張が容易）
rules.Add 3, "Fizz"
rules.Add 5, "Buzz"
rules.Add 7, "Jazz" ' 発展：7ならJazzを追加
Dim i As Long
For i = 1 To 100
Debug.Print GetFizzBuzzResult(rules, i)
Next i
End Sub
このコードのポイントは、Dictionaryオブジェクトを用いて判定ルールを管理している点です。これにより、「7で割れるならJazz」といった追加要件が発生しても、メインのロジックを変更することなく、ルールセットを渡すだけで対応が可能になります。
実務アドバイス：AIを「思考の壁打ち相手」にする技術
生成AIであるGeminiをVBA開発で使いこなすための最大の秘訣は、「コードを書かせる」のではなく「ロジックをレビューさせる」ことにあります。
例えば、以下のようにGeminiに問いかけてみてください。
「このVBAコードを、可読性を最大化するためにリファクタリングしてほしい。特に、保守性を高めるためにインターフェース分離の考え方を取り入れることは可能か？」
このように質問することで、単に動くコード以上の「設計思想」が返ってきます。実務において、独りよがりなコードは数ヶ月後に自分自身を苦しめます。Geminiを「コードの品質を担保するシニアエンジニア」に見立て、自分の書いたコードを客観的に評価させる習慣をつけてください。
また、VBAのボトルネックになりがちな「セルへの直接アクセス」についても、AIに相談しましょう。配列を用いた高速化手法や、メモリ管理についてのアドバイスを求めることで、FizzBuzzのような単純な処理でも、10万行のデータ処理に耐えうるパフォーマンスチューニングを行うことが可能になります。
まとめ：VBAエンジニアの未来
FizzBuzzという小さな問題の中に、実はプログラミングの真髄である「抽象化」「拡張性」「効率性」が全て詰まっています。Excel VBAは古い言語だと言われることもありますが、現代の生成AIツールと組み合わせることで、開発効率とコード品質は飛躍的に向上します。
重要なのは、AIに依存しきることではなく、AIを使って「より良い設計とは何か」を自分自身に問い続けることです。今回取り上げた発展版FizzBuzzのように、日々の業務で遭遇する複雑な条件分岐をモジュール化し、使い回せるツールとして蓄積していくこと。それが、真の「Excel自動化のスペシャリスト」への近道です。
今後もGeminiと協力し、100本ノックの先にある「真の業務自動化」を目指して、VBAの限界を押し広げていきましょう。あなたの書く一行のコードが、明日の誰かの業務時間を劇的に短縮するかもしれないのですから。
