Tuesday, May 31, 2011

Cara mengubah satu halaman menjadi landscape atau portrait pada MS Word 2007

Sering sekali kita perlu mengubah page layout satu halaman saja dari dokumen kita di MS Word 2007 ke posisi melebar landscape atau sebaliknya ke posisi memanjang portrait, biasanya kita butuh landscape karena ada tabel yang memanjang - melebar karena kolomnya banyak.
Untuk mengubah seluruh dokumen menjadi menjadi landscape atau portrait bisa dilakukan dengan cara: klik [Page Layout] - [Orientation] - [Landscape]
Mengubah orientasi dokumen ke Landscape / portrait pada MS Word 2007

Untuk mengubah satu halaman saja dari dokumen menjadi landscape dilakukan dengan cara berikut ini:
- pilih / select baris-baris pada halaman yang akan diubah orientasinya ke landscape
- klik [Page Layout] - [Margins] - [Custom Margins]
- klik [Landscape] dan pilih "Selected Text" pada pilihan "Apply to" dan kemudian [OK]

Kustomisasi margin halaman pada MS Word 2007
Page setup: Landscape + Selected Text pada MS Word 2007


(TangSel 31may11)

Thursday, May 26, 2011

Fitur dan efisiensi - irit bahan bakar - bensin Nissan Grand Livina tahun 2011

Nissan melakukan perombakan fitur dan kelengkapan di seri Grand Livina terbarunya. Seri SV yang terbaru pada tahun 2011 telah dilengkapi dengan wiper belakang, CD player MP3 dengan Aux in walau hanya dengan 2 speaker di pintu depan, dan Dvd player dan monitor di bagian tengah atas. Minusnya dibandingkan seri XV adalah kualitas kulit jok, speaker 4 buah, mud guard, dll.
Yang menarik untuk kita tes tentunya adalah efisiensi - irit bahan bakarnya seperti yang diklaim oleh Nissan. Seri Nissan yang dites adalah Grand Livina SV tahun 2011 bulan Mei dengan menggunakan bahan bakar bensin premium (oktan 88).
Sejak mobil diterima sampai dengan posisi odo meter di 861 km seperti pada foto di bawah, telah dilakukan pengisian bensin sebanyak 2 kali @150 ribu rupiah atau sejumlah 2 x 33,3 = 66,6 liter. Efisiensi - irit bahan bakarnya = jarak tempuh / pemakaian bahan bakar = 861 km / 66,6 liter = 12,9 km/liter. Cukup irit untuk pemakaian dalam kota, Jakarta !

Odo meter Nissan Grand Livina 2011 pada posisi 861 km
Pengukuran tersebut dilakukan sejak mobil diterima pada posisi penunjuk tanki bensin yang kira-kira sama dengan saat ini, seperti pada foto di atas. Kondisi jalan yang dilalui adalah kondisi jalan di Jakarta saat macet pagi, siang, malam hari dan sebagian kecil ke daerah Sentul (tol), dengan penyejuk udara AC jalan terus.
Jika menggunakan bahan pakar dengan oktan lebih tinggi seperti pertamax dan shell tentunya efisiensi akan lebih baik karena sesuai dengan kompresi mesin yang menuntut oktan yang di atas 90.
Untuk karakteristik lainnya, mobil keluaran baru ini, menurut saya sama seperti pendahulunya seperti diuraikan juga di http://nisura.blogspot.com/2011/03/pengalaman-merawat-nissan-grand-livina.html


(TangSel 26mei11)

Wednesday, May 25, 2011

Cara menampilkan jumlah total halaman pada MS Word 2007

MS Word 2007 memberikan tampilan grafis GUI yang menarik, tetapi seringkali kita yang terbiasa dengan versi lama kebingungan mencari fungsi/fitur yang icon-nya tidak ditampilkan di layar secara default, misalnya menampilkan jumlah (total)  halaman. Untuk fungsi menampilkan halam ke- telah ditampilkan icon-nya.
MS Word 2007: insert page number
Untuk menampilkan total jumlah halaman pada header/footer dapat dilakukan dengan meletakkan kursor pada posis yang diinginkan pada header/footer lalu [Insert] - [QuickParts] - [Field] - [NumPages], seperti pada gambar berikut
MS Word 2007: insert field
Setelah itu pilih seperti berikut:

Pilih [NumPages]

















(TangSel 25may11)

Monday, May 23, 2011

Cara reset / ganti username password Indosatm2 - IM2 dan topup dengan voucher isi ulang

Berdasarkan pengalaman cara me-reset username password dari Indosatm2 - IM2 hanya bisa dilakukan melalui Call Center Indosatm2 di nomer: 02178546900 / 08041900900. Jangan lupa mempersiapkan nomer Cust. ID (nomer kartu, umumnya sama dengan username), nomer KTP, dan alamat KTP yang sama sewaktu pendaftaran kartu perdana. Setelah data divalidasi oleh operator, mereka akan mereset password dalam hitungan 2-3 menit.

Setelah  proses reset selesai dan password baru dicatat, lakukan login kembali ke https://www.indosatm2.com/ dan klik di [Member Zone Login]
Sebaiknya segera mengganti password tersebut via menu yang disediakan setelah login berhasil.

