[belajar-excel] Re: apa yang salah dengan code ini?

Thu, 18 Jul 2013 19:01:11 -0700 

Hehehe,, caranya mudah kok miss Jan,Ini tahapan yang saya
lakukan:Terlebih dahulu file rekaman/video diconvert menjadi format
.gifSetelah itu upload file .gif ke internet.Buka url imagenya, kemudian
lakukan dragging image yang terpampang di browser ke tab browser dari
milis dan taruh di kotak yang digunakan untuk menulis postingan.Selesai
dan siap dikirim, di-preview terlebih dahulu untuk meyakinkannya.
NB:  Namun saat ini Nabble belum dapat menampilkan image yang dihasilkan
dengan cara tersebut.

>semoga bermanfaat
Sambil berharap miss Jan, moderator atau member yang lain ada yang
bersedia membuatkan tutorial yang lebih jelas dan dishared pada file
milis...


--- In belajar-excel@yahoogroups.com, Jan Raisin  wrote:
>
> oot dikit..
>
> pak Anton, tolong ajarin Jan gimana bikin video tampilan seperti di
email
> pak Anton.. insya ALLAH bermanfaat saat Jan berbagi solusi dengan
member
> yang lain..
>
> idem dengan pak Anton.. script berjalan dengan baik di lapie Jan
>
> Salam,
>
> -Miss Jan Raisin-
>
>
>    - Untuk kepentingan belajar bersama, pertanyaan harap ditujukan
*hanya*ke
>    belajar-excel@yahoogroups.com bukan dikirim japri ke email pribadi
>    member milis;
>    - Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
dengan
>    orang-orang yang sabar QS 2:153;
>    - Harap dipahami bersama bahwa solusi diberikan oleh Be-Exceller
yang
>    memiliki waktu untuk on line, mengetahui solusi atas pertanyaan
yang
>    ditanyakan, mau dan berani untuk membantu, tanpa mengharap imbalan
dari
>    Thread Starter (TS) atau Post Starter (PS), selain itu Be-Excelller
juga
>    memiliki kewajiban yang harus dipenuhi di dunia nyata sehingga
tidak selalu
>    bisa on line setiap saat;
>    - Semoga semangat berbagi dan membantu semakin meningkat di
kalangan
>    Be-Exceller dan menjadi amalan yang baik untuk tabungan di akhirat
nanti.
>     اَمِين يَا رَبَÙ`
الÙ'عَالَمِيÙ'ن
>
>
>
> Pada 18 Juli 2013 21.26, summonery summonery@... menulis:
>
> > **
> >
> >
> > Berjalan dengan baik di komputer saya,
> >
> > [image: tes]
> >
> >
> > Coba dilampirkan file dummy-nya... agar sama-sama tau maksud
sebenarnya.
> >
> >
> >
> > --- In belajar-excel@yahoogroups.com, "abdul" wrote:
> > >
> > > Assalamualaikum Suhu Jan
> > >
> > > makasih untuk pencerahannya
> > > tujuan saya pake sub worksheet calculate sebenarnya karena sub
worksheet
> > change ga bisa ke triger apabila pada range tidak dilakukan
perubahan
> > (meskipun dengan data validation) kecuali jika dilakukan manual
(bahkan
> > hanya dobel klik)
> > > semua data di range "B" berubah-ubah otomatis mengikuti list data
> > validation (anggap saja di cell A1)
> > > event prosedurnya baru bisa jalan kalau sub worksheetnya calculate
> > (ketika excel mengkalkulasi atau mengkalkulasi ulang value di cell
manapun)
> > >
> > > saya coba dengan code ini
> > > Private Sub Worksheet_Calculate()
> > > Dim Target As Range
> > >
> > > Set Target = Range("B:B")
> > > For Each isi In Target.Cells
> > > If Not Intersect(Target, Range("B:B")) Is Nothing Then
> > > MsgBox ("test")
> > > End If
> > > Next isi
> > > End Sub
> > > muncul tu msgbox test-nya, tapi begitu code msgbox itu saya ganti
dengan
> > coding autofit (Range("B3:B10").EntireRow.AutoFit) macro ga bisa
> > menjalankan, entirerow.autofit nya
> > >
> > > mungkin suhu bisa membantu saya??? pliiizzzzz (ntar saya kasih
kado
> > deeehh...)
> > >
> > > wasalamualaikum
> > >
> > > --- In belajar-excel@yahoogroups.com, Jan Raisin miss.jan.raisin@
wrote:
> > > >
> > > >
> > > > æóÚóáóíúßõãõ áÃ"óøáÇóãõ
æóÃ`óÍúãóÉõ Çááåö
æóÈóÃ`óßóÇÊõåõ
> > > >
> > > > Mungkin seperti ini:
> > > >
> > > >
> > > > Private Sub Worksheet_Calculate() >> baris ini diganti menjadi
> > > >
> > > > Private Sub Worksheet_Change()
> > > > Dim target As Range >> baris ini dihapus
> > > > Set target = Range("B:B")
> > > > If Not Intersect(target, Range("B:B")) Is Nothing Then
> > > > Range("B3:B10").EntireRow.AutoFit >>> yang ini Jan bingung nih..
> > (nyambung
> > > > ke bawah ya..)
> > > > End If
> > > > End Sub
> > > >
> > > > kalo mau bikin otomatis lebar kolomnya maka pakai script
berikut:
> > > > range("b:b").columns.autofit
> > > >
> > > > tapi kalo yang mau diubah otomatis adalah tinggi barisnya maka
pakai
> > script
> > > > yang ini
> > > > with range("b3:b10")
> > > > .wraptext = true
> > > > .entirerow.autofit
> > > > end with
> > > >
> > > >
> > > > æóÃ"óøáÇóãõ Úóáóíúßõãú
æóÃ`óÍúãóÉõ Çááåö
æóÈóÃ`óßóÇÊõåõ
> > > >
> > > > -Miss Jan Raisin-
> > > >
> > > >
> > > > - Untuk kepentingan belajar bersama, pertanyaan harap ditujukan
> > *hanya*ke
> > > > belajar-excel@yahoogroups.com bukan dikirim japri ke email
pribadi
> > > > member milis;
> > > > - Jika pertanyaan lama direspon, bersabarlah karena ALLAH
beserta
> > dengan
> > > > orang-orang yang sabar QS 2:153;
> > > > - Harap dipahami bersama bahwa solusi diberikan oleh Be-Exceller
yang
> > > > memiliki waktu untuk on line, mengetahui solusi atas pertanyaan
yang
> > > > ditanyakan, mau dan berani untuk membantu, tanpa mengharap
imbalan dari
> > > > Thread Starter (TS) atau Post Starter (PS), selain itu
Be-Excelller
> > juga
> > > > memiliki kewajiban yang harus dipenuhi di dunia nyata sehingga
tidak
> > selalu
> > > > bisa on line setiap saat;
> > > > - Semoga semangat berbagi dan membantu semakin meningkat di
kalangan
> > > > Be-Exceller dan menjadi amalan yang baik untuk tabungan di
akhirat
> > nanti.
> > > > Çóãöíä íóÇ Ã`óÈóø
ÇáúÚóÇáóãöíúä
> > > >
> > > >
> > > >
> > > > Pada 18 Juli 2013 12.44, abdul abduldedysubhansyah@ menulis:
> >
> > > >
> > > > > **
> > > > >
> > > > >
> > > > > Assalamualaikum Wahai Suhu Excel
> > > > >
> > > > > mohon pencerahan
> > > > > saya coba input code ini di macro excel saya
> > > > >
> > > > >
> > > > > Private Sub Worksheet_Calculate()
> > > > > Dim target As Range
> > > > > Set target = Range("B:B")
> > > > > If Not Intersect(target, Range("B:B")) Is Nothing Then
> > > > > Range("B3:B10").EntireRow.AutoFit
> > > > > End If
> > > > > End Sub
> > > > >
> > > > > tapi ga berjalan sebagaimana mestinya (row yang menglami
perubahan
> > value,
> > > > > tidak autofit sendiri)
> > > > >
> > > > > untuk informasi, data di range "B" terupdate lewat lookup yang
di
> > triger
> > > > > oleh data validation
> > > > >
> > > > >
> > > >
> > >
> >
> >
> >
>

Reply via email to