Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


22450 / 76732 ←次へ | 前へ→

【59664】Re:定義済の関数は使えない?(引き続き質問させてください。)
発言  SS  - 08/12/30(火) 18:20 -

引用なし
パスワード
   ▼nagao さん:

試しにこんな感じで作ってみました。
要求事項を満たしているでしょうか?

Function MyFunc1(Val1, Val2 As Range, Val3 As Integer)
  Dim i As Long, j As Long, k As Long, m As Long
  
  'エラー処理
  If Val3 < 0 Or Val3 > 3 Then
    MyFunc1 = "Error"
  End If
    
  With Val2
    j = .Row
    k = .Row + .Rows.Count - 1
    m = .Column
  End With
  
  For i = j To k
    If Cells(i, m).Value = Val1.Value Then
      MyFunc1 = Cells(i, m + Val3).Value
      Exit Function
    End If
  Next i
  MyFunc1 = 0
End Function

5 hits

【59657】こういうユーザー定義関数(Function)は作れますか? nagao 08/12/30(火) 3:28 質問
【59658】Re:こういうユーザー定義関数(Function)は... 甘木 08/12/30(火) 6:27 回答
【59659】Re:こういうユーザー定義関数(Function)は... nagao 08/12/30(火) 9:02 お礼
【59660】Re:こういうユーザー定義関数(Function)は... 甘木 08/12/30(火) 9:44 発言
【59661】定義済の関数は使えない?(引き続き質問さ... nagao 08/12/30(火) 15:42 質問
【59662】Re:定義済の関数は使えない?(引き続き質問... かみちゃん 08/12/30(火) 15:48 発言
【59663】Re:定義済の関数は使えない?(引き続き質問... nagao 08/12/30(火) 17:38 お礼
【59664】Re:定義済の関数は使えない?(引き続き質問... SS 08/12/30(火) 18:20 発言
【59665】Re:定義済の関数は使えない?(引き続き質問... 甘木 08/12/30(火) 22:46 回答
【59666】Re:定義済の関数は使えない?(引き続き質問... かみちゃん 08/12/30(火) 22:57 発言
【59667】Re:定義済の関数は使えない?(引き続き質問... 甘木 08/12/30(火) 23:28 発言
【59668】Re:定義済の関数は使えない?(引き続き質問... かみちゃん 08/12/30(火) 23:39 発言
【59669】Re:定義済の関数は使えない?(引き続き質問... 甘木 08/12/30(火) 23:58 発言
【59670】Re:定義済の関数は使えない?(引き続き質問... かみちゃん 08/12/31(水) 0:04 発言
【59671】Re:定義済の関数は使えない?(引き続き質問... 甘木 08/12/31(水) 1:24 発言
【59672】Re:定義済の関数は使えない?(引き続き質問... かみちゃん 08/12/31(水) 10:50 発言
【59673】「#NUM!」が出る? nagao 08/12/31(水) 10:55 質問
【59674】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:09 発言
【59675】Re:「#NUM!」が出る? ぱくぱく名無しさん 08/12/31(水) 11:14 発言
【59676】Re:「#NUM!」が出る? nagao 08/12/31(水) 11:37 お礼
【59678】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:39 発言
【59679】Re:「#NUM!」が出る? nagao 08/12/31(水) 11:59 お礼
【59686】Re:「#NUM!」が出る? ぱくぱく名無しさん 09/1/2(金) 13:34 発言
【59677】Re:「#NUM!」が出る? かみちゃん 08/12/31(水) 11:37 発言

22450 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free