Excel VBA - 行内の次の空のセルを選択する

Microsoft Excelで使用される場合、 Visual Basic ApplicationまたはVBAは、このアプリケーションの助けを借りて繰り返しの作業を自動化できるため、効率的なツールです。 ユーザーは自分のプログラミングニーズを満たすためにカスタム VBA コードを書くことができます。 オフセットなどの興味深いプロパティを通じて、Excelのさまざまなセルにわたって操作できます。 行内の次の空のセルの選択などの操作は自動的に実行できますが、VBAでこのプロパティが選択されている場合に限られます。

問題

Excel 2002を使用しています

以下のコードは、同じプレーヤーのスコアが入力されるたびに、行の右側にある次の空のセルを選択したい場合を除いて、正常に機能します。

今読むように、それはちょうど前のエントリーを上書きします。

 シート（ "クラシック"）ActiveSheet.Unprotect Range（ "B1"）を選択します。アクティブにするまで選択します。ActiveCell.Value = Player.Value ActiveCell.Offset（1、0）。ループを選択します。 0, 4）.value = Score.value ActiveSheet.Protect GameNumber.Value = "" Player.Value = "" Score.Value = "" 

溶液

これを試して：

 ActiveCell.Value = Player.Value Activecell.offset（0, 4）.value = Score.value '行の最後に使用されたセルを右に検索します。ActiveCell.End（xlToRight）。最後のセルから右にセルを1つ移動します。使用セルActiveCell.Offset（0、1）。選択 

注意

フォーラムでこのヒントを寄せてくれたrizvisa1に感謝します。