Dicapai dengan pengaturcaraan VBA.
ALT+F11——F7——Tampal kod berikut dan laraskan format:
Sub mysub()
Malapkan i Sebagai Integer
Dengan Cadar(1)
Helaian(1).Pilih
Untuk i = 2 Ke Sel(1, 256).Tamat(xlKeKiri).Lajur
Sel(Sel(65536, i).Tamat(xlUp).Baris, i).Pilih
Julat(Pemilihan, Sel(1, i)).Pilih
Pilihan.Salin
Sel([a65536].Tamat(xlUp).Baris + 1, 1).Pilih
ActiveSheet.Tampal
Application.CutCopyMode = Palsu
Seterusnya i
Lajur("A:A").Pilih
Selection.SpecialCells(xlCellTypeBlanks).Pilih
Selection.EntireRow.Delete
Sel(1, 1).Pilih
Tamat Dengan
Tamat Sub
Kesan operasi adalah seperti berikut:
1 Mula-mula, kami membuka fail Excel yang disulitkan
2. Klik kanan mana-mana buku kerja dan anda boleh melihat bahawa kebanyakan fungsi di atas tidak tersedia.
3 Sekarang kita mula menyelesaikan masalah ini. Gerakkan tetikus ke atas dan klik tab [Semakan].
4 Selepas mengklik [Unprotect Shared Workbook], seperti yang ditunjukkan dalam rajah, anda akan digesa untuk memasukkan kata laluan anda (kata laluan di sini biasanya kata laluan apabila anda membuka Excel), dan klik Sahkan dalam kedua-dua langkah. Kemudian tutup dokumen Excel.
5 Apabila kami membuka dokumen Excel sekali lagi, kami mendapati bahawa [Unprotect shared workbook] telah bertukar kepada [Protect and share workbook] Jangan risau, kerja kami belum selesai.
6. Klik [Lindungi Buku Kerja], kemudian klik [Lindungi Struktur dan Tetingkap]. Kotak dialog akan muncul, menggesa anda memasukkan kata laluan.
7 Selepas pengesahan, selepas menemui mana-mana buku kerja, klik kanan kita dapat melihat bahawa fungsi yang tidak tersedia sebelum ini boleh digunakan.
Tiada arahan untuk menyalin, memotong dan menetapkan sel apabila mengklik kanan pada sel Excel
Atas ialah kandungan terperinci Bagaimana untuk mengekstrak maklumat kedua, ketiga, keempat... dalam Excel. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!