エクセルの行タイトルについて

質問

現在行タイトルを$1:$8に設定しています。
例えばD7のセルにif分でD11のセルに数字が入っていれば"○"を
入っていなければ"×"が入るように設定しています。
それを改ページ毎に判断して"○"、"×"を入れる事は出来るでしょうか？
因みに改ページ行数は１１行目、１３行目、１５行目という風に２行
とばしで改ページ処理を設定してます。
ですので、判断対象セルはD11,D13,D15という風に改ページ毎に
変わる事になります。
はたして可能でしょうか？

回答No.2

某HN クロメート(Chromate)（@CoalTar）

現在のページ番号の取得はできないかかなり困難なようです。
探しきれませんでした。
＞すいません、ＩＦ文の間違いです。
IF文もしくはIF構文はVBAなどのプログラミングで使われる言葉です。
＞=IF(D11<>"","○","Ｘ")と入力しています。
はIF関数を使った数式に過ぎません。

Sub PrintPage()
Dim PPage As Integer
Dim n As Byte

PPage = Application.ExecuteExcel4Macro("get.document(50)")

For n = 1 To PPage
ActiveWindow.SelectedSheets.PrintOut From:=n, To:=n, Copies:=1, preview:=True
Range("D7").FormulaR1C1 = "=IF(R[" & 2 + 2 * n & "]C<>"""",""○"",""×"")"
Next n

End Sub
VBAは苦手なので自身はありません
参考ページ
http://support.microsoft.com/kb/402754/ja

補足

回答有難うございます。
やはりＶＢＡを使用しないと無理ですか。
私もＶＢＡは苦手です。

回答No.1

某HN クロメート(Chromate)（@CoalTar）

＞それを改ページ毎に判断して"○"、"×"を入れる事は出来るでしょうか？
どこに○×を入れるのでしょうか？

＞D7のセルにif分で
IF文の間違いでしょうか？
モジュールを提示されてはいかがでしょうか？
それともIF関数を使った数式？

補足

回答有難うございます。
すいません、ＩＦ文の間違いです。
数式を提示します。
Ｄ７のセルに
=IF(D11<>"","○","Ｘ")と入力しています。
改ページ処理毎にD11がD13,D15・・・と判断してくれる
ような数式が出来るのかどうか知りたいです。
それによって行タイトルのＤ７に"○"か"×"が入るように
なればと思っております。
どうかお知恵をお貸し下さい。