Postingan

Menampilkan postingan dari Februari, 2015

Macro untuk Menghapus Hyperlink Tanpa Merubah Format

Pada postingan sebelumnya kita sudah belajar bagaimana caranya untuk  Menghapus Hyperlink Tanpa Merubah Format pada Microsoft Excel. Proses tersebut dibuat secara manual dengan cara menghapus seluruh data yang ada hyperlinks-nya (clear contents), dilanjutkan dengan mengembalikan data tersebut dari data backup dengan cara copy paste formula. Proses tersebut  sebenarnya dapat dibuat lebih praktis dengan menggunakan macro/vba. Berikut adalah contoh script-nya. '---------------------------------------------------- Sub clearHyperlinkWithoutFormat() 'je270215-remove hyperlinks tanpa merubah format Dim sel As Range, tempFormula As String Application.ScreenUpdating = False For Each sel In Selection     If sel.Hyperlinks.Count > 0 Then         tempFormula = sel.Formula         sel.ClearContents         sel.Formula = tempFormula     End If Next End Sub '---------------------------------------------------- Cara menggunakan macro tersebut sebagai berikut: copy script di atas ke mod

Menghapus Hyperlinks Tanpa Merubah Format

Gambar
Pada saat kita membuat hyperlinks pada microsoft excel, secara default format sel akan berubah menjadi font warna biru bergaris bawah . Jika kita menginginkan format yang lain,  maka kita dapat merubahnya kemudian. Proses sebaliknya, ketika kita menghapus hyperlink dengan cara biasa (klik kanan - remove hyperlink), maka secara default, format akan di-clear-kan menjadi font warna hitam tanpa garis bawah. Berikut contoh ilustrasinya: Remove Hyperlink Mengembalikan Format Ke Kondisi Default Jika kita ingin menghapus hyperlinks tanpa merubah format maka cara berikut mungkin akan membantu. Copy file atau worksheet dimana hyperlinks akan dihapus.  Hal ini berguna sebagai back up. Hapus data yang ada hyperliknya dengan menggunakan tombol DELETE atau  dengan cara Clear Contents. Pada proses ini, hyperlink ikut terhapus bersama data. Kembalikan data yang sudah dihapus tadi dengan cara copy-paste special formula dari file/worksheet back up. Berikut Contoh Ilustrasinya: Remove Hyperlink Tanpa M

Excel Comment - Macro Untuk Konversi Data Tabel Menjadi Text dalam satu Kolom

Gambar
Konversi Data Tabel Menjadi Text dalam satu Kolom Pada tulisan sebelumnya sudah dijelaskan bagaimana caranya mengkonversi text dalam range kolom menjadi text dalam comment box . Proses ini menggunakan prosedur makro yang saya namai convertColumnToCmt . Dalam beberpa kasus, adakalanya kita harus menyertakan table ke dalam comment. Prosedur makro convertColumnToCmt masih mempunyai kelemahan yaitu ia hanya dapat mengkonversi text dari satu kolom saja. Sedangkan table, seperti kita ketahui terdiri atas beberapa kolom.  Sehingga, untuk dapat menyertakan table kedalam comment,  maka diperlukan prosedur untuk mengkonversi tabel terlebih dahulu menjadi text dalam satu kolom Part1: Font Type Mono Space Pada bagian pertama ini saya akan jelaskan cara membuat prosedur macro untuk menggabungkan data table kedalam satu kolom jika font yang digunakan adalah type mono space. Penggunaan font tipe lainnya akan dijelaskan dalam bagian kedua karena memerlukan pendekatan dan prosedur khusus. Saya sendiri

Memberi Nama Cell dan Range Pada Microsoft Excel Menggunakan Name Box

Gambar
Nama sel atau range pada microsoft excel sangat berguna untuk berbagai keperluan diantaranya: Nama sel yang diidentifikasikan sendiri oleh user lebih mudah diingat dibandingkan dengan refferensi range/sel default excel. Misalnya kita akan lebih mengingat " dataku " dibanding " data!A1 ",  atau lebih mudah mengingat " kumpulanDataku " dibanding "" data!A1:A13 " Lebih mudah digunakan sebagai referensi dalam pembuatan formula, terutama jika file excel terdiri atas banyak worksheet. dan formula merujuk ke referensi sumber yang tetap. Lebih digunakan sebagai referensi target hyperlink. Lebih mudah digunakan sebagai referensi dalam penulisan code VBA Lebih mudah digunakan sebagai list data untuk data validasi. Untuk membuat nama sel/range dapat dilakukan dengan cara berikut: Menggunakan Name Box Cara termudah untuk cembuat/identifikasi nama range adalah dengan menggunakan Name Box Name Box biasanya terlepas di kiri atas layar excel. Ilustrasi Name

Macro Untuk Memindahkan Text Dari Cell Ke Kotak Insert Comment

