0

それで

   Private Sub Worksheet_Change(ByVal Target As Range)
   Dim KeyCells As Range          
   Set KeyCells = Range("d4")
        If Not Application.Intersect(KeyCells, Range(Target.Address)) _
           Is Nothing Then Call fftest                   
   End Sub

このコードは正常に機能します。「D4」の値を変更すると、サブfftestは「」と呼ばれます。

しかし、それを有効にするには、セルの外側をクリックする必要があります。

入力したすべてのキーストロークに気付く方法はありますか？したがって、たとえば、セルD4に「123」を入力した場合、サブは1、2、および3の後に呼び出されるため、3回別々に実行します。

セルに入力するたびにリストを動的に更新して、キーを押すたびに結果を確認できるようにします。

乾杯

4

1 に答える 1

0

コメントのSiddharthRoutの回答を参照してください。可能であれば、コメントを回答として喜んで受け入れます

于 2013-02-06T23:42:47.203 に答える