[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『コンパイルエラー:プロシャージが大きすぎます』(tyon)
[VBAで]
コンパイルエラー:プロシャージが大きすぎます と、出てくるのですがいい方法はありますか?
問題のプロシジャーは何行ありますか? (kazu)
↓の方と同じような状況なのでしょうから、問題のコードをどのように 記述しているのかを見てみないとなんとも... (ramrun)
[[20041025141709]]『入力規制のリストの設定で1つ目のセルで...』(後藤)
プロシジャーな約4000行ぐらいあります まだ半分も行ってないないのですが・・・ [[20041025141709]]『入力規制のリストの設定で1つ目のセルで...』(後藤) を見て私もやったのですが途中で コンパイルエラー:プロシャージが出てきてしまったので 何分、初心者なのですいません (tyon)
4000ってすごいですね。
で、どんなコードなんですか? 一部を掲載していただかないと、何にも答えられませんが... (ramrun)
コード中にセル番地を書くのも大変なので、ワークシートのセルに書いておく ような処理の参考に。 (ramrun)
[[20041025141709]]『入力規制のリストの設定で1つ目のセルで...』(後藤) と同じなのでこんな感じです Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Address(0, 0) Case "AD132" Range("AE132").Select
Case "AE132" Range("AF132").Select
Case "AF132" Range("AG132").Select
End Select
SendKeys "(%{DOWN})" End Sub
よろしくお願いします (tyon)
↓にあげた私のコードが使えませんか?
[[20041025141709]]『入力規制のリストの設定で1つ目のセルで...』(後藤)
またはこういうのは利用できませんか?
[[20030728103442]] 『任意の範囲以外にカーソルが行かないようにしたい』(すぎ)
(ramrun)
やってみたのですがうまくいきませんでした やりかたがおかしいのかな?すいません (tyon)
とりあえず、このデータをSheet2に。A列にアドレスを入れていきます。 B1の1を忘れずに。
A B 1 A2 1 2 A9 3 A10 4 A11 5 B9 6 B10 7
リンク先のコードはSheet1に。 それでSheet1上でEnterすると動作は確認できると思います。 単に動くだけでなので、あとは自分の仕様にあわせて改造してください。 (ramrun)あんまり実用的でないので見直しまっさ。
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.