Kamis, 15 September 2016

[belajar-excel] Digest Number 3966

8 Messages

Digest #3966
1a
Re: Tes koneksi by "Heru Safrudin" heru.safrudin
3
tanya rumus_hitung penalti by "ribowo ." ribowo25
5a
Trap Error by "Nang Agus"
5b
Re: Trap Error by "Mr. Kid" nmkid.family@ymail.com
5c
Re: Trap Error by "Nang Agus"
5d

Messages

Wed Sep 14, 2016 2:13 am (PDT) . Posted by:

"Heru Safrudin" heru.safrudin

SubhanAllah begitu detail, terima kasih Mr. Kid

Tujuan saya untuk membuat laporan seberapa sering jaringan di tempat kerja saya mengalami masalah, ketika mengakses server.

begitu Mr. Kid

<ymsgr:sendIM?heru.safrudin> Heru SafrudinBISI,Heru Safrudin,YM online

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 14 September 2016 13:28
To: BeExcel
Subject: Re: [belajar-excel] Tes koneksi

Hai Heru,

Bisa.

Untuk apa ya hasil ping nya ?

ya wis lah... untuk apa sajalah...

Asumsi : hasilnya ditulis di kolom A sheet pertama dalam tab sheet di workbook berisi script

Peringatan :
- perhatikan dan bandingkan bagian yang di-biru ya

- yang di-merah sekedar untuk antisipasi kalau nama folder atau nama filenya ada yang pakai spasi atau karakter special tertentu

1. Ping memanfaatkan shell

dim sFile as string, sAddress as string 'info file hasil ping dan url yang di-ping

dim iFile as integer, sLine as string, lLine as long 'variabel kerja baca file hasil ping

thisworkbook.sheets(1).range("a:a").clearcontents 'hapus area penulisan hasil

'init file hasil ping dan url yang di-ping

sfile=thisworkbook.path & "\res.txt" 'hasil ping disimpan di file res.txt di path yang sama dengan workbook

saddress="www.google.com" 'url yang di-ping, bisa juga ip address-nya seperti untuk google bisa 111.95.240.85 (nslookup untuk list ip address sebuah domain)

'perintah ping dengan shell
'-> catatan : jika url-nya timeout, butuh waktu beberapa detik untuk selesaikan proses,
' ping 1 kali saja

