Wanita dan Komputer

Wanita dan komputer ada kesamaan, aku punya 6 kesamaan, coba kalian ?

1. Wanita dan komputer sama menariknya
2. Seperti halnya wanita, komputer juga punya logika internal yang ga dapat dimengerti oleh siapapun, kecuali Penciptanya sendiri.
3. Bahasa baku yang digunakan oleh komputer pun ga pernah bisa dimengerti oleh penggunanya, sama halnya dengan bahasa baku yang digunakan wanita.
4. Pesan notifikasi pada komputer yang bertuliskan 'Bad Command or File Name, persis halnya dengan pesan notifikasi dari wanita yang berarti 'kalo kamu ga tahu ngapain aku marah padamu maka aku pun ga bakal kasi tau kesalahanmu'
5. Kesalahan terkecil yang dibuat sekalipun, akan tersimpan dalam waktu lama di dalam memori internal komputer, persis dengan ingatan wanita.
6. Jika pengguna sudah memiliki komitmen dengan satu komputer maka akan banyak dana yang dikeluarkan untuk membeli aksesoris guna memperindah komputer tersebut, yang ini resiko yang jadi harga mati kan?

Tapi sayang, aku ga sepaham komputer tentang wanita.

FUNGSI TERBILANG PADA EXCEL

Bagi yang sering bekerja dengan Excel tentu sangat membutuhkan fungsi terbilang. Baik, aku akan mendefinisikan sedikit tentang fungsi terbilang, Fungsi Terbilang ialah (macem kek dosen ia :-D) Fungsi yang memudahkan kita untuk menulis nominal angka, biasanya berkaitan dengan nilai uang (catet), Cotonya ketika membuat daftar harga selain nominal angka kadang harus mencantumkan juga nominal dengan huruf misal 10.000 menjadi "Sepuluh ribu", nah kalo daftar harganya banyak tentunya kamu akan kerepotan untuk menuliskannya, jadi dengan Fungsi ini kamu tinggal mengetikan =terbilang(pilih sell).

Caranya:

dari lembar kerja excel kamu tekan Alt+F11 kemudian tekan Insert kemudian Module dari situ akan muncul Module1 nah di Module1 copykan text berwarna biru (semoga engga buta warna) dibawah ini

