以下は、Excelにおいて、「Alpha」という名前のワークシートを削除するVBAの例である。Application.DisplayAlerts = FalseWorksheets("Alpha").DeleteApplication.DisplayAlerts = Trueまた、Excelで以下のコードを実行すると、セルA1からI9の範囲に掛け算九九の表を作成することができる。For i = 1 To 9    For j = 1 To 9        Cells(i, j).Value = i * j    NextNext下記のように配列を用いて、全ての値を配列に格納した上で一度に出力するように上記のコードを書き換えると、高速に動作するコードになる。Dim KukuArray(8, 8) As IntegerFor i = 1 To 9    For j = 1 To 9        KukuArray(i - 1, j - 1) = i * j    NextNextRange("A1:I9").Value = KukuArray条件によって4色以上に色を塗り分けるときも、VBAを利用する（3色以下のときは一般機能の「条件付き書式」を使用するのが望ましい）。以下のコードを実行するとセルB2からE15までの範囲内のセルを5以下→水色、6以上10以下→明るい緑、11以上15以下→黄色、16以上→赤と塗り分けることができる。Dim myCell As RangeFor Each myCell In Range("B2:E15")    Select Case myCell.Value    Case Is <= 5        myCell.Interior.Color = RGB(0, 255, 255)    Case 6 To 10        myCell.Interior.Color = RGB(0, 255, 0)    Case 11 To 15        myCell.Interior.Color = RGB(255, 255, 0)    Case Is > 15        myCell.Interior.Color = RGB(255, 0, 0)    End SelectNext以下は、VBAと共にExcelごとプログラムを終了するVBAの例である。Application.Quit
北魏の司空の封回の子として生まれた。弱冠にして州郡主簿となり、奉朝請を初任とし、直後を領した。汝南王元悦が王府を開くと、その下で中兵参軍となった。延昌年間、法慶らが大乗の乱を起こすと、隆之は大都督元遥の下で乱の鎮圧にあたり、武城子の爵位を受けた。司徒主簿・河南尹丞を兼ねた。ときに青州・斉州の士民たちが乱を起こすと、隆之は北魏の朝廷の使節として説得にあたり、みな降伏させた。永安年間、撫軍府長史に任ぜられた。530年、爾朱栄が殺害され、爾朱兆らが晋陽に拠ると、孝荘帝は河内の要衝を任せるため、隆之を龍驤将軍・河内郡太守に任じた。間もなく持節・後将軍・仮平北将軍・河内郡都督を加えられた。隆之が河内郡に到着しないうちに、爾朱兆が洛陽に入り、孝荘帝は殺害された。隆之は父が爾朱氏に殺害されたため、報復を誓った。高乾らとともに冀州の州城を夜襲して落とし、冀州刺史に推された。531年、高歓が晋陽を出て東に向かうと、隆之は子の封子絵を派遣して滏口で迎えさせた、高歓が信都に入ると、隆之は反爾朱氏の挙兵を熱烈に支持した。後廃帝が立つと、隆之は左光禄大夫・吏部尚書に任ぜられた。高歓の下で爾朱兆らの軍と広阿で戦い、これを撃破した。持節・北道大使となった。532年、高歓が爾朱兆らを韓陵で破ったとき、隆之は鄴城の留守をつとめた。爾朱兆らが敗走すると、隆之は行冀州事となり、捕虜の3万人あまりを諸州に分置した。間もなく侍中として召された。高歓が洛陽から鄴に軍を返そうとしたとき、隆之は斛斯椿・賀抜勝・賈顕智らに警戒するよう、高歓に忠告した。間もなく隆之は安徳郡公に封ぜられ、儀同三司に進んだ。麟趾閣で参議して、新制を定めた。亡き妻の祖氏に范陽郡君の位を追贈された。前に受けた富城子と武城子の爵位を弟の子の封孝琬らに譲った。534年、斛斯椿らが孝武帝を連れて関中に入ると、隆之は郷里に逃げ帰った。孝武帝の召しに応じず、高歓のために晋陽に赴き、并州刺史を代行した。清河王元亶が大司馬となると、隆之はその下で長史となった。東魏の孝静帝が擁立されると、隆之は侍中として入朝し、遷都の議論に参与した。侍中・侍講・吏部尚書・行冀州事となった。陽平の路紹遵が行台を号して乱を起こし、定州博陵郡を落とし、冀州に侵入した。隆之は長楽郡太守の高景らを率いて叛乱軍を撃破し、路紹遵を生け捕りにして、晋陽に送った。538年、冀州刺史に任ぜられ、間もなく開府を加えられた。都督の孛八・高法雄・封子元らが乱を起こすと、隆之は冀州の軍を率いて乱を平定した。539年、侍中としてまた召された。行梁州事に転じ、また行済州事となり、尚書右僕射として召された。543年、北豫州刺史の高仲密が乱を起こそうと、冀州の豪族たちに内応の使者を送り、扇動させた。隆之は説得につとめ、冀州の治安を安定させた。高澄は高仲密の支党を厳罰に処そうとしたが、隆之は追っての処罰をせず、事なきを得た。隆之は本官のまま行済州事となり、斉州刺史に転じた。545年、在官のまま61歳で死去した。使持節・都督滄瀛二州諸軍事・驃騎大将軍・瀛州刺史・司徒公の位を追贈された。高歓によりさらに使持節・都督冀瀛滄斉済五州諸軍事・冀州刺史・太保の位を贈られ、諡を宣懿といった。