Bls: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis
waduh gimana ini mengakhiri tooltips nya Mr.? he
Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
menulis:
oh begitu
baiklah..
yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja masih
kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan VBA nya
bisa tidak efisien atau terlalu rumit untuk dikembangkan.
Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide
kolom) sudah bisa ya..
Untuk print juga sudah bisa kan ya...
Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan kriteria
tertentu.
Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah blank
(blank tidak sama dengan "" [nullstring])
Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke A1:A10
yang blank.
Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di A1:A10
lebih dulu.
Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).
Bahasa manusia dari prosesnya begini :
"ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke
(goto) cells khusus (special) yang blank (Blanks)"
Cara manual di worksheet-nya begini :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
1. blok cells A1:A10
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih
Blanks -> tekan OK]
> didapatlah cells di A1:A10 yang blank.
Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai kebutuhan,
barulah disusun otomasinya (pakai VBA) :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
bunyi dalam VBA :sheets("Data")
1. blok cells A1:A10
bunyi dalam VBA :range("a1:a10")
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih
Blanks -> tekan OK]
bunyi dalam VBA :specialcells(xlCellTypeBlanks)
Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
"ke sheet yang diproses (misal sheet bernama Data), blok A1:A10, ke
(goto) cells khusus (special) yang blank (Blanks)"
sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
> Biasanya akan ada yang bilang begini :
'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih
xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun begitu'
*** No Offense ***
hmmm... betul juga ya...
maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan
merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips, lalu
asal bunyi dalam mencari alasan..
*** No Offense juga ***
Begini :
kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
Sheets("Data").
toolstip tidak akan muncul.
kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama Sheet1
misalnya, maka tulis begini :
Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang
bunyinya Cells atau Range (pilih yang cocok).
aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi tooltips-nya,
kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti gak bisa pakai
Cells.
Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau
tidak Cells berarti Range, karena cells dengan range merujuk ke isi worksheet
tempat menulis data).
Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik deh
A1:A10 sebagai string.
Jadinya didapat bunyi :
Sheet1.Range("A1:A10")
Begitu ketik karakter titik, muncul lagi tooltipsnya
Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau cari
Special nih
Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto lalu ketik
buka kurung atau spasi yang penting bisa muncul tooltip lagi
loh kok Goto gak ada bunyi pilih-pilih Special nya dalam tooltip milik Goto..
waaah... brarti bukan pakai Goto nih..
Akhirnya coba kemungkinan kedua, yaotu Special
Mulai cari kata special... waaah... gak ada Special, adanya cuma SpecialCells..
Coba sajalah, siapa tahu Goto Special di fitur Excel itu artinya
SpecialCells..
eh kan di bahasa manusianya berbunyi 'ke cells khusus' ya... itukan bahasa
sononya berbunyi Cells Special atau Special Cells.. kayaknya milih SpecialCells
bener dah nih..
dicobalah SpecialCells lalu spasi atau buka kurung asal keluar tooltips..
dicobalah dulu pakai spasi, lalu muncul deh tuh tooltips
waahh... ada bermacam-macam..
butuh yang blank nih, karena cara manualnya trus pilih blank...
dicarilah pilihan yang ada bunyi blank..
yaiy... dapet bunyi xlCellTypeBlanks
Dapet deh bunyi baris
Bls: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis
alhamdulillah sukses Mr. lalu bagaimana cara unhid nya? he
Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
menulis:
oh begitu
baiklah..
yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja masih
kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan VBA nya
bisa tidak efisien atau terlalu rumit untuk dikembangkan.
Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide
kolom) sudah bisa ya..
Untuk print juga sudah bisa kan ya...
Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan kriteria
tertentu.
Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah blank
(blank tidak sama dengan "" [nullstring])
Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke A1:A10
yang blank.
Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di A1:A10
lebih dulu.
Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).
Bahasa manusia dari prosesnya begini :
"ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke
(goto) cells khusus (special) yang blank (Blanks)"
Cara manual di worksheet-nya begini :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
1. blok cells A1:A10
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih
Blanks -> tekan OK]
> didapatlah cells di A1:A10 yang blank.
Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai kebutuhan,
barulah disusun otomasinya (pakai VBA) :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
bunyi dalam VBA :sheets("Data")
1. blok cells A1:A10
bunyi dalam VBA :range("a1:a10")
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih
Blanks -> tekan OK]
bunyi dalam VBA :specialcells(xlCellTypeBlanks)
Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
"ke sheet yang diproses (misal sheet bernama Data), blok A1:A10, ke
(goto) cells khusus (special) yang blank (Blanks)"
sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
> Biasanya akan ada yang bilang begini :
'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih
xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun begitu'
*** No Offense ***
hmmm... betul juga ya...
maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan
merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips, lalu
asal bunyi dalam mencari alasan..
*** No Offense juga ***
Begini :
kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
Sheets("Data").
toolstip tidak akan muncul.
kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama Sheet1
misalnya, maka tulis begini :
Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang
bunyinya Cells atau Range (pilih yang cocok).
aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi tooltips-nya,
kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti gak bisa pakai
Cells.
Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau
tidak Cells berarti Range, karena cells dengan range merujuk ke isi worksheet
tempat menulis data).
Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik deh
A1:A10 sebagai string.
Jadinya didapat bunyi :
Sheet1.Range("A1:A10")
Begitu ketik karakter titik, muncul lagi tooltipsnya
Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau cari
Special nih
Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto lalu ketik
buka kurung atau spasi yang penting bisa muncul tooltip lagi
loh kok Goto gak ada bunyi pilih-pilih Special nya dalam tooltip milik Goto..
waaah... brarti bukan pakai Goto nih..
Akhirnya coba kemungkinan kedua, yaotu Special
Mulai cari kata special... waaah... gak ada Special, adanya cuma SpecialCells..
Coba sajalah, siapa tahu Goto Special di fitur Excel itu artinya
SpecialCells..
eh kan di bahasa manusianya berbunyi 'ke cells khusus' ya... itukan bahasa
sononya berbunyi Cells Special atau Special Cells.. kayaknya milih SpecialCells
bener dah nih..
dicobalah SpecialCells lalu spasi atau buka kurung asal keluar tooltips..
dicobalah dulu pakai spasi, lalu muncul deh tuh tooltips
waahh... ada bermacam-macam..
butuh yang blank nih, karena cara manualnya trus pilih blank...
dicarilah pilihan yang ada bunyi blank..
yaiy... dapet bunyi xlCellTypeBlanks
Dapet deh
