houmei https://blog.hatena.ne.jp/houmei/ 計算機設定記録 https://keisanki.hateblo.jp/ FizzBuzz VBA Sub FizzBuzz() ' ' Office:Mac 2011で確認 ' [ツール]→[マクロ]→[マクロ…]で適当な名前を入れてコード画面を開き、コピー＆ペースト ' For i = 1 To 100 s = "" If i Mod 3 = 0 Then s = "Fizz" End If If i Mod 5 = 0 Then s = s + "Buzz" End If If s = "" Then s = CStr(i) End If Range("A" & i).Value = s Next End Sub 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkeisanki.hateblo.jp%2Fentry%2F20111022%2F1319265902" title="Excel VBAでFizzBuzz - 計算機設定記録" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2011-10-22 15:45:02 rich https://keisanki.hateblo.jp/entry/20111022/1319265902 1.0 100%