Bagaimana cara memasukkan tabel mengambang atau kotak teks di lembar kerja Excel?
Jika Anda memiliki tabel atau kotak teks dengan beberapa data penting yang Anda ingin selalu terlihat di layar lembar kerja meskipun saat Anda menggulir ke atas atau ke bawah lembar kerja. Ini mungkin tugas yang menarik, artikel ini, saya akan memperkenalkan trik cepat untuk mengatasinya.
Masukkan tabel mengambang di Excel dengan kode VBA
Masukkan kotak teks mengambang di Excel dengan kode VBA
Masukkan tabel mengambang di Excel dengan kode VBA
Tidak ada cara langsung bagi Anda untuk memasukkan tabel mengambang, jadi Anda perlu mengonversi data tabel menjadi gambar, lalu menerapkan kode untuk menyelesaikannya, lakukan seperti ini:
1. Pilih tabel data yang ingin Anda tetap terlihat, lalu klik Copy > Salin sebagai Gambar bawah Beranda tab, lihat tangkapan layar:
2. Di muncul keluar Salin Gambar kotak dialog, pilih Seperti yang ditunjukkan di layar dari Penampilan bagian, dan pilih Gambar bawah dibentuk bagian, klik OK untuk menutup dialog, lalu klik sel untuk menampilkan gambar, akhirnya, tekan Ctrl + V untuk menempelkan gambar ini, lihat tangkapan layar:
3. Setelah mengonversi tabel menjadi gambar, lalu klik kanan tab lembar yang berisi gambar tabel yang ingin selalu terlihat, dan pilih Lihat kode dari menu konteks, dan di buka Microsoft Visual Basic untuk aplikasi jendela, salin dan tempel kode berikut ke dalam Modul kosong:
Kode VBA: Masukkan tabel mengambang di excel:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Application.ScreenUpdating = False
If Target.Cells.Count > 1 Then Exit Sub
With ActiveSheet.Shapes("Picture1")
.Top = ActiveWindow.VisibleRange.Top + 5
.Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
End With
Application.ScreenUpdating = False
End Sub
Note: Dalam kode ini, Picure1 adalah nama gambar yang telah Anda buat, harap ubah sesuai kebutuhan Anda.
4. Kemudian simpan dan tutup jendela kode, sekarang, saat Anda menggulir lembar kerja dan mengklik sel, gambar tabel selalu disimpan di sudut kanan atas lembar kerja.
Masukkan kotak teks mengambang di Excel dengan kode VBA
Untuk memasukkan kotak teks mengambang, berikut juga kode VBA untuk menyelesaikan tugas ini.
1. Pertama, Anda harus memasukkan kotak teks dari Pengembang tab, klik Pengembang > Menyisipkan > Kotak Teks (kontrol ActiveX), lalu gambar kotak teks, dan masukkan informasi ke dalam kotak teks sesuai kebutuhan. Lihat tangkapan layar:
2. Kemudian klik kanan tab lembar yang berisi kotak teks yang Anda ingin selalu terlihat, dan pilih Lihat kode dari menu konteks, dan di buka Microsoft Visual Basic untuk Aplikasi jendela, salin dan tempel kode berikut ke tempat kosong Modul:
Kode VBA: Masukkan kotak teks mengambang di Excel:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Application.ScreenUpdating = False
With ActiveWindow.VisibleRange
TextBox1.Top = .Top + 5
TextBox1.Left = .Left + .Width - TextBox1.Width - 45
End With
Application.ScreenUpdating = True
End Sub
Note: Dalam kode ini, Kotak Teks1 adalah nama kotak teks yang telah Anda sisipkan, harap ubah sesuai kebutuhan Anda.
3. Kemudian simpan dan tutup jendela kode, sekarang, saat Anda menggulir lembar kerja ke mana saja, kotak teks yang dimasukkan selalu disimpan di sudut kanan atas lembar kerja.
Maksimalkan atau minimalkan jendela lembar kerja
Untuk memaksimalkan jendela lembar kerja dapat memberikan ruang lebih bagi pengguna, di Excel, Anda dapat memaksimalkan jendela lembar kerja dengan menyembunyikan pita, bilah rumus, atau bilah status. Kutools untuk Excel's Area kerja dapat membantu Anda menyembunyikan pita hanya dengan satu klik. Unduh dan uji coba gratis Kutools for Excel sekarang!
Alat Produktivitas Kantor Terbaik
Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%
- Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
- Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
- Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
- Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
- Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
- Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
- Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
- Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
- Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2021 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap Uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
