EXCEL 如果A1=7歲則C=12800

以下程式請大娘版主參考；提供之範例除了所提到的位址外其餘均可依需要修改，有關"客戶年齡"該範圍已在Excel「插入」→「名稱」→「定義」內定義範圍共79列，如有需要亦可逕行修改。VBA程式如下：Private Sub worksheet_change(ByVal Target As Excel.Range) Dim r As Integer, myRange As Range Set myRange = Worksheets("保費級距").Range("客戶年齡") With Target If .Row = 8 And .Column = 3 Then r = Application.WorksheetFunction.Match(Target.Value, myRange, 0) Range("E14") = Worksheets("保費級距").Range("H1").Offset(r - 1).Value End If End WithEnd Sub 範例下載地址 http://www.FunP.Net/720947

2012-11-09 23:39:38 補充：
只要在
r = ....底下加
If Then
Else
End If
條件即可；I欄；J欄可逕行修改於需要的欄位。因字數超過請下載參考！

下載地址
http://www.FunP.Net/481659

RCC

2012-11-10 12:50:04 補充：
對不起，想了一下前一範例是用在個人資料判斷性別查保費用；本範例則先選擇性別在Key入年齡查該性別的年齡保費，想您要的應是這種。請　逕下載參考。

下載地址
http://www.FunP.Net/518799

2012-11-10 12:53:48 補充：
在下已修改將畫面增性別OptionButton可先選擇性別再Key入年齡查該性別的年齡保費。詳情見補充內容。
RCC

純參考 E14
=IF(C2="男",INDIRECT(ADDRESS(C8-5,COLUMN(J1))),IF(C2="女",INDIRECT(ADDRESS(C8-5,COLUMN(M1))),""))

版主可加入IF函數輔助公式判斷C2內容
IF(C2="男",公式區J,IF(C2="女",公式區M,""))

2012-11-14 00:24:52 補充：
四種狀況一起列出，只要不符合條件就給予空白值，參考運用....
IF((C9="是")*(C2="男"),公式P區,"")&IF((C9="是")*(C2="女"),公式S區,"")&IF((C9="否")*(C2="男"),公式J區,"")&IF((C9="否")*(C2="女"),公式M區,"")

E14=INDEX(H:H,C8-5)
或=OFFSET(H1,C8-6,)

2012-11-11 06:19:22 補充：
因為
C8=7則E14=H2
C8=8則E14=H3
.
.
.
即列數都相差5

INDEX函數是從指定範圍第1個欄位為1，第2個欄位為2....，第5個欄位為5
C8=7則E14=H2，7-5(即第5個欄位)=2(2=H2)

OFFSET函數是從指定範圍第1個欄位為0，第2個欄位為1....，第6個欄位為5
C8=7則E14=H2，7-6(即第6個欄位)=1(0=H1,1=H2)

這樣解釋你可能看得霧煞煞，請自行慢慢體會吧!

E14:
=INDIRECT("H"&C8-5)

試試看!

版主你好:
你可以作一個查詢表,然後利用VLOOKUP函數來完成