Jangan lupa untuk menyesuaikan password yang baru ke perangkat mobile yang digunakan, misalnya pada iPad diubah pada menu [Settings] - [Cellular Data] - [APN Settings] - [Password]. Untuk perangkat lain perlu disesuaikan lagi.

Sebenarnya saya baru sadar password ini sewaktu ingin mengisi ulang (topup) pulsa, karena di iPad tidak mungkin melakukan topup via sms. Berikut ini adalah cara topup menggunakan kartu voucher isi ulang IM2 via web.
Masuk ke web: https://register.indosatm2.com/topup/do.refill.php?lang=id
Gunakan username dan password seperti di atas, kemudian masukkan username dan password yang didapat dari voucher isi ulang dan klik pada [Topup Account] seperti di bawah ini.
Topup pulsa IM2 via web
 Username voucher dan Password voucher diperoleh dari kartu voucher isi ulang seperti di bawah.
Voucher isi ulang IM2


(TangSel 23mei2011)

Saturday, May 7, 2011

Menghilangkan data ganda - duplikasi data pada MS Excel dengan Macro

Seringkali kita perlu membuat data yang unik, tidak ada duplikasi atau data ganda, di spreadsheet MS Excel. Jika data belum banyak maka dapat dilakukan dengan cepat secara manual, tetapi akan sangat menyisa waktu bila jumlah data ratusan apalagi ribuan sel.

Berikut ini adalah contoh program macro VB (Visual Basic) yang dapat melakukan tugas pensortiran dan menghilangkan duplikasi data. Cara memasukkan program macro di MS Excel dapat dilihat pada link ini http://nisura.blogspot.com/2011/05/mengatur-supaya-huruf-pertama-kapital.html

List dari macro VB:

Sub Sorting_Unik()
Dim i
ActiveSheet.Range("A:B").Sort Key1:=Cells(1, 1)
Start = True
i = 1
Do While Start
 s = UCase(Cells(i, 1).Value)
 t = UCase(Cells(i + 1, 1).Value)
 If s = t Then
  Duplikat = True
  Do While Duplikat
    Cells(i + 1, 1).Value = ""
    Cells(i + 1, 2).Value = ""
    i = i + 1
    t = UCase(Cells(i + 1, 1).Value)
    If s <> t Then Duplikat = False
  Loop
 End If
 If Cells(i + 2, 1).Value = "" Then Start = False
 i = i + 1
Loop
ActiveSheet.Range("A:B").Sort Key1:=Cells(1, 1)
End Sub


Ide program ini adalah dengan melakukan sorting data terlebih dahulu, kemudian isi sel pertama dibandingkan dengan sel berikutnya, jika tidak sama lanjut sel berikutnya, jika sama data di baris kedua dihapus dan dilalukan looping sampai tidak ada duplikat lagi di baris ketiga ... , kemudian loncat lagi ke sel selanjutnya sampai dengan data di sel terakhir yang dideteksi dengan sel yang kosong atau "". Setelah selesai dilakukan kembali sorting supaya data tersusun dengan rapi, tanpa ada sel yang kosong.



Hasilnya sbb:

Banyak duplikasi (data ganda) ==> data yang unik


(TangSel 6may11)

Monday, May 2, 2011

Cara mengatur supaya huruf pertama menjadi kapital (huruf besar) pada tiap sel MS Excel

Sering sekali kita memerlukan cara cepat supaya huruf pertama pada sejumlah sel di MS Excel adalah huruf besar (kapital), selanjutnya adalah huruf kecil sebagai mana layaknya aturan penulisan. Untuk merubah isi banyak sel secara manual membutuhkan waktu lama, mebosankan dan cenderung menimbulkan kesalahan sampingan.
Otomasi proses ini dapat dilakukan dengan memanfaatkan macro (bahasa Visual Basic) pada MS Execl, seperti diuraikan berikut ini.

1. Pilih sel-sel yan akan dieksekusi, seperti contoh di bawah adalah A1 - A12.


Pilih sel-sel yang akan dieksekusi


2. Klik kanan pada "Sheet1" dan klik pada "View Code" untuk masuk ke Macro-nya.



 3. Masukkan program macro berikut:

Sub SentenceCase()
For Each cell In Selection.Cells
s = cell.Value
Start = True
For i = 1 To Len(s)
ch = Mid(s, i, 1)
Select Case ch
Case "."
Start = True
Case "?"
Start = True
Case "a" To "z"
If Start Then ch = UCase(ch): Start = False
Case "A" To "Z"
If Start Then Start = False Else ch = LCase(ch)
End Select
Mid(s, i, 1) = ch
Next
cell.Value = s
Next
End Sub



Dan kemudian eksekusi macro tersebut dengan klik pada "Run" dan "Run Sub/UserForm F5" atau langsung klik pada ikon gambar panah ke kanan, seperti pada gambar di atas. Kemudian kembali ke spreadsheet dengan mengklik gambar Excel "X" pada pojok kiri atas.
Hasilnya dapat dilihat berikut ini, dimana tulisan sudah rapi dengan huruf pertama huruf besar / kapital sedangkan berikutnya huruf kecil.



Selamat mencoba ...



Referensi: http://uk.answers.yahoo.com/question/index?qid=20080330141648AAzjx8M

(TangSel 1may11)