Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

75393 / 76733

←次へ　｜　前へ→


	【5776】Re:範囲に付けた名前を関数で使用したい！

こうちゃん

- 03/5/30(金) 8:20 -


	引用なし

	パスワード

やまごんさん、こんにちは

>さて、こうちゃんさんご回答に対してですが、B11のセルにデータを入力するとエラーが出るのは承知しています。
>で、ご提案のマクロを作ってみました。
>結果、
>　　A B C　
>1　
>2　
>3　1 2 4
>4　2 3 5
>5　3 4 6
>6　4 5 7
>7　5 6 8
>8　6 7 9
>9　7 8 1
>10 8 9 1
>となってしまいました。
>Aの列は、入力、BはDATA+1、ｃは=cal("DATA")です。
>一応、ご報告まで・・・。

すみません、例題だと思い、手を抜いてました。
名前範囲の先頭位置を考慮していませんでした。
具体例はこんな感じにすべきでした・・
Function cal(x As String)
　　cal = Range(x).Range("A" & ActiveCell.Row - Range(x).Row + 1) + 1
End Function

0 hits

▼

【5724】範囲に付けた名前を関数で使用したい！ やまごん 03/5/28(水) 23:09