|
こんにちは。かみちゃん です。
横から失礼します。
>Inputboxの表示までは出るのですが、その後Onをしましても、
>それぞれの人名シートにデータが転記できませんが、
>何か当方にミスがあると思いますが、何か思い当たる
>事項がありましたら、教えてください。
「名前」を入力して、「体重」〜「体脂肪率」まですべて入力しましたか?
すべて入力したら、InputBoxの表示が出ます。
そのあと、エラーもなく転記が終了するのでしょうか?
エラーが出るのなら、エラーメッセージと、そのエラーになっているコードを教えてください。
エラーが出ないならば、
On Error GoTo ELine
のコードを
' On Error GoTo ELine
とコメント文にして実行してみてください。
そうすると、エラー「インデックスが有効範囲にありません」となれば、
「名前」を入力したシートが用意されていないと思われます。
(全角半角、スペースの有無をよく確認してください。)
また、
If IsError(Col) Then GoTo ELine
のコードを
' If IsError(Col) Then GoTo ELine
とコメント文にして実行して、エラー
「型が一致しません」となれば、
個人別の各シートの1行目に、「1月、2月、3月・・」というように「○月」と設定
されていないことと思います。
なお、私の手元では、動作確認できています。(WinXP Pro、Excel2002SP3)
|
|