Senin, 23 April 2012

]] XL-mania [[ Digest Number 2373

Messages In This Digest (5 Messages)

Messages

1a.

Re: Memasukkan Data yang di inginkan kedalam Cell tertentu

Posted by: "Loheng Stone" lohengstone@yahoo.com   lohengstone

Sun Apr 22, 2012 7:13 pm (PDT)



menggunakan macro

Sub capruk()
Dim x, y, z As Integer
z = 1
x = 31
Do Until Cells(x, 1) = ""
   If Cells(x, 5) = "Reject" Then
   For y = 1 To 7
     Cells(5 + y, 2 * z) = Cells(x + y - 1, 5)
   Next y
   Cells(5, 2 * z) = Cells(x + 2, 2)
   z = z + 1
   End If
   x = x + 1
Loop
End Sub

Hanya untuk bagian atas saja ... krn rumusnya hampir sama

contoh terlampir

salam

Loheng
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
2a.

Re: jadwal/pemberitahuan tertentu pada monitor

Posted by: "Rara Wilis" ra2wilis@gmail.com   rr_wilis

Sun Apr 22, 2012 7:13 pm (PDT)



Ada beberapa hal yg harus Abah Adul fikirkan dan lakukan sendiri di PC nya.

Suatu program (yg jalan di windows) dapat diatur agar terbuka otomatis
bersamaan
dengan *Proses START-UP Windows*; yaitu dengan menempatkan shortcutnya atau
file-nya di folder Windows StarUp

Di Windows XP ku, folder dimaksud ada di sini:
*C:\Documents and Settings\All Users\Start Menu\Programs\Startup*
Jadi fle excel berisi makro yg berisi "ALARM" tsb harus di tempatkan pada
PATH tsb

VBA - Makronya sendiri hanya menggunakan statement *OnTime* (sudah sering
dijelaskan di milis )
Application.OnTime *JAM_KAPAN_PROGRAM_INGIN_DIJALANKAN*, *"NAMAPROSEDUR"*

Karena di dalam request Abah Adul hanya menyebut *"Tgl Tertentu & Jam
Tertentu",* tanpa
kami diberitahu syarat-nya, maka *Jam_Kapan_Program_Ingin_Dijalankan* dapat
Abah tentukan
sendiri (di cell D5 sheet 'iFace'), isinya terserah, asal berupa data TIME.

Program (Prosedur) akan dijalankan pada saat "JAM TERTENTU" = JAM SAAT INI !
Jika anda mengisi "Jam_Tertentu" yg nilainya sudah lewat, maka Jam Tertentu
akan ditambah 1 hari
(berarati = jam yang sama hari berikutnya).

Di dalam Program itu hanya ada *dua tindakan *:

1.
*Menampilkan pesan text* (biar agak menarik, kita buat Text Jalan / Running
Text "
(ini juga sudah sering dijalaskan di milis ini dan juga di 'toko' sebelah)
http://www.box.com/shared/13oo4lbqrr

2.
*Membunyikan suara *berulang ulang (loop)
Agar pekerjaan menjadi lebih mudah; kita akan menggunakan *MCI
Control* (MCI32.OCX)
Object control ini dapat digunakan untuk membaca dan menyuarakan file
suara, misalnya
WAV, MID.
Anda perlu me REFERENCED Library tsb melalui VBE Menu: Additional Control
ataupun
References

Lihat penjelasan di sini
http://tech.groups.yahoo.com/group/XL-mania/message/7919
http://www.box.com/s/925d9b7a50b9e674dea0

Masih dlm rangka tindakan ke 2, file (file-file) SUARA harus ditempatkan di
FOLDER tententu
(Jangan ditempatkan pada Folder Windows Program StartUp, agar tidak ikut
terbuka otomatis
saat windows StartUp !!)
*Folder Tertentu *itu kita tetapkan saja = "*D:\WAVSound*'
( Dapat anda buat & tentukan sendiri namanya, asal di makronya disesuaikan )

Berhubung WorkBook akan dibuka otomatis (saat Windows Start) maka, tanpa
campur-tangan
anda, saat fille dibuka, *Makronya harus sudah di set ENABLE*
Hal ini dapat diatur dengan setting [Security Macro] pada Excel, si-SET =
ENABLE ALL

[image: Inline image 1]
[image: Inline image 2]

File terlampir : "Alert n Alarm.RAR<http://www.box.com/s/0d477820574f977a78f7>"
dapat diunduh di http://www.box.com/s/0d477820574f977a78f7
File RAR tsb (setelah diurai ) berisi
** File Utama (*.XLSM) untuk ditempatkan di folder Windows StartUp
** File Penjelasan (*.XLSX) dan beberapa (*.WAV) untuk ditempatkan pada
folder D:\WavSound

CMIIW, & mohon koreksi jika ada halhal yg masih urang 'okai"

Smg&Jkt 21 April 2012
Sambil merayakan Hari Kartini
R.A. Wilis

*
On Thu, Apr 19, 2012 at 11:34 PM, abah adul <ero_suhara@yahoo.co.id> wrote:
> mas, tolong dong, saya mohon petunjuk.
> saya pengen banget membuat semacam alarm menggunakan excel yang kluar di
dekstop
> pada hari dan jam tertentu, sukur-sukur klo ada suaranya.
> terimakasih banyak sebelum nya, saya sangat menunggu pencerahannya.*
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
3.

mencari nilai angka dalam suatu kolom

Posted by: "Leanora Marthalova" leanora.marthalova@PROFAB-GROUP.COM

Sun Apr 22, 2012 7:14 pm (PDT)



Dear para XL experts,

Saya newbie di bidang excel, bahkan untuk masalah formula excel baru
sedikit sekali yang saya bisa.

Mohon bantuannya untuk menyelesaikan masalah dalam file terlampir ya...
^_^

Makasih banyak atas bantuannya... semoga para XL experts semua semakin
jaya

Cheers

Lea

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)
4.

pembukuan bengkel sederhana

Posted by: "Aris Widodo" widodoradiator@yahoo.co.id   widodoradiator

Sun Apr 22, 2012 7:17 pm (PDT)



juragan" excel yang baik tolong saya di buatkan rumus untuk pembukuan bengkel. seperti data terlampir. dimana untuk mekanik di berikan 24% dari total biaya service. merunut pada kode di depan nama masing" mekanik. kode 1 untuk 1 mekanik,kode 2 untuk 2 mekanik dan 3 untuk 3 mekanik. kalau mungkin juragan" punya saran untuk pembukuan tersebut lebih efisien kami sangat berterima kasih. dan juga untuk rumus saldonya. atas bantuannya kami ucapkan terimakasih.
Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)
5a.

Re: Mencari Nilai Terbesar dalam suatu Baris-

Posted by: "summonery" summonery@yahoo.com   summonery

Sun Apr 22, 2012 7:18 pm (PDT)



Dear mas paijo iseng,
Terdapat 2 formula LOOKUP yang diajukan:1.
=LOOKUP(MAX(B3:E3),B3:E3,$B$2:$E$2)2.
=LOOKUP(2,1/(B3:E3=MAX(B3:E3)),$B$2:$E$2)
Setuju, bahwa formula pertama berpotensi menimbulkan kesalahan hasil
perhitungan (cek penjelasan saya pada posting sebelumnya ).Masih dengan
LOOKUP, dengan susunan yang berbeda saya mengajukan formula kedua agar
meskipun tidak ascending order namun tetap dapat menghasilkan hasil yang
diharapkan (aturan lainnya berlaku).
Karena balasan posting kebetulan meneruskan posting dari saya,
menjadikan pertanyaan yaitu apakah tanggapan mas paijo termasuk untuk
formula yang saya ajukan (formula kedua)? jika YA, akan menjadi
pengetahuan baru (terutama bagi saya) apabila dapat disertakan bukti
nyata bahwa formula kedua tersebut dapat menimbulkan kesalahan hasil
ketika urutan data tidak ascending order.
Sebelum saya mengirimkan tanggapan atas kasus ini saya sudah mencoba
dengan berbagai varian urutan data dan hasilnya di komputer saya sudah
sesuai dengan harapan. Jika ternyata ada yang terlewat dan formula kedua
berpotensi menimbulkan kesalahan dalam kaitannya dengan urutan data,
sudilah kiranya mas paijo mengirimkan bukti nyata ke milis agar kami
dapat belajar dari bukti tersebut.
-----
+1=HLOOKUP(MAX(B3:E3),IF({1;0},B3:E3,$B$2:$E$2),2,0)

>semoga bermanfaat

--- In XL-mania@yahoogroups.com, Paijo Iseng <paijo.iseng@...> wrote:
>
> Mengingat bahwa data dalam satu baris belum tentu berurutan, atau
bahkan bisa jadi menunjukan arah berurutan besar ke kecil, maka
menggunakan formula "=Lookup" berpotensi menimbulkan kesalahan hasil
perhitungan.
> Sebaiknya menggunakan formula "=MATCH"
>
> Iseng

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)
Recent Activity
Visit Your Group
Check out the

Y! Groups blog

Stay up to speed

on all things Groups!

Yahoo! Groups

Small Business Group

Improve your business

by community exchange

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Delay pada posting disebabkan sibuknya momods dan leletnya        |
| koneksi dengan ind***t. bwakakakaka....
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di :                                            |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
Diposting oleh EXCEL FEED LEARNING di 04.15

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)