Public Function Terbilang(x As Currency)
Dim triliun As Currency
Dim milyar As Currency
Dim juta As Currency
Dim ribu As Currency
Dim satu As Currency
Dim sen As Currency
Dim baca As String
If x > 1000000000000# Then
Terbilang = "<>"
Exit Function
End If
'Jika x adalah 0, maka dibaca sebagai 0
If x = 0 Then
baca = angka(0, 1)
Else
'Pisah masing-masing bagian untuk triliun, milyar, juta, ribu, rupiah, dan sen
triliun = Int(x * 0.001 ^ 4)
milyar = Int((x - triliun * 1000 ^ 4) * 0.001 ^ 3)
juta = Int((x - triliun * 1000 ^ 4 - milyar * 1000 ^ 3) / 1000 ^ 2)
ribu = Int((x - triliun * 1000 ^ 4 - milyar * 1000 ^ 3 - juta * 1000 ^ 2) / 1000)
satu = Int(x - triliun * 1000 ^ 4 - milyar * 1000 ^ 3 - juta * 1000 ^ 2 - ribu * 1000)
sen = Int((x - Int(x)) * 100)
'Baca bagian triliun dan ditambah akhiran triliun
If triliun > 0 Then
baca = ratus(triliun, 5) + "triliun "
End If
'Baca bagian milyar dan ditambah akhiran milyar
If milyar > 0 Then
baca = ratus(milyar, 4) + "milyar "
End If
'Baca bagian juta dan ditambah akhiran juta
If juta > 0 Then
baca = baca + ratus(juta, 3) + "juta "
End If
'Baca bagian ribu dan ditambah akhiran ribu
If ribu > 0 Then
baca = baca + ratus(ribu, 2) + "ribu "
End If
'Baca bagian rupiah dan ditambah akhiran rupiah
If satu > 0 Then
baca = baca + ratus(satu, 1)
Else
baca = baca
End If
'Baca bagian sen dan ditambah akhiran sen
If sen > 0 Then
baca = baca + ratus(sen, 0) + "sen"
End If
End If
Terbilang = UCase(Left(baca, 1)) & LCase(Mid(baca, 2))
End Function
Function ratus(x As Currency, Posisi As Integer) As String
Dim a100 As Integer, a10 As Integer, a1 As Integer
Dim baca As String
a100 = Int(x * 0.01)
a10 = Int((x - a100 * 100) * 0.1)
a1 = Int(x - a100 * 100 - a10 * 10)
'Baca Bagian Ratus
If a100 = 1 Then
baca = "Seratus "
Else
If a100 > 0 Then
baca = angka(a100, Posisi) + "ratus "
End If
End If
'Baca Bagian Puluh dan Satuan
If a10 = 1 Then
baca = baca + angka(a10 * 10 + a1, Posisi)
Else
If a10 > 0 Then
baca = baca + angka(a10, Posisi) + "puluh "
End If
If a1 > 0 Then
baca = baca + angka(a1, Posisi)
End If
End If
ratus = baca
End Function
Function angka(x As Integer, Posisi As Integer)
Select Case x
Case 0: angka = "Nol"
Case 1:
If Posisi <= 1 Or Posisi > 2 Then
angka = "Satu "
Else
angka = "Se"
End If
Case 2: angka = "Dua "
Case 3: angka = "Tiga "
Case 4: angka = "Empat "
Case 5: angka = "Lima "
Case 6: angka = "Enam "
Case 7: angka = "Tujuh "
Case 8: angka = "Delapan "
Case 9: angka = "Sembilan "
Case 10: angka = "Sepuluh "
Case 11: angka = "Sebelas "
Case 12: angka = "Duabelas "
Case 13: angka = "Tigabelas "
Case 14: angka = "Empatbelas "
Case 15: angka = "Limabelas "
Case 16: angka = "Enambelas "
Case 17: angka = "Tujuhbelas "
Case 18: angka = "Delapanbelas "
Case 19: angka = "Sembilanbelas "
End Select
End Function

Setelah text diatas tercopy tutup dengan menekan close (tanda X warna merah di sudut kanan atas), selesai

Bagaimana menggunakannya?

Untuk menggunakannya ketik "=Terbilang(pilih sell)" tentunya tanpa tanda petik

conto: pada sell A1 ketik "10000" (tanpa tanda petik) kemudian pada sell B1 ketik "=Terbilang(A1)" (tanpa tanda petik) kemudian Enter, tentunya pada Sell B1 akan tertulis "Sepuluh ribu".

Begitu kira-kira, selamat mencoba dan semoga bermanfaat

TES BUTA WARNA

Kemaren kedatangan temen yang lagi sedih, panggil saja Eko (nama samaran), baru saja Eko ditolak lamaran kerjanya karena ngga lulus tes buta warna, padahal semua tes lainnya lulus dengan nilai sangat bagus, tragis ya... kira-kira begini kalo orang buta warna gambar yang seharusnya seperti di bawah ini tapi telihat seperti di bawah

Kaya gitu kira kira kalo udah buta warna parah. Nah biar ngerti buta warnakah kamu, nih aku punya gambar buat ngetes buta warna, coba lihat yang jeli gambar dibawah

Dari gambar diatas bagi yang engga buta warna pasti menemukan tulisan angka, bagi yang buta warna jangan harap bisa menemukan angka. Ada info sekitar 10 juta pria di Amerika buta warna. Hal itu mencakup sekitar 8% dari populasi pria se-Amerika. Buta warna (disebut juga kekurangan daya penglihatan terhadap warna) hanya berpengaruh kurang dari 1% terhadap wanita. Kebanyakan buta warna itu keturunan. Kasus yang lain disebabkan umur, glaukoma, katarak dan karena pengobatan khusus. Jadi yang merasa cewe bisa sdikit bernapas lega :-D.

