Excel VBA - Memilih sel kosong seterusnya seterusnya

Aplikasi Asas Visual atau VBA, apabila digunakan dalam Microsoft Excel, adalah alat yang cekap, kerana pekerjaan berulang dapat diotomatisasi dengan bantuan aplikasi ini. Para pengguna boleh menulis kod VBA tersuai untuk memenuhi keperluan pengaturcaraan mereka. Melalui ciri-ciri yang menarik seperti mengimbangi, seseorang boleh beroperasi di sel-sel yang berbeza dalam Excel. Operasi seperti memilih sel kosong berikutnya secara berturut-turut boleh dilakukan secara automatik, tetapi hanya apabila harta ini dipilih dalam VBA.

Isu

Saya menggunakan Excel 2002

Kod di bawah ini berfungsi dengan baik kecuali saya ingin memilih sel kosong seterusnya ke kanan dalam baris setiap kali skor pemain yang sama dimasukkan.

Seperti yang dibaca sekarang, ia hanya menimpa entri terdahulu.

 Pilih Aktif Sehingga ActiveCell.Value = Player.Value ActiveCell.Offset (1, 0). Pilih Loop ActiveCell.Value = Player.Value Activecell.offset ("B1" 0, 4) .value = Score.value ActiveSheet.Protect GameNumber.Value = "" Player.Value = "" Score.Value = ""

Penyelesaian

CUBA INI:

 Pilih ActiveCell.Value = Player.Value Activecell.offset (0, 4) .value = Score.value 'cari sel yang digunakan terakhir pada baris ke kanan ActiveCell.End (xlToRight). Pilih' pindahkan satu sel ke kanan dari terakhir digunakan sel ActiveCell.Offset (0, 1). Pilih