Gambar
Menambahkan / insert comment pada microsoft excel kadang cukup membosankan terutama jika jumlahnya banyak dan textnya panjang.   Cara yang sering digunakan biasanya dengan klik kanan pada sel yang akan ditambahkan komentar dan kemudian klik insert comment untuk memunculkan kotak komentar. Selanjutnya komentar diketik secara langsung pada kotak insert comment.  Bagaimana jika ada data berbentuk tabel yang harus disertakan dalam comment? Metode    yang sering dilakukan pengguna ms excel umumnya dengan cara mengcopy dulu tabel dari excel ke notepad, kemudian mengeditnya supaya susunan text rapi dan berbentuk tabel.  Selanjutnya text notepad tersebut dicopy ke kotak insert comment.  Jika anda Jenuh dengan cara biasa yang sangat menguras energi, sebaiknya anda mencoba cara yang satu ini untuk melakukan insert comment dengan cara mengambil text langsung dari sell dan memindahkannya ke dalam kotak komentar Ya, Dengan macro dan VBA, kita dapat melakukan insert comment dengan cepat dan lebih ra

Excel Comment - Find & Replace Text dalam Comment

FIND DAN REPLACE text atau string dalam excel worksheet atau range adalah hal biasa dan mudah dilakukan dengan perintah Find (Ctrl + F)   atau Replace (Ctr + H). Namun bagaimana caranya menemukan dan menukar text dalam exel comment.   Saya   belum menemukan cara lain selain menggunakan vba dan macro.   Contoh script berikut dapat digunakan untuk mencari dan sekaligus mengganti text tertentu dalam comment box. 1.        Contoh Script untuk mencari dan menghitung text tertentu yang dijumpai dalam text comment dan memberikan informasi hasil dari proses tersebut.  '---------------------------------------------------------------------------------------- Sub findTextInComment() Dim findStr As String, cmtStr As String, r As Range Dim i As Long, findCount As Long, cmtCount As Long findStr = InputBox("Text Yang Dicari :") If findStr = "" Then Exit Sub For Each r In Selection     If Not (r.Comment Is Nothing) Then         cmtCount = cmtCount + 1         cmtStr = r.Comment

Excel Comment - Cek Value/String Dalam Comment

Gambar
MACRO UNTUK MENGECEK TEXT /STRING DALAM INSERT COMMENT Adakalanya insert comment dibuat untuk menjelaskan langkah perhitungan data/angka yang ada dalam sel. Kita dapat mengecek apakah angka akhir perhitungan dalam insert comment sama atau tidak dengan angka dalam sel.  Sebenarnya kita bisa mengeceknya satu persatu dengan cara membuka comment ( show comment ) satu persatu. Namun resiko human error-nya tinggi, apalagi jika dilakukan pada jam ngantuk...:).  Saya tidak tahu nilai manfaat cara ini bagi anda. Tapi inilah yang harus saya kerjakan dimana saya harus merekap dan mengecek data-data dari divisi/unit, dimana ada penjelasan data yang dibuat dengan menambahkan insert comment pada data tersebut... dan saya termasuk orang yang "malas" untuk melakukan pengecekan satu persatu. Code berikut akan menghitung jumlah insert comment yang tidak matching dengan nilai dalam cell. Dengan code ini, kita bisa langsung tahu dan lebih fokus untuk mengecek penjelasan/comment yang "diduga

Macro Untuk Setting Comment Pada Microsoft Excel

Gambar
Untuk melakukan perubahan / setting comment , Excel sendiri sudah menyediakan fasilitas dengan perintah “ format Comment ” yang dapat diakses dengan cara klik kanan pada comment box.   Melakukan setting comment dengan cara biasa/manual Sayangnya dengan cara tersebut, prosesnya dilakukan satu persatu dan tentu saja akan memerlukan banyak waktu. Jika hanya ada 1 atau 2 comment yang harus diedit, mungkin tidak menjadi masalah. Bagaimana jika ada puluhan, ratusan, bahkan ribuan comment yang harus di-edit? Cara manual tentunya bukan pilihan yang tepat, kecuali jika kita bersedia untuk lembur semalaman untuk mengerjakannya satu per satu.Bagi saya ini adalah pekerjaan yang sangat membosankan, apalagi tidak ada tuh yang namanya upah lembur... Dengan macro dan VBA , pekerjaan tersebut jauh lebih mudah dan efisien. Contoh script berikut dapat digunakan untuk melakukan setting semua comment sekaligus dalam range yang diseleksi, atau dalam aktivesheet bahkan sekaligus dalam satu workbook. Anda

Macro Untuk Melihat dan Menyembunyikan Comment Excel

Gambar
MS Excel Comment Mungkin anda pernah mempresentasikan data-data dalam Microsoft excel dimana setiap data harus dijelaskan dengan insert comment. Masalah yang dijumpai dan cukup merepotkan pada saat presentasi adalah sbb: Untuk melihat exel comment biasanya dengan cara memposisikan kursor pada cell yang ada commentnya.  Masalahnya Jika cell ada di sisi kanan kanan visible range, maka untuk melihat comment harus menggeser layar komputer ke kanan.  Jika comment cukup panjang, mau tidak mau harus klik kanan dan show comment untuk melihat text comment sampai ke ujung bawah.  Bagi saya ini cukup melelahkan jika setiap melihat comment harus melakukan prosedur ini.  Belum lagi kalau box komentar posisinya sangat jauh dari sel tempat komentar tersemat. Sehingga sering terbesit pertanyaan kenapa harus ada insert comment yang panjang dalam bahan presentasi? Susahnya menyisipkan dan mereview komentar pada data excel saya alami dulu sebelum mengenal macro dan vba.  Dan diakui atau tidak, ti