Tipe buta warna

1. Kebutaan merah - hijau. Penderita dah pasti ga bisa membedakan antara merah dan hijau. Ini adalah tipe yang umum ditemukan.

2. Kebutaan biru - kuning. Kesulitan membedakan antara biru dan hijau.

3. Kebutaan hijau. Tidak mampu membedakan bagian hijau dari spektrum warna.

4. Ketiadaan penglihatan warna. Hanya melihat hitam, putih dan abu-abu. Kondisi ini sangat jarang.

Terus apa penyebab buta warna ?

Di dalam retina dari masing-masing mata kita ada tiga kerucut. Setiap kerucut bereaksi dengan warna yang berbeda yaitu cahaya - merah, biru atau hijau. Kerusakan sebuah kerucut menyebabkan kebutaan warna ringan. Jika kerucut benar-benar rusak, buta warna menjadi lebih berat.

Bagaimana mengatasi buta warna ?

Bagi yang buta warna harus ikhlas menerimanya, karena tidak ada obat atau operasi untuk menyembuhkan, satu kata bijak buta warna merupakan ciri yang unik dan bukan keterbatasan. Jangan rendah diri, banyak profesi menarik yang engga butuh warna

DAPUR KEHIDUPAN

Posting Motivasi, sebenernya kurang menarik dibanding nyumbang trik ato tips, tapi tak apalah aku cuba.

Ini terdedikasi buat temen baru aku di Friendster, panggil saja Nana, nana punya seruan mayan ngenes, jadi kali aja dengan motivasi yang aku tulis ini bisa jadi obat, ya na ya....... :-)

Aku crita ya.. gini critanya :

Seorang anak gadis mengeluh kepada ibunya tentang sulitnya kehidupan yang harus dia hadapi. Tanpa berkata sepatah kata pun, ibunya mengajak anaknya ke dapur. Si ibu lalu menyiapkan tiga buah panci yang berisi air mendidih.
Panci pertama diisinya dengan wortel, panci kedua diisi telur, dan panci ketiga diisi kopi. Beberapa menit kemudian masing-masing isi panci itu dipindahkan ke mangkuk terpisah. Si ibu lalu meminta putrinya untuk memotong wortel dan telur, serta menghirup aroma kopi.
Gadis itu menemukan bahwa wortel yang tadinya keras telah menjadi lembek, telur yang tadinya cair menjadi keras, sementara bubuk kopi tidak banyak berubah - justru air perebusnya yang berubah menjadi beraroma kopi. “Ibu, apa makna semua ini?” tanya putrinya dengan nada heran.
“Air panas adalah lambang kesulitan hidup, “ kata ibunya.
“Wortel yang dimasukkan ke air panas menjadi lembek, itu melambangkan orang yang menjadi lemah dan menyerah saat didera kesulitan hidup."
"Telur menjadi keras, melambangkan orang yang menghadapi kesulitan hidup dengan keras hati. Ia mungkin berhasil melalui kesulitan hidup, namun dengan menjadi kehilangan kelembutan hati."
"Sedangkan kopi, ia tidak banyak berubah, justru airnya yang berubah menjadi beraroma kopi. Ini melambangkan orang yang mampu mengubah lingkungan. Ia tidak menyerah terhadap kesulitan hidup, justru mengubahnya menjadi sesuatu yang lebih baik - dalam hal ini minuman yang nikmat."
“Pertanyaannya sekarang, jalan mana yang akan kau pilih anakku?” tanya ibunya.
“Apakah engkau akan menjadi lembek dan menyerah, atau engkau akan menjadi keras, atau mungkin engkau akan merubah kesulitan menjadi suatu kemenangan? Semuanya terserah kepadamu karena engkau sendirilah yang menjadi ‘koki’ kehidupanmu,” demikian nasihat ibunya.
Yang lebih menentukan bukanlah seberapa banyak kesulitan yang menimpa seseorang, melainkan bagaimana sikap yang dipilihnya.

