2016-04-22
Donald Trump overwhelmingly wins Hispanic vote in New York City
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Paris climate accord creates turbulence for Obama
While crediting the president for leading on the climate issue, environmentalists have been less than effusive in their praise for the accord, framing the deal as more of a good start than a game-changer in reducing carbon dioxide emissions and staving off what they see as a looming global disaster.
“Paris isn’t the end of the story, but a conclusion of a particular chapter,” the climate change group 350.org said in a statement. “Now, it’s up to us to strengthen these promises, make sure they are kept, and then accelerate the transition away from fossil fuels and toward 100% renewable energy.”
The National Resources Defense Council issued a petition Thursday calling on the “Big Five” world powers — the United States, China, India, the European Union and Brazil — to “keep your climate promise.”
Meanwhile, opponents warn that the Paris Agreement’s goals, if met, will result in widespread “energy poverty” with no appreciable impact on temperatures.
“The Paris climate agreement is a bad deal for America. The president’s promise is an unworkable political gesture,” said a statement by Rep. Lamar Smith, Texas Republican and chairman of the House Science, Space and Technology Committee.
“This administration has put ideology ahead of what’s best for hardworking American families.”
The agreement, and Mr. Obama’s promises in implementing it, “will raise electric bills, ration energy and slow economic growth,” Mr. Smith said.
In a video released this week, the Energy & Environmental Legal Institute pointed to aggressive greenhouse gas reductions in Europe that have led to spiking energy bills, forcing low-income residents to choose between “heat or eat.”
“In Germany, electricity has become a luxury good,” said the video, showing headlines from German publications Der Spiegel, Die Welt and Focus. “800,000 homes are unable to pay their electric bills. It’s called the ‘second rent.’”
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Ahok Kaget !
Jakarta - Gubernur DKI Jakarta Basuki Tjahaja Purnama (Ahok)
kaget bukan kepalang saat dia mendapat informasi, ada kano yang masuk
got menyumbat saluran air. "Kemarin bisa ketemu ada kano air, gila apa ini? Kan gila ini ya," kata Ahok dalam rapat soal banjir di Balai Kota, Jl Medan Merdeka Selatan, Jakarta, Jumat (22/4/2016).
Ahok menjelaskan penemuan perahu kano itu saat memerintahkan agar kawasan Jalan Jenderal Gatot Subroto hingga Senayan tak boleh lagi ada genangan. Petugas Pekerja Harian Lepas Dinas Tata Air alias pasukan biru harus mengecek semua saluran air.
"Makanya saya merasa, yang Gatot Subroto-Senayan, saya enggak mau dengar tenggelam. Turunin pasukan biru semua, cek semua saluran," kata Ahok.
Maka Ahok akan segera lapor polisi guna lebih mengamankan situasi. Jangan-jangan memang benar ada kesengajaan menyumbang got, termasuk dengan menaruh perahu kano.
"Sama kayak kano perahu, dimasukin ke saluran got kita. Sudah, lapor polisi saja," kata Ahok.
(dnu/aan)
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Cara reset canon MX397 error code 1702 The ink absorber is almost full
- Matikan printer dengan menekan tombol POWERnya. Jangan cabut kabel power
- Tekan dan Tahan tombol STOP/RESET diikuti dengan menekan Tombol POWER. Jadi kedua tombol posisi tertekan.
- Lepas tombol STOP/RESET tapi jangan lepas tombol POWER.Dalam keadaan tombol POWER masih tertekan, tekan tombol STOP/RESET sebanyak 6 kali.
- Kemudian lepaskan kedua tombol bersamaan, maka printer akan berada dalam kondisi Service Mode.
- Di komputer anda akan mendeteksi hardware baru. Abaikan saja .
Download
service tool yang terbaru v.3400 (buang
tanda centang sebelah tulisan Download with ziddu accelerator and get
recommended offers agar tidak berubah jadi exe )
- Siapkan kertas beberapa lembar di printer
- Jalankan service tool v.3400
- Di menu clear ink counter pilih main black kemudian set printer akan cetak 1 lembar
- Di menu ink absorber counter pilih main colour kemudian set
- Klik eeprom, printer akan cetak 1 lembar ( jika tidak bisa abaikan saja lngsung ke lankah 6 )
- Pilih auto kemudian start print cetak halaman test print tunggu sampai semua menu selesai
- Matikan printer anda lalu hidupkan kembali dan printer anda sudah siap digunakan
Jika tidak
berhasil coba cara manual di bawah gan
1. Matikan
Printer, kabel power dan USB masih tetap terpasang.
2. Tekan tombol Stop/Reset, tahan,
3. Tekan tombol On/Off, tahan
2. Tekan tombol Stop/Reset, tahan,
3. Tekan tombol On/Off, tahan
4. Tekan
tombol Stop/Reset sebanyak dua kali. Pada layarakan ada tulisan "Save
mode".
5.
Selanjutnya tekan lagi tombol "Stop/Reset" 4 kali, "SAVE MODE,
IDLE" tunggu skitar 30 detik
6.
Berikutnya tekan tombol On/Off dua kali, printer akan segera mati.
7. Nyalakan lagi dan silahkan dicoba
7. Nyalakan lagi dan silahkan dicoba
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Cara Membuat Fungsi Input Box Pada Excel
Ada cukup banyak jenis form yang dapat digunakan bersama VBA di Excel, tapi jika yang dimaksud adalah form yang dapat kita buat dengan fleksibel maka itu adalah UserForm.
Artikel berikut akan menunjukkan cara membuat userForm, menambahkan kontrol di atasnya dan memasukkan kode VBA sehingga dapat berinteraksi dengan worksheet Excel 2010.
Menambahkan dan Menyusun Layout Form
- Jalankan aplikasi Microsoft Excel 2010.
- Buat dan simpan worksheet baru dengan nama userform-excel-2010.xlsm.
- Tekan CTRL+F11 untuk membuka Visual Basic Editor. Jika penekanan tombol tersebut tidak berhasil, klik tab menu Developer dan pilih Visual Basic.
- Pada bagian jendela Project Explorer klik kanan pada node VBA Project dan pilih menu Insert diikuti UserForm.
- Akan muncul satu form dengan nama UserForm1. Muncul juga satu dialog Toolbox dimana kita bisa mengambil berbagai kontrol untuk diletakkan pada form, dan terakhir ada panel Properties yang bisa gunakan untuk melakukan konfigurasi form maupun kontrol.
- Pada Properties, rubah nama dari UserForm1 menjadi FormEntri. Pada caption, rubah teks UserForm1 menjadi Form Entri.
- Pada Toolbox, klik kontrol Label.
- Klik salah satu area pada form Anda dan atur penempatan label yang akan segera ditambahkan ke form tersebut. Hasilnya kira-kira terlihat terlihat seperti pada gambar berikut.
- Pada Properties, namakan label tersebut dengan mengisi teks pada bagian Name dengan lblNama dan pada Caption isi dengan teks Nama.
- Klik area pada form untuk memunculkan kembali Toolbox. Tambahkan kontrol Textbox pada form dengan cara seperti pada langkah 7 dan 8.
- Pada Properties, namakan textbox tersebut dengan mengisi txtNama pada bagian Name.
- Klik area pada form untuk memunculkan kembali Toolbox.
- Tambahkan dua kontrol command button pada form. Isi Name untuk masing-masing tersebut dengan btnHapus dan btnTambah. Caption untuk btnHapus diisi dengan teks Hapus, dan untuk btnTambah dengan teks Tambah.
- Tampilan form akhir Anda akan terlihat seperti pada gambar screenshot berikut ini.
- Simpan worksheet Anda dengan menekan tombol CTRL+S.
Menambahkan Kode VBA
- Klik dua kali pada tombol dengan caption Tambah sehingga memunculkan editor dengan teks berikut.
- Tambahkan kode berikut ke dalam fungsi btnTambah_Click().
Dim
rangeSheet1 As Range For i = 1 To
Sheet1.Rows.Count
Set rangeSheet1 = Range(“A” & i) If Len(rangeSheet1.Value) = 0 Then rangeSheet1.Value
= txtNama.Text
Exit For
End If
Next i
- Klik dua kali pada tombol dengan caption Hapus dan tambahkan kode berikut ke dalam fungsi btnHapus_Click().
Dim rangeSheet1 As Range btnTambah.Enabled = False For i = 1 To Sheet1.Rows.Count Set rangeSheet1 = Range("A" & i) If Len(rangeSheet1.Value) > 0 Then If rangeSheet1.Value = txtNama.Text Then rangeSheet1.EntireRow.Delete btnTambah.Enabled = True btnTambah.SetFocus Exit For End If Else Exit For End If Next i
- Simpan worksheet Anda dengan menekan tombol CTRL+S.
Menambahkan Tombol pada Worksheet
- Kembali ke worksheet Anda, tambahkan button control menggunakan menu Insert yang terdapat pada tab Developer.
- Pada dialog Assign Macro yang muncul. Klik tombol New.
- Pada editor yang muncul tambahkan kode berikut pada Button1_Click().
FormEntri.Show
- Pada editor yang muncul tambahkan kode berikut pada Button1_Click().Kembali ke worksheet, klik kanan pada tombol tersebut dan pilih Format Control. Klik tab Properties, dan pilih Don’t move or size with cells. Tekan tombol OK.
- Hasil akhir worksheet Anda akan terlihat kira-kira seperti pada screenshot berikut.
Membuat Aplikasi pada Excel
Posted by admin on January 4th, 2010
Sebagai pengguna maniak Excel,
salah keunggulan yang sangat menonjol yang saya rasakan dari Microsoft Excel
adalah kemampuannya untuk dipadukan dengan Visual Basic For Applications (VBA),
atau biasa disebut Macro. Dengan VBA kita bisa membuat sebuah aplikasi yang
bisa dijalankan pada sebuah file Excel, tanpa harus dicompile. Kita bisa
membuat pengolah database otomatis, bisa membuat aplikasi kalkulator, dan
banyak lagi yang lain. Kalau saya menyebutnya versi mini dari Visual Basic.
Disini kita
hanya akan membahas bagaimana proses membuat aplikasi pada Excel, dan saya
berusaha meyakinkan anda bahwa pemrogroman dengan VBA (Macro) pada excel sangat
simple dan mudah. Penulisan Macro (saya lebih suka menyebut macro) bisa dengan
2 cara, yaitu menulis langsung pada window editor, atau dengan cara Record
Macro.
Record Macro Kita akan melakukan salah satu contoh membuat macro dengan cara merecord. Buka file baru dalam aplikasi Excel, klik menu Tools – Macro – Record New Macro.
Muncul menu “Record macro”, kita bisa memberi nama sendiri macro yang akan direcord, tapi defaultnya Macro1, kita biarkan saja namanya. Klik Ok.
Mulai dari sini, semua proses yang akan dilakukan terhadap file excel tersebut akan direcord oleh Macro Recorder, sampai nanti kita menekan tombol stop. Sekarang kita akan merubah Page Setup dari Portrait menjadi Lanscape.
Klik menu File – Page
Setup – dan pilih Lanscape – Ok. Klik tombol Menu pada menu
tambahan yang muncul pada layar, atau klik menu Tools – Macro – Stop
Recording. Nah kita sudah selesai membuat macro dengan menggunakan Macro
Recorder, sekarang mari kita lihat source codenya.
Pilih menu Tools – Macro – Visual
Basic Editor, maka akan muncul layar baru yang berisi source code dari macro
yang baru saja kita record, yang bernama Sub Macro1(). Anda mungkin
terkejut, bagaimana perintah yang simple itu menghasilkan source yang sangat
panjang. Tapi tenang, inilah memang kelemahan bila menulis macro menggunakan
Macro Recorder, perintah yang seharusnya tidak perlu juga disertakan pada saat
merecord macro.
Mungkin hasil kode yang dihasilkan pada komputer anda seperti ini:Sub Macro1()
With ActiveSheet.PageSetup
.PrintTitleRows = “”
.PrintTitleColumns = “”
End With
ActiveSheet.PageSetup.PrintArea = “”
With ActiveSheet.PageSetup
.LeftHeader = “”
.CenterHeader = “”
.RightHeader = “”
.LeftFooter = “”
.CenterFooter = “”
.RightFooter = “”
.LeftMargin = Application.InchesToPoints(0.75)
.RightMargin = Application.InchesToPoints(0.75)
.TopMargin = Application.InchesToPoints(1)
.BottomMargin = Application.InchesToPoints(1)
.HeaderMargin = Application.InchesToPoints(0.5)
.FooterMargin = Application.InchesToPoints(0.5)
.PrintHeadings = False
.PrintGridlines = False
.PrintComments = xlPrintNoComments
.PrintQuality = 600
.CenterHorizontally = False
.CenterVertically = False
.Orientation = xlLandscape
.Draft = False
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
.BlackAndWhite = False
.Zoom = 100
.PrintErrors = xlPrintErrorsDisplayed
End With
End Sub
Bandingkan, kita bisa menyederhanakan kode diatas menjadi :
Sub Macro1()
With ActiveSheet.PageSetup
.Orientation = xlLandscape
End With
End Sub
So? Masih mau merecord macro? Jangan terburu-buru memutuskan tidak menggunakan Macro Recorder, yang pasti ada gunanya. Saya biasa menggunakannya untuk mencari perintah yang tepat untuk melakukan operasi tertentu, yang mungkin saya lupa perintahnya. Saya record dengan Macro Recorder, dan dibuang perintah yang tidak perlu.
Menulis Sendiri Kode Macro
Cara kedua yang bisa digunakan
adalah dengan menulis sendiri kode macro, keunggulan cara ini pastinya kode
macro bisa dibuat lebih simple, tidak seperti menggunakan Macro Recorder yang
berisi kode yang sangat panjang.
Berikut langkah untuk membuat
macro. Masuk ke File Excel yang baru, dan klik menu Tools – Macro – Visual
Basic Editor, atau cukup tekan tombol Alt + F11. Muncul layar baru, dari layar
tersebut pilih menu Insert – Module, dan akan muncul layar putih disebelah
kanan tempat kita dapat menulis kode macro.
Kopikan kode ini:
Sub
macro_pertama_saya()
Cells(1, 1) = “Percobaan”
Cells(1, 2).Interior.ColorIndex = “30″
End Sub
Cells(1, 1) = “Percobaan”
Cells(1, 2).Interior.ColorIndex = “30″
End Sub
Simpan filenya, dan sekarang kita
akan mencoba menjalankan macro ini.Untuk menjalankan macro, bisa dari layar
Visual Basic Editor, atau bisa juga dari file Excelnya. Kalau dari Visual Basic
Editor, cukup tekan tombol Play, kalau dari windows Excel, pilih menu Tools –
Macro – Macros, dan pilih macro yang akan dijalankan, dalam hal ini nama
macronya adalah “macro_pertama_saya”. Klik Ok, dan macro akan segera
beroperasi. Lihat hasilnya pada layar Excel anda
Bila repot harus menjalankan macro kalau harus klik menu Tools terus, kita
bisa assign macro menjadi tombol. Dari window Excel, insert kotak / shape yang
mana saja, klik kanan pada shape tersebut, dan pilih Assign Macro, pilih macro
yang ingin di assign, Ok. Kita bisa menjalankan macro hanya dengan mengklik
shape tersebut.
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Cara Membuat Read More Otomatis di Blog
Cara membuat Read More otomatis di Blogspot dengan menambahkan kode javascript pada template blog. Kali ini yang akan saya bahas mengenai cara membuat read more di blogspot atau blogger. Kenapa cara membuat read more di wordpress tidak dibahas juga? wah kalao read more di wordpress tidak bisa dibuat secara otomatis, tapi dengan cara manual setiap postingan. Ok kita mulai bahasan mengenai cara membuat read more otomatis di blogspot. Bagaimana Cara membuat Read More otomatis di blogspot? Langkah-langkah cara membuat Read More Otomatis di Blogspot • Login ke Blog anda • Buka halaman design > Edit HTML > centang Expand template widget • Cari kode gunakan CTRL + F untuk mempermudah pencarian • Paste kode berikut tepat dibawah
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
AFTER LIFE
Like walking into a dream, so unlike what you've seen. So unsure but it seems, 'cause we've been waiting for you. Fallen into this place, just giving you a small taste. Of your afterlife here so stay, you'll be back here soon anyway. I see a distant light, but girl this can't be right. Such a surreal place to see so how did this come to be, Arrived too early. And when I think of all the places I just don't belong, I've come to grips with life and realize this is going too far. I don't belong here, we gotta move on dear, escape from this afterlife. 'Cause this time I'm right to move on and on, far away from here. A place of hope and no pain, perfect skies with no rain. Can leave this place but refrain, 'cause we've been waiting for you. Fallen into this place, just giving you a small taste. Of your afterlife here so stay, you'll be back here soon anyway. This peace on earth's not right (with my back against the wall). No pain or sign of time (I'm much too young to fall). So out of place don't wanna stay, I feel wrong and that's my sign. I've made up my mind. Gave me your hand but realize I just wanna say goodbye. Please understand I have to leave and carry on my own life. I don't belong here, I gotta move on dear, escape from this afterlife. 'Cause this time I'm right to move on and on, far away from here. Got nothing against you and surely I'll miss you. This place full of peace and light, and I'd hoped you might, Take me back inside, when the time is right. Loved ones back home all crying 'cause they're already missing me. I pray by the grace of God that there's somebody listening. Give me a chance to be that person I wanna be. (I am unbroken, I'm choking on this ecstasy.) Oh Lord I'll try so hard but you gotta let go of me (Unbreak me, unchain me, I need another chance to live.) I don't belong here, I gotta move on dear, escape from this afterlife. 'Cause this time I'm right to move on and on, far away from here. Got nothing against you and surely I'll miss you. This place full of peace and light, and I'd hoped you might, Take me back inside, when the time is right.
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
RA KARTINI
Raden Adjeng Kartini, lahir di Jepara Jawa
Tengah tanggal 21 April 1879. Atau lebih tepatnya ia dipanggil dengan nama
Raden Ayu Kartini, karena pada dasarnya gelar Raden Adjeng hanya berlaku ketika
belum menikah, sedangkan Raden Ayu adalah gelar untuk wanita bangsawan yang
menikah dengan pria bangsawan dari keturunan generasi kedua hingga ke delapan
dari seorang raja Jawa yang pernah memerintah. Kartini sendiri menikah dengan
bupati Rembang, K.R.M. Adipati Ario Singgih Djojo Adhiningrat pada tanggal 12 November
1903 yang telah mempunyai tiga istri. Dari pernikahannya tersebut ia
dikaruniahi seorang anak perempuan bernama Soesalit Djojoadhiningrat yang lahir
pada tanggal 13 September 1904.
R.A. Kartini lahir dari pasangan Raden Mas
Adipati Ario Sosroningrat yakni bupati Jepara dengan M.A. Ngasirah. Kartini
adalah anak ke-5 dari 11 bersaudara kandung dan tiri. Dan dari kesemua saudara
sekandung, Kartini adalah anak perempuan tertua.
Oleh karena orang tuanya termasuk orang
penting dalam pemerintahan, Kartini sempat diberikan kebebasan untuk mengenyam
pendidikan yang lebih dibandingkan perempuan lainnya. Ia bersekolah di ELS
(Europese Lagere School) walaupun hanya sampai berumur 12 tahun. Disanalah
antara lain Kartini belajar bahasa Belanda.
Dengan keterampilannya berbahasa Belanda,
Kartini mulai belajar sendiri dan menulis surat kepada teman-temannya yang
berasal dari Belanda. Disitulah ia mencurahkan segala unek-uneknya tentang
ketidakadilan yang dirasakannya akan beberapa hal yang ia anggap memojokkan
wanita pada waktu itu.
17 September 1904, Kartini menghembuskan
nafas terakhirnya pada usia 25 tahun. Kartini dimakamkan di Desa Bulu,
Kecamatan Bulu, Rembang
Author: Mohammad
Mohammad is the founder of STC Network which offers Web Services and Online Business Solutions to clients around the globe. Read More →
Subscribe to:
Comments (Atom)












0 komentar:
Jangan Lupa Tinggalkan Komentar Disini