スプレット内でTabキーで上下に移動するには？ (ID:90646)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 スプレット内でTabキーで上下に移動させたいのですが、うまくいきません。 .ProcessTab = True を使ってみましたが、セルが左から右に移動するだけで、上下に行きません。 一応下記のようなソースを作成しましたが、Tabキー押下時に下にセルが移動しますが、Shiftキー＋Tabキー押下時に上に移動してくれません。 Private Sub sprBikou_KeyDownEvent(ByVal sender As Object, ByVal e As AxFPSpread._DSpreadEvents_KeyDownEvent) Handles sprBikou.KeyDownEvent sprBikou.Col = 1 sprBikou.Row = 1 sprBikou.Text = e.keyCode & " , " If e.keyCode = 9 Then With sprBikou .ReDraw = False If .ActiveCol = 1 AndAlso .ActiveRow = 10 Then .Col = 2 .Row = 1 Else .Col = .ActiveCol .Row = .ActiveRow + 1 End If '.Position = FPSpread.PositionConstants.PositionUpperLeft .Action = FPSpread.ActionConstants.ActionActiveCell 'SS_ACTION_GOTO_CELL() .ReDraw = True End With End If End Sub ちなみに１列目の１０行目まで移動移動したら隣の列の１行目セルに動くようなソースです。 よろしくお願いします。