Udahan ah, loh kok aku sok dewasa gini?, tak apalah moga diambil manfaatnya aja..., sampe jumpa di blog motivasi yang laen

FORMAT ANGKA DAN TANGGAL DI MAIL MERGE

Format Tanggal atau angka pada saat kamu membuat dokukmen mail merge dengan data source dari file excel kadang format di dokumen tidak sesuai dengan yang kamu inginkan, misalnya angka yang kamu inginkan terformat 1.000.000,00 tapi pada dokumen mail merge tertulis 1000000 tanpa pemisah angka, itu juga terjadi pada format tanggal yang harusnya kamu ingin tampil 11 April 2009 tertulis 04/11/2009. Nah dibawah ini ada cara untuk memformat angka dan tanggal seperti yang kamu inginkan, simak ya

di dokumen mail merge kamu klik kanan Variabel yang akan kamu format , contoh: Variabel pas aku ambil gambarnya adalah Variabel bing kemudian pilih edit field, dari situ muncul menu pop up seperti dibawah ini

kemudian klik Field Codes, akan muncul seperti gambar dibawah

Pada jendela diatas klik Options…, perhatikan gambar dibawah, untuk data-data angka yang akan kamu format menjadi desimal dengan dua digit dibelakang koma, Kemudian kamu ketikan kode \# ##,##

Sedangkan untuk pengaturan tanggal kamu masukan kode \@ “dd MMMM YYYY”

Begitu kira-kira Format Angka dan Tanggal yang diperlukan

Mempercepat Kinerja XP kamu / Speed up your XP

1 .Matikan / Disable Indexing Services

Indexing Services adalah sebuah program kecil tapi pake memory computer mayan besar (nggragaz). Seringnya ngganggu komputer jadi lebih berisik atau berbunyi dalam access harddisk (ngeboteboti). Fungsi Indexing Services melakukan update daftar file komputer, biar nyepetin kinerja PC dengan sistem dari pendaftaran index file, jeleknya itu dilakukan tiap saat, nah... kalo pas kita sibuk misal kerja dengan beberapa aplikasi komputer kita jadi alot bin seret. Kalo kamu engga butuh pencarian file terlalu sering, Indexing Services dapat dimatikan biar kerja komputer ga lemoot getoh, caranya ? lha itu di bawah

Go to Start

klik Settings

klik Control Panel

klik dua kali Add/Remove Programs

klik Add/Remove Window Components

bersihkan centang the Indexing services

klik Next

gampang kan?

2 .Optimise Display Setting dengan menurunkan tingkat gambar

Windows dengan tampilan desktop penuh gambar emang keren, tapi terlalu banyak gambar makan sumber resource system. Jadinya ya lemoot komputermu, Nah kalo mau ga lemot matiin aja. Caranya dibawah noh...

Go to Start

klik kanan My Computer

klik Properties

klik Advanced tab di Performance tab

klik Settings

Hilangkan semua centang kecuali di :

Show shadows under menus

Show shadows under mouse pointer

Show translucent selection rectangle

Use drop shadows for icons labels on the desktop

Use visual styles on windows and buttons

3 .Speedup Folder Browsing atau mempercepat browser folder

Setiap kali membuka browser folder, maka tampak kelambatan atau sedikit delay. Tanya kenapa? karena Windows XP akan cari network file dan printer sementara membuka Windows Explorer. Nah biar langsung jling matiin aja yang kek gitu. Caranya? bentar.... mesti mikir dulu neh.... oh ini dibawah ya

Buka My Computer

klik Tools menu

klik Folder Options

klik the View tab.

