2017-06-22 6 views
0

範囲内の次の空のセルを特定の列から見つけようとしていて、今日の日付を入れようとしています。で範囲内の次の空のセルを探しますか?

Column U                 Column V               Column W             Column X 
Start checking blanks from here but don't check this column itself  I'm Not a blank Cell so move to the next cell and check   I'm a blank cell. Put value here       I am a blank cell. I will have a value placed in me next time 

コード:私は以下のように見えたスプレッドシートを持っていた場合

ThisWorkbook.ActiveSheet.Cells(ThisWorkbook.ActiveSheet.Rows.Count, "U").End(xlLeft).Offset(0, 1).Value = Now() 

マイ範囲の空白セルをチェックするには、例えばのでX.

にVであります私のコードは列Aから始まる行の最初の空白セルに日付を入れている瞬間です。これは明らかに正しくありません。

私が間違っている場所を誰かに見せてもらえますか?

+0

だけ.END(xlLeft).END(xlLeft)を使用します。 – Lowpar

+0

@Lowparは私がこれをどのように使用することを意味するのかよく分かりません。私はThisWorkbook.ActiveSheet.Cellsを試しました(ThisWorkbook.ActiveSheet.Rows.Count、 "U")。End(xlLeft).End(xlLeft).Value = Now()でもこれは動作しませんでした – user7375502

+0

ブランク?セルが空白で、Ctrlキーを押しながら直接入力すると、次の空白を見つけるか、.find関数を使用するか、すべてのセルをループできます。 – Lowpar

答えて

0

変更xlleft xlToLeft

に私はusedrange行があなたの条件のためのシンプルなsheet.rows.countよりカウントを使用することをお勧めします。

ThisWorkbook.ActiveSheet.Cells(ActiveSheet.UsedRange.Rows.Count、 "U")。エンド(xlToLeft).Offset(0、1)

関連する問題