Dear Jokovlo,
asumsi saya nama sheets seragam hanya ada perbedaan number di belakangnya saja
ya,.. (misal sheet1, sheet2, sheet3, dst..)
Sebagai pengganti menuliskan nama sheetsnya secara detil dapat menggunakan trik
sebagai berikut
Sheets("Sheet" & Cells.value ).visible=false
Jadi, pada sheet yang ada tombolnya dibuatkan cells sebagai penampung sheets
berapa yang ingin dihide. Cell tersebut diisi, misal angka 2, maka sheet2 akan
dihide..
Sebagai trik lain, cells.value bisa diganti konstanta lain sesuai kreativitas
Anda,..
Atau jika ingin hide semua sheet sekaligus, misal 1 command untuk hide sheet 1
sampai 98, dapat menggunakan loop
for i = 1 to 98
Sheets("Sheet" & i ).visible=false
next i
semoga membantu,
Hachi
________________________________
Dari: jokovlo <[email protected]>
Kepada: [email protected]
Dikirim: Rabu, 28 Maret 2012 5:52
Judul: Re: Bls: ]] XL-mania [[ Membuat hyperlink antar sheet di excell 2003
Untuk Paruli mungkin nasehat pak Hatchi sudah sangat cocok, ditilik dari 'tidak
adanya pertanyaan lanjutan'.
Tetapi untuk saya (yg punya kasus mirip) kurang cocok, atau cocok tapi
menderita.. karena dlm satu Workbook saya ada 98 sheets.
Untuk menulis makronya menurut saran pak Hachi harus menyebut nama Tab Sheet
secara harafiah (HARD-CODED?) seperti itu, satu persatu??
Mohon dengan sangat pencerahan pak Hatchi, apakah ada cara lain menyembunyikan
N-2 dari N sheets yg ada secara bergantian, tanpa harus menuliskan nama-nama
sheet secara 'harafiah'
Sheets("Nama01").visible = False
Sheets("Nama02").visible = False
Sheets("Nama03").visible = False
dst s/d 96 baris ?
Yg saya maksud "secara bergantian": 98 sheets itu telah dibuat daftar namanya
di suatu range di sheet1, jika salah satu cell (berisi nama sheet) di-klik,
maka sheet yg namanya diklik itu ( + Sheet1) akan VISIBLE, dan 96 sheet lain
akan HIDDEN
Nama-nama Sheets, kecuali sheet1, akan sering berubah, cacah sheets dlm
workbook saya, akan sering berkurang maupun bertambah.
(Mengenai daftar nama sheets tidak saya tanyakan karena saya sudah punya cara
sendiri untuk mendinamiskannya)
best regards,
Jokovlo
--- In [email protected], Hachi Rizki <hachiuz_ld27@...> wrote:
>
> Dear Paruli,..
>
> untuk hide sheet gunakan
> Â Â Â Sheets("Nama").visible = False
>
> untuk memunculkan lagi
> Â Â Â Sheets("Nama").visible = True
>
> untuk memunculkan lagi sheets awal
> Â Â Â Sheets("Awal").select
>
> tinggal masukkan saja kode tersebut ke tombol2 yang diinginkan
>
> semoga membantu,
>
> Hachi
>
>
> ________________________________
> Dari: pharianj <pharianj@...>
> Dikirim: Senin, 19 Maret 2012 18:35
> Â
> Dear XL-mania,
> Mohon bantuannya cara membuat rumusan link antar sheet (hiden sheet)
> dalam satu file di excell 2003, dimana jika diklik linknya maka
> sheet yang terhide akan terbuka, kemudian bila diklik tombol "home"
> (atau sejenisnya) maka sheet tersebut akan terhide kembali dan
> tampilan kembali ke sheet awal.
>
> Mohon bantuannya sangat ya ..
> Thx,
> Paruli@n'H