shell "cmd /c ping " & sAddress & " -n 1 > """ & sFile & """", vbHide

application.wait now + timevalue("00:00:05")

'baca file hasil ping (file res.txt dalam sFile) dengan open

lline=0 'baris hasil di sheet(1) masih 0

ifile=freefile 'generate nomor file

open sfile for input as ifile 'buka file

do while not eof(ifile) 'loop setiap baris dalam file sampai akhir file

lline=lline+1 'set baris hasil bertambah 1

line input #ifile,sline 'ambil isi sebaris file dan masukkan ke sline

thisworkbook.sheets(1).cells( lline , 1 ).value= "'" & sline 'tulis ke cells hasil

loop

close ifile 'tutup file

kill sfile 'delete file

*** cara 1 ini menggunakan application.wait untuk memastikan bahwa proses oleh baris shell dipastikan telah selesai lebih dulu sebelum mulai membaca isi file hasil

2. ping menggunakan wscript.shell (supaya lebih pasti bahwa proses telah selesai dan siap dibaca filenya)

dim sFile as string, sAddress as string 'info file hasil ping dan url yang di-ping

dim iFile as integer, sLine as string, lLine as long 'variabel kerja baca file hasil ping

dim wsh as object

thisworkbook.sheets(1).range("a:a").clearcontents 'hapus area penulisan hasil

'init file hasil ping dan url yang di-ping

sfile=thisworkbook.path & "\res.txt" 'hasil ping disimpan di file res.txt di path yang sama dengan workbook

saddress="www.google.com" 'url yang di-ping, bisa juga ip address-nya seperti untuk google bisa 111.95.240.85 (nslookup untuk list ip address sebuah domain)

'perintah ping dengan shell

'-> catatan : jika url-nya timeout, butuh waktu beberapa detik untuk selesaikan proses,
' ping 1 kali saja

set wsh=createobject("WScript.Shell")
wsh.run "cmd /c ping " & sAddress & " -n 1 > """ & sFile & """", 0,true

'baca file hasil ping (file res.txt dalam sFile) dengan open

lline=0 'baris hasil di sheet(1) masih 0

ifile=freefile 'generate nomor file

open sfile for input as ifile 'buka file

do while not eof(ifile) 'loop setiap baris dalam file sampai akhir file

lline=lline+1 'set baris hasil bertambah 1

line input #ifile,sline 'ambil isi sebaris file dan masukkan ke sline

thisworkbook.sheets(1).cells( lline , 1 ).value= "'" & sline 'tulis ke cells hasil

loop

close ifile 'tutup file

kill sfile 'delete file

*** cara 2 ini lebih pasti bahwa ketika proses ping telah selesai barulah baca file hasil ping

fyi,
ping menggunakan ICMP dan beberapa url tidak mengijinkan akses dengan ICMP, sehingga akan menghasilkan timeout, padahal jika url dibuka dengan browser tetap akan terbuka alias tidak timeout. Contohnya, website Bank Indonesia di www.bi.go.id

Dengan ping ke www.bi.go.id hasilnya akan timeout, tetapi di browser ditulis url www.bi.go.id, browser akan membuka website Bank Indonesia.

Hal ini disebabkan karena ICMP di-disable oleh server Bank Indonesia, tetapi browser di-Enable.

Jika maskud penggunaan ping untuk mengetahui url dapat diakses atau tidak, maka bisa juga menggunakan cara lainnya, seperti followhyperlink.

Contoh :

A. Pakai followhyperlink (sayangnya, kalau url bisa diakses, akan membuka url terebut di browser)

dim sAddress as string

thisworkbook.sheets(1).range("a:a").clearcontents 'hapus area penulisan hasil

'init url yang di-ping

saddress="www.google.com" 'url yang di-ping, bisa juga ip address-nya seperti untuk google bisa 111.95.240.85 (nslookup untuk list ip address sebuah domain)

'perintah followhyperlink

on error resume next 'trap error

thisworkbook.followhyperlink "http://" & saddress

'tulis status hasil

if err.number<>0 then

err.clear
thisworkbook.sheets(1).cells(1, 1).value = sAddress & " : Request Timeout"

else
thisworkbook.sheets(1).cells(1, 1).value = sAddress & " : OK"

endif

on error goto 0 'kembalikan trap error ke default

B. Pakai xlmHTTP

dim sAddress as string

dim sRes as string, oXML as object 'variabel penyimpan response dan object xmlhttp

thisworkbook.sheets(1).range("a:a").clearcontents 'hapus area penulisan hasil

'init url yang di-ping

saddress="www.google.com" 'url yang di-ping, bisa juga ip address-nya seperti untuk google bisa 111.95.240.85 (nslookup untuk list ip address sebuah domain)

'perintah panggil url

set oxml=createobject("MSXML2.serverXMLHTTP")

oxml.open "GET", "http://" & saddress ,false

oxml.send

sres=oxml.responsetext

'tulis status hasil

if err.number<>0 then

err.clear
thisworkbook.sheets(1).cells(1, 1).value = sAddress & " : Request Timeout"

else
thisworkbook.sheets(1).cells(1, 1).value = sAddress & " : OK"

endif

on error goto 0 'kembalikan trap error ke default

Regards,

Kid

2016-09-14 9:24 GMT+07:00 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:

Dear be Exceller..

Bisakah VBA mendapatkan hasil informasi ping ke dari alamat tertentu

Contoh :

Ping statistics for 123.456.789:

Packets: Sent = 4, Received = 0, Lost = 4 (100% loss)

Mohon pencerahannya

Wed Sep 14, 2016 2:32 am (PDT) . Posted by:

"Toby kenzo" tobykenzo

Hai Roni,
coba kamu click Debug pada pesan tersebut, maka akan tertuju script mana yang bemasalah.
TerimaKasih.

Pada Rabu, 14 September 2016 15:36, "y.roni35@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Saya punya file vba excel ketika digunakan muncul Run Time Eror 75.Kira2 kesalahan yang harus saya perbaiki terletak dmn. makasih
  #yiv5706726880 #yiv5706726880 -- #yiv5706726880ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv5706726880 #yiv5706726880ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv5706726880 #yiv5706726880ygrp-mkp #yiv5706726880hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv5706726880 #yiv5706726880ygrp-mkp #yiv5706726880ads {margin-bottom:10px;}#yiv5706726880 #yiv5706726880ygrp-mkp .yiv5706726880ad {padding:0 0;}#yiv5706726880 #yiv5706726880ygrp-mkp .yiv5706726880ad p {margin:0;}#yiv5706726880 #yiv5706726880ygrp-mkp .yiv5706726880ad a {color:#0000ff;text-decoration:none;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ygrp-lc {font-family:Arial;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ygrp-lc #yiv5706726880hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ygrp-lc .yiv5706726880ad {margin-bottom:10px;padding:0 0;}#yiv5706726880 #yiv5706726880actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv5706726880 #yiv5706726880activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv5706726880 #yiv5706726880activity span {font-weight:700;}#yiv5706726880 #yiv5706726880activity span:first-child {text-transform:uppercase;}#yiv5706726880 #yiv5706726880activity span a {color:#5085b6;text-decoration:none;}#yiv5706726880 #yiv5706726880activity span span {color:#ff7900;}#yiv5706726880 #yiv5706726880activity span .yiv5706726880underline {text-decoration:underline;}#yiv5706726880 .yiv5706726880attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv5706726880 .yiv5706726880attach div a {text-decoration:none;}#yiv5706726880 .yiv5706726880attach img {border:none;padding-right:5px;}#yiv5706726880 .yiv5706726880attach label {display:block;margin-bottom:5px;}#yiv5706726880 .yiv5706726880attach label a {text-decoration:none;}#yiv5706726880 blockquote {margin:0 0 0 4px;}#yiv5706726880 .yiv5706726880bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv5706726880 .yiv5706726880bold a {text-decoration:none;}#yiv5706726880 dd.yiv5706726880last p a {font-family:Verdana;font-weight:700;}#yiv5706726880 dd.yiv5706726880last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv5706726880 dd.yiv5706726880last p span.yiv5706726880yshortcuts {margin-right:0;}#yiv5706726880 div.yiv5706726880attach-table div div a {text-decoration:none;}#yiv5706726880 div.yiv5706726880attach-table {width:400px;}#yiv5706726880 div.yiv5706726880file-title a, #yiv5706726880 div.yiv5706726880file-title a:active, #yiv5706726880 div.yiv5706726880file-title a:hover, #yiv5706726880 div.yiv5706726880file-title a:visited {text-decoration:none;}#yiv5706726880 div.yiv5706726880photo-title a, #yiv5706726880 div.yiv5706726880photo-title a:active, #yiv5706726880 div.yiv5706726880photo-title a:hover, #yiv5706726880 div.yiv5706726880photo-title a:visited {text-decoration:none;}#yiv5706726880 div#yiv5706726880ygrp-mlmsg #yiv5706726880ygrp-msg p a span.yiv5706726880yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv5706726880 .yiv5706726880green {color:#628c2a;}#yiv5706726880 .yiv5706726880MsoNormal {margin:0 0 0 0;}#yiv5706726880 o {font-size:0;}#yiv5706726880 #yiv5706726880photos div {float:left;width:72px;}#yiv5706726880 #yiv5706726880photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv5706726880 #yiv5706726880photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv5706726880 #yiv5706726880reco-category {font-size:77%;}#yiv5706726880 #yiv5706726880reco-desc {font-size:77%;}#yiv5706726880 .yiv5706726880replbq {margin:4px;}#yiv5706726880 #yiv5706726880ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv5706726880 #yiv5706726880ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv5706726880 #yiv5706726880ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv5706726880 #yiv5706726880ygrp-mlmsg select, #yiv5706726880 input, #yiv5706726880 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv5706726880 #yiv5706726880ygrp-mlmsg pre, #yiv5706726880 code {font:115% monospace;}#yiv5706726880 #yiv5706726880ygrp-mlmsg * {line-height:1.22em;}#yiv5706726880 #yiv5706726880ygrp-mlmsg #yiv5706726880logo {padding-bottom:10px;}#yiv5706726880 #yiv5706726880ygrp-msg p a {font-family:Verdana;}#yiv5706726880 #yiv5706726880ygrp-msg p#yiv5706726880attach-count span {color:#1E66AE;font-weight:700;}#yiv5706726880 #yiv5706726880ygrp-reco #yiv5706726880reco-head {color:#ff7900;font-weight:700;}#yiv5706726880 #yiv5706726880ygrp-reco {margin-bottom:20px;padding:0px;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ov li a {font-size:130%;text-decoration:none;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv5706726880 #yiv5706726880ygrp-sponsor #yiv5706726880ov ul {margin:0;padding:0 0 0 8px;}#yiv5706726880 #yiv5706726880ygrp-text {font-family:Georgia;}#yiv5706726880 #yiv5706726880ygrp-text p {margin:0 0 1em 0;}#yiv5706726880 #yiv5706726880ygrp-text tt {font-size:120%;}#yiv5706726880 #yiv5706726880ygrp-vital ul li:last-child {border-right:none !important;}#yiv5706726880

Wed Sep 14, 2016 2:58 am (PDT) . Posted by:

"ribowo ." ribowo25

Selamat Sore  dear Exceller,
mohon dibantu untuk formula penghitungan denda pada list excel terlampir,
Atas bantuannya saya ucapkan banyak terimakasih.

B3B0South Jakarta 

Wed Sep 14, 2016 3:53 am (PDT) . Posted by:

"Walsoyo"

Terimakasih pencerahannya mr. Dengan terpaksa karena alasan wewenang maka
disetiap rumus yg gak sesuai aturan saya pakai sum

Wed Sep 14, 2016 4:49 pm (PDT) . Posted by:

"Nang Agus"

Asalamualaikum warahmatullah

Dear member Belajar Excel

saya membuat sebuah cekrip sederhana untuk menangkap error namun error
tersebut tidak dapat diubah karena hasilnya selalu #VALUE

h = application.worksheetFunction.Find("a",x,1)
if iserror(h) then h = 15

hasil h selalu #VALUE jika a tidak ditemukan
bagaimanakah cekripnya agar h = 15 jika a tidak ditemukan?
terima kasih atas perhatiannya
Wasalamualaikum warahmatullah

Wed Sep 14, 2016 6:57 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

wa'alaikumussalam wr wb

mas Nang,

coba pakai on error resume next

dim h as long, x as string
on error resume next
x="bc"
h=application.worksheetfunction.find("a",x)
if h=0 then
h=15
endif
err.clear
on error goto 0

atau pakai evaluate
dim h as long, x as string
x="bc"
h=evaluate("=iferror( find( *""*a*""* , *""*" & x & "*""* ) ,15)")
'kalau di sebuah cells, sama dengan formula berbunyi : =iferror( find( *"*
a*"* , *"*bc*"* ) , 15 )
'satu bijik petik dua (") disebuah bunyi teks menjadi 2 buah petik dua ("")
di dalam penulisan nilai teks di baris kode
'x="b dan "" c juga d" 'akan membuat x berisi nilai teks berbunyi b dan "
c juga d

Wassalamu'alaikum wr wb
Kid

2016-09-15 6:49 GMT+07:00 Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Asalamualaikum warahmatullah
>
> Dear member Belajar Excel
>
> saya membuat sebuah cekrip sederhana untuk menangkap error namun error
> tersebut tidak dapat diubah karena hasilnya selalu #VALUE
>
> h = application.worksheetFunction.Find("a",x,1)
> if iserror(h) then h = 15
>
> hasil h selalu #VALUE jika a tidak ditemukan
> bagaimanakah cekripnya agar h = 15 jika a tidak ditemukan?
> terima kasih atas perhatiannya
> Wasalamualaikum warahmatullah
>
>
>

Wed Sep 14, 2016 9:03 pm (PDT) . Posted by:

"Nang Agus"

Asalamualaikum warahmatullah.
Terima kasih mas Kid
permasalahan selesai.
Wasalamualaikum warahmatullah.

2016-09-15 8:33 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> wa'alaikumussalam wr wb
>
> mas Nang,
>
> coba pakai on error resume next
>
> dim h as long, x as string
> on error resume next
> x="bc"
> h=application.worksheetfunction.find("a",x)
> if h=0 then
> h=15
> endif
> err.clear
> on error goto 0
>
> atau pakai evaluate
> dim h as long, x as string
> x="bc"
> h=evaluate("=iferror( find( *""*a*""* , *""*" & x & "*""* ) ,15)")
> 'kalau di sebuah cells, sama dengan formula berbunyi : =iferror( find(
> *"*a*"* , *"*bc*"* ) , 15 )
> 'satu bijik petik dua (") disebuah bunyi teks menjadi 2 buah petik dua
> ("") di dalam penulisan nilai teks di baris kode
> 'x="b dan "" c juga d" 'akan membuat x berisi nilai teks berbunyi b dan
> " c juga d
>
> Wassalamu'alaikum wr wb
> Kid
>
>
>
>
>
> 2016-09-15 6:49 GMT+07:00 Nang Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Asalamualaikum warahmatullah
>>
>> Dear member Belajar Excel
>>
>> saya membuat sebuah cekrip sederhana untuk menangkap error namun error
>> tersebut tidak dapat diubah karena hasilnya selalu #VALUE
>>
>> h = application.worksheetFunction.Find("a",x,1)
>> if iserror(h) then h = 15
>>
>> hasil h selalu #VALUE jika a tidak ditemukan
>> bagaimanakah cekripnya agar h = 15 jika a tidak ditemukan?
>> terima kasih atas perhatiannya
>> Wasalamualaikum warahmatullah
>>
>>
>
>

Thu Sep 15, 2016 1:05 am (PDT) . Posted by:

"Fajar Fatahillah" fajar.fatahillah

Dear Master Excel,mohon bantuannya untuk kasus saya,ada dua file/workbook berbeda yang berisi nama-nama costumer,yang ingin saya tanyakan , bagaimana cara menghitung jumlah nama costumer yang sama antara file 1 dan file 2.Terima kasih Best Regards, Fajar Fatahillah 

#yiv9108460622 #yiv9108460622 -- #yiv9108460622ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9108460622 #yiv9108460622ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9108460622 #yiv9108460622ygrp-mkp #yiv9108460622hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv9108460622 #yiv9108460622ygrp-mkp #yiv9108460622ads {margin-bottom:10px;}#yiv9108460622 #yiv9108460622ygrp-mkp .yiv9108460622ad {padding:0 0;}#yiv9108460622 #yiv9108460622ygrp-mkp .yiv9108460622ad p {margin:0;}#yiv9108460622 #yiv9108460622ygrp-mkp .yiv9108460622ad a {color:#0000ff;text-decoration:none;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ygrp-lc {font-family:Arial;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ygrp-lc #yiv9108460622hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ygrp-lc .yiv9108460622ad {margin-bottom:10px;padding:0 0;}#yiv9108460622 #yiv9108460622actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9108460622 #yiv9108460622activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9108460622 #yiv9108460622activity span {font-weight:700;}#yiv9108460622 #yiv9108460622activity span:first-child {text-transform:uppercase;}#yiv9108460622 #yiv9108460622activity span a {color:#5085b6;text-decoration:none;}#yiv9108460622 #yiv9108460622activity span span {color:#ff7900;}#yiv9108460622 #yiv9108460622activity span .yiv9108460622underline {text-decoration:underline;}#yiv9108460622 .yiv9108460622attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv9108460622 .yiv9108460622attach div a {text-decoration:none;}#yiv9108460622 .yiv9108460622attach img {border:none;padding-right:5px;}#yiv9108460622 .yiv9108460622attach label {display:block;margin-bottom:5px;}#yiv9108460622 .yiv9108460622attach label a {text-decoration:none;}#yiv9108460622 blockquote {margin:0 0 0 4px;}#yiv9108460622 .yiv9108460622bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv9108460622 .yiv9108460622bold a {text-decoration:none;}#yiv9108460622 dd.yiv9108460622last p a {font-family:Verdana;font-weight:700;}#yiv9108460622 dd.yiv9108460622last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9108460622 dd.yiv9108460622last p span.yiv9108460622yshortcuts {margin-right:0;}#yiv9108460622 div.yiv9108460622attach-table div div a {text-decoration:none;}#yiv9108460622 div.yiv9108460622attach-table {width:400px;}#yiv9108460622 div.yiv9108460622file-title a, #yiv9108460622 div.yiv9108460622file-title a:active, #yiv9108460622 div.yiv9108460622file-title a:hover, #yiv9108460622 div.yiv9108460622file-title a:visited {text-decoration:none;}#yiv9108460622 div.yiv9108460622photo-title a, #yiv9108460622 div.yiv9108460622photo-title a:active, #yiv9108460622 div.yiv9108460622photo-title a:hover, #yiv9108460622 div.yiv9108460622photo-title a:visited {text-decoration:none;}#yiv9108460622 div#yiv9108460622ygrp-mlmsg #yiv9108460622ygrp-msg p a span.yiv9108460622yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9108460622 .yiv9108460622green {color:#628c2a;}#yiv9108460622 .yiv9108460622MsoNormal {margin:0 0 0 0;}#yiv9108460622 o {font-size:0;}#yiv9108460622 #yiv9108460622photos div {float:left;width:72px;}#yiv9108460622 #yiv9108460622photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv9108460622 #yiv9108460622photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9108460622 #yiv9108460622reco-category {font-size:77%;}#yiv9108460622 #yiv9108460622reco-desc {font-size:77%;}#yiv9108460622 .yiv9108460622replbq {margin:4px;}#yiv9108460622 #yiv9108460622ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv9108460622 #yiv9108460622ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9108460622 #yiv9108460622ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9108460622 #yiv9108460622ygrp-mlmsg select, #yiv9108460622 input, #yiv9108460622 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv9108460622 #yiv9108460622ygrp-mlmsg pre, #yiv9108460622 code {font:115% monospace;}#yiv9108460622 #yiv9108460622ygrp-mlmsg * {line-height:1.22em;}#yiv9108460622 #yiv9108460622ygrp-mlmsg #yiv9108460622logo {padding-bottom:10px;}#yiv9108460622 #yiv9108460622ygrp-msg p a {font-family:Verdana;}#yiv9108460622 #yiv9108460622ygrp-msg p#yiv9108460622attach-count span {color:#1E66AE;font-weight:700;}#yiv9108460622 #yiv9108460622ygrp-reco #yiv9108460622reco-head {color:#ff7900;font-weight:700;}#yiv9108460622 #yiv9108460622ygrp-reco {margin-bottom:20px;padding:0px;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ov li a {font-size:130%;text-decoration:none;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv9108460622 #yiv9108460622ygrp-sponsor #yiv9108460622ov ul {margin:0;padding:0 0 0 8px;}#yiv9108460622 #yiv9108460622ygrp-text {font-family:Georgia;}#yiv9108460622 #yiv9108460622ygrp-text p {margin:0 0 1em 0;}#yiv9108460622 #yiv9108460622ygrp-text tt {font-size:120%;}#yiv9108460622 #yiv9108460622ygrp-vital ul li:last-child {border-right:none !important;}#yiv91084606
============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Tidak ada komentar:

Poskan Komentar