Bagaimana cara membuat nama Tombol Perintah dinamis di Excel?
Artikel ini berbicara tentang membuat nama tombol Command berubah secara dinamis dengan perubahan nilai sel yang ditentukan. Misalnya, jika nilai di sel A1 telah diubah menjadi "test", nama tombol Command tertentu akan diubah menjadi "test" secara otomatis.
Buat nama Command Button dinamis dengan nilai sel dengan kode VBA
Buat nama Command Button dinamis dengan nilai sel dengan kode VBA
Kode VBA berikut dapat membantu Anda membuat nama tombol perintah menjadi dinamis dengan nilai sel yang ditentukan di lembar kerja. Silakan lakukan sebagai berikut.
1. klik Pengembang > Menyisipkan > Tombol Perintah (Kontrol ActiveX) untuk memasukkan tombol perintah ke dalam lembar kerja. Lihat tangkapan layar:
2. Setelah memasukkan tombol perintah, klik kanan tab lembar dan klik Lihat kode dari menu klik kanan seperti gambar di bawah ini yang ditampilkan:
3. Dalam pembukaan Microsoft Visual Basic untuk Aplikasi jendela, silakan salin dan tempel kode VBA di bawah ini ke dalam jendela.
Kode VBA: Jadikan nama Command Button dinamis dengan nilai sel
Dim xStr As String
Private Sub Worksheet_Change(ByVal Target As Range)
Dim xShapeRg As ShapeRange
On Error Resume Next
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Me.CommandButton1.Caption = Target.Text
Set xShapeRg = ActiveSheet.Shapes.Range(xStr)
If xShapeRg Is Nothing Then Set xShapeRg = ActiveSheet.Shapes.Range("CommandButton1")
Application.EnableEvents = False
xShapeRg.Select
Application.EnableEvents = True
Selection.Name = Target.Text
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If (Not Intersect(Target, Range("A1")) Is Nothing) And Target.Text <> "" Then
xStr = Target.Text
End If
End Sub
Note: dalam kode, CommandButton1 adalah nama tombol yang ingin Anda jadikan dinamis, dan A1 adalah sel yang akan Anda referensikan nilainya ke nama tombol secara otomatis.
4. tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.
5. Matikan Mode Desain dengan mengklik Pengembang > Mode Desain.
Mulai sekarang, nama Command Button akan diubah secara dinamis dengan nilai sel yang ditentukan di lembar kerja Anda.
Seperti gambar di bawah ini, ketika nilai sel A1 telah diubah, nama tombol perintah akan diubah ke nilai yang sama secara otomatis.
Artikel Terkait:
- Bagaimana cara menggunakan Tombol Perintah untuk menyimpan lembar kerja aktif sebagai file PDF di Excel?
- Bagaimana cara memasukkan baris baru kosong secara otomatis dengan Tombol Perintah di Excel?
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
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!