hilangkan centang pada Automatically search for network folders and printers

klik Apply

klik Ok

trus hidupin ulang komputermu gih

4 .Perbaiki sistem memory

Pake komputer biasanya kamu kan suka nambah dan hapus file, udah gitu juga kamu suka bongkar pasang aplikasi, apalagi file-file tadi gede (loh kok bejo tahu?, he.. he.. kan bejo dukun). dari perbuatan kamu tadi file-file yang ada di hardisk tidak tertata rapi, kek kamarmu kan? ha.. ha.. ha.... Nah.... yang kaya gitu yang bikin komputer kamu ga semangat kerja jadi lelet. Untuk ngerapiin kamu harus mandi dulu, eh salah.... maaf, kamu harus melakukan defrag dengan Disk Defragmenter caranya? (nanya mulu sih) yaudah takasi tahu noh dibawah

Buka Control Panel

klik Administrative Tools

klik Computer Management

Kamu cari Disk Defragmenter

trus defrag semua Disk Drive

Kalo rapi kan nyaman kerjanya, tul engga? oh iya ada juga Disk Defragmenter kuaran pihak ketiga yang mayan cepet dari bawaan Windows, kalo mau pake dunlud aja misal AusLogics Disk Defrag mau dunlud? aga susahan dikit ya cari aja pake om Google, he... he... soalnya aku lupa linknya

5. Buang gambar pada desktop

Bagian belakang desktop Windows umumnya diberikan gambar sebagai background. Keren sih tapi nambain lelet. Sebaiknya engga digunakan karena akan memperlambat sistem operasi computer. Caranya dibawah

Klik kanan Desktop

kemudian pilih Properties

Pilih Desktop tab In the Background window

pilih None

klik Ok

6. Bersihkan Komputer dari file sampah (junk file)

File-file temporary maupun file-file lain yang ditinggalkan pada saat kerja dengan komputer kalo kebanyakan bisa bikin lelet kerja komputer, kek kebiasaan kamu yang suka buang sampah ke kolong tempat tidur udah gitu males nyapu lama-lama kan jadi banyak juga kalo udah gitu kamar pasti banyak nyamuk kek kata eno lerian "banyak nyamuk dikamarku u u gara-gara kamu u malas bersih-bersih" makanya nyapu biar nyamuk ilang nah kalo komputermu banyak file sampah sapu pake aplikasi sederhana yang udah tak bikin khusus buat kamu. buruan unduh aja disini gratis

Tertipu Virus Komputer

Beberapa waktu lalu saya mendapati komputer teman terkena virus. Virus tadi menyamar jadi file atau folder yang udah ada di data komputer, padahal sebenarnya Virus tadi menyembunyikan folder maupun file dan menggantinya dengan dengan file atau folder berextention dot exe, misal My Document menjadi My Document.exe. Bila dicermati file tersebut (yang berextention .exe) merupakan file virus yang siap jalan bila dibuka. Jadi bila menjumpai kasus tadi sebaiknya file-file aneh yang berextenion .exe jangan pernah dibuka dan segera mungkin menscan dengan anti virus yang kompeten. Tetapi terkadang file explorer terset hiden extention, nah.... kalo dah gitu bakal dibuat repot kita.

Menghindari kasus tadi saya punya triknya neh....

pertama buka Fle Explorer kemudian klik Tools pilih Folder Options dan akan tampil seperti di bawah ini

nah untuk menghindarinya coba dengan mencentang seperti gambar ditunjukan nomer 1, 2 dan 3. Cara tadi dimaksudkan agar Virus yang nyamar jadi file atau folder terlihat sedini mungkin.

Untuk penanganya tetep kita serahkan sama antivirus yang kompeten. Dan kalau setelah discan ternyata filenya hilang (kehiden) bisa di kembalikan dengan cara seperti posting saya sebelum ini.

Ini sekedar pengalaman saya semoga bermanfaat buat yang baca.