Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
50919 / 76738 ←次へ　｜　前へ→
【30699】Re:イベントプロシージャーを自作関数
回答  Kein  - 05/11/3(木) 11:41 -
引用なし
パスワード
   数式を入力するセルの、１つ左のセルの値を Dt2 として

Function MyClc(Dt1 As Double) As Double
　 With ActiveCell.Offset(, -1)
　　　If IsEmpty(.Value) Then Exit Function
　　　If Not IsNumeric(.Value) Then Exit Function
　　　Dt2 = .Value
　 End With
　 MyClc = Dt2 - Dt1
End Function

という式で =MyClc(数値Dt1) と入力すれば、計算結果が出ます。
0 hits
▼ 【30694】イベントプロシージャーを自作関数 川崎 05/11/3(木) 3:44 質問
【30699】Re:イベントプロシージャーを自作関数 Kein 05/11/3(木) 11:41 回答≪
【30702】Re:イベントプロシージャーを自作関数 川崎 05/11/3(木) 13:42 質問
【30707】Re:イベントプロシージャーを自作関数 Kein 05/11/3(木) 15:45 発言
【30710】Re:イベントプロシージャーを自作関数 川崎 05/11/3(木) 18:57 質問
【30711】Re:イベントプロシージャーを自作関数 ichinose 05/11/3(木) 21:16 発言
【30725】Re:イベントプロシージャーを自作関数 川崎 05/11/4(金) 0:25 質問
【30727】Re:イベントプロシージャーを自作関数 ichinose 05/11/4(金) 7:02 発言
【30758】Re:イベントプロシージャーを自作関数 ﾌﾚｯﾂ 05/11/4(金) 14:33 お礼
【30790】Re:イベントプロシージャーを自作関数 ichinose 05/11/4(金) 19:40 発言
【30805】Re:イベントプロシージャーを自作関数 川崎 05/11/4(金) 23:01 質問
【30811】Re:イベントプロシージャーを自作関数 川崎 05/11/4(金) 23:30 質問
【30815】Re:イベントプロシージャーを自作関数 こたつねこ 05/11/4(金) 23:48 回答
【30812】Re:イベントプロシージャーを自作関数 こたつねこ 05/11/4(金) 23:33 発言
【30817】Re:イベントプロシージャーを自作関数 川崎 05/11/5(土) 0:05 回答
【30819】Re:イベントプロシージャーを自作関数 こたつねこ 05/11/5(土) 0:51 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
50919 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free