Messages In This Digest (24 Messages)

1a.: menyalin file dari suatu folder & membuat hyperlink file tsb dng cep From: yulian nugroho
1b.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng From: STDEV(i)
1c.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng From: STDEV(i)
1d.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng From: Franciscus SOG
1e.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng From: yulian nugroho
1f.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng From: STDEV(i)

2a.: Bls: [belajar-excel] Menghitung bulan From: ghozi alkatiri
2b.: Re: Menghitung bulan From: Budhi Cahyanto
2c.: Bls: [belajar-excel] Menghitung bulan From: ghozi alkatiri
2d.: Re: Menghitung bulan From: Budhi Cahyanto

3a.: Rumus suku bunga From: Gober
3b.: Re: Rumus suku bunga From: STDEV(i)
3c.: Re: Rumus suku bunga From: Gober
3d.: Bls: [belajar-excel] Rumus suku bunga From: ghozi alkatiri
3e.: Re: Rumus suku bunga From: Gober

4a.: Re: Setting Ukuran Kolom dan Baris From: M.Ade Alfarid
4b.: Re: Setting Ukuran Kolom dan Baris From: STDEV(i)
4c.: Re: Setting Ukuran Kolom dan Baris From: M.Ade Alfarid
4d.: Re: Setting Ukuran Kolom dan Baris From: zainul ulum <>
4e.: Re: Setting Ukuran Kolom dan Baris From: M.Ade Alfarid
4f.: Re: Setting Ukuran Kolom dan Baris From: M.Ade Alfarid
4g.: Re: Setting Ukuran Kolom dan Baris From: zainul ulum <>

5a.: Re: Menghapus karakter di belakang Spasi ke 2 From: Ratno Hadi Suswanto
5b.: Re: Menghapus karakter di belakang Spasi ke 2 From: STDEV(i)

View All Topics | Create New Topic

Messages

1a.: menyalin file dari suatu folder & membuat hyperlink file tsb dng cep

Posted by: "yulian nugroho" yuliannug@gmail.com yuliannug

Wed Oct 5, 2011 10:16 pm (PDT)

dear kawan XL

apakah XL memiliki kemampuan untuk
1. menyalin nama file dalam suatu folder
2. membuat hyperlink nama2 tsb dng cara cepat (tidak satu persatu, berulang)

ato aku terlalu berharap banyak padanya ?
dibantu ya ...

terimakaseeh....

YN

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1b.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 10:38 pm (PDT)

file yg akan disalin sudah didaftar namanya (OK)
nama extensi (*.pdf) belum ada infonya (not OKE)
nama folder juga sebaiknya dinyatakan di sheet sebagai info bagi Excel
(belum)

ada satu lagi yg kurang
file berada di suatu FOLDER yg namanya TANYA

akan di salin (dicopy ?) ke mana ke folder lain kan ? *apa PATH-nya *(not
OK)

yg dimaksud dengan patah kira kira spt ini; misalnya

D:\00-sitiVi\0- Tgl-Akses-Milis\_th2010\2010_12(DEC)

setujukan anda denan penambahan oret-oretan spt gambar di bawah ini ??

[image: please minta tambah info.PNG]

kalau Folder ASAL adalah juga folder dimana Workbook berisi makronya
berada, maka Path nya tidak perlu diberitahukan (sudah bisa dicari sendiri
walaupun nama folder diganti-ganti)

2011/10/6 yulian nugroho <yuliannug@gmail.com>

> **
>
> dear kawan XL
> apakah XL memiliki kemampuan untuk
> 1. menyalin nama file dalam suatu folder
> 2. membuat hyperlink nama2 tsb dng cara cepat (tidak satu persatu,
> berulang)
>
> ato aku terlalu berharap banyak padanya ?
> dibantu ya ...
>
> terimakaseeh....
>
> YN
> _
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1c.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 10:54 pm (PDT)

maaf, sudah saya baca lagi dengan HATI
ternyata, yg dimaksud oleh yulian adalah* **MENYALIN NAMA FILE*
yg ada di folder tertentu ke range/cells di sheet excel

saya tadi* salah baca menyalin FILE *(oon amat "guwe.." yak.. )

so, Yulian tidak perlu menjelaskan lagi, tinggal tunggu barangkali ada
members
memberi tanggapan...

2011/10/6 STDEV(i) <setiyowati.devi@gmail.com>

> file yg akan disalin sudah didaftar namanya (OK)
> nama extensi (*.pdf) belum ada infonya (not OKE)
> nama folder juga sebaiknya dinyatakan di sheet sebagai info bagi Excel
> (belum)
>
> ada satu lagi yg kurang
> file berada di suatu FOLDER yg namanya TANYA
> akan di salin (dicopy ?) ke mana ke folder lain kan ? *apa PATH-nya *(not
> OK)
> yg dimaksud dengan patah kira kira spt ini; misalnya
> D:\00-sitiVi\0- Tgl-Akses-Milis\_th2010\2010_12(DEC)
> setujukan anda denan penambahan oret-oretan spt gambar di bawah ini ??
>
> kalau Folder ASAL adalah juga folder dimana Workbook berisi makronya
> berada, maka Path nya tidak perlu diberitahukan (sudah bisa dicari sendiri
> walaupun nama folder diganti-ganti)
>
>
> 2011/10/6 yulian nugroho <yuliannug@gmail.com>
>
>> **
>>
>> dear kawan XL
>> apakah XL memiliki kemampuan untuk
>> 1. menyalin nama file dalam suatu folder
>> 2. membuat hyperlink nama2 tsb dng cara cepat (tidak satu persatu,
>> berulang)
>>
>> ato aku terlalu berharap banyak padanya ?
>> dibantu ya ...
>>
>> terimakaseeh....
>>
>> YN
>> _
>>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1d.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng

Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit

Wed Oct 5, 2011 11:27 pm (PDT)

Dear Yulian,

Excel bisa dan mempunyai kemampuan tersebut. Sangat kebetulan, belum lama
ini saya juga mengerjakan project yang memerlukan coding list file in
folder.

Coding memerlukan Reference : Microsoft Scripting Runtime.
Ditambahkan melalui jendela VBE, Tools > Reference > centang Microsoft
Sripting Runtime.

Coding list file in folder didapat dari sumber yang ada diinternet. (maap
lupa)

Berikut cuplikan coding :

Sub TestListFilesInFolder()
Application.ScreenUpdating = False
Cells.Clear
' add headers
With Range("A1")
.Formula = "Folder contents:"
.Font.Bold = True
.Font.Size = 12
End With
Range("A3").Formula = "File Path:"
Range("B3").Formula = "File Name with extension:"
Range("A3:B3").Font.Bold = True
ListFilesInFolder ThisWorkbook.Path, True
' list all files included subfolders
Call Add_Hyperlink
Application.ScreenUpdating = True
MsgBox "Done"
End Sub

Sub ListFilesInFolder(SourceFolderName As String, IncludeSubfolders As
Boolean)
' lists information about the files in SourceFolder
' example: ListFilesInFolder "C:\FolderName\", True
Dim FSO As Scripting.FileSystemObject
Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder
Dim FileItem As Scripting.File
Dim r As Long
Set FSO = New Scripting.FileSystemObject
Set SourceFolder = FSO.GetFolder(SourceFolderName)
r = Range("A65536").End(xlUp).Row + 1
For Each FileItem In SourceFolder.Files
' display file properties
If FileItem.Name <> ThisWorkbook.Name And FileItem.Name <> "~$" &
ThisWorkbook.Name Then
Cells(r, 1).Formula = FileItem.Path
Cells(r, 2).Formula = FileItem.Name
r = r + 1 '
End If
Next FileItem
If IncludeSubfolders Then
For Each SubFolder In SourceFolder.SubFolders
ListFilesInFolder SubFolder.Path, True
Next SubFolder
End If
Columns("A:H").AutoFit
Set FileItem = Nothing
Set SourceFolder = Nothing
Set FSO = Nothing
ActiveWorkbook.Saved = True
End Sub

Sub Add_Hyperlink()
Dim i As Integer

For i = 4 To ActiveSheet.UsedRange.Rows.Count
Range("B" & i).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Range("A" &
i).Value, TextToDisplay:=Range("B" & i).Value
Next
End Sub

File terlampir sudah menambahan Reference Microsoft Scripting Runtime.

CMIIW

Blessings,

Fran'z

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1e.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng

Posted by: "yulian nugroho" yuliannug@gmail.com yuliannug

Thu Oct 6, 2011 12:27 am (PDT)

makasih pakdhe Frans, dicoba dulu
mbokdhe siti, kumaafkan dirimu dengan segala hormat ;-)

====mod note===========================================
he he bocah wis tekan mancanegara kok ora maleh-maleh..
=======================================================

On Thu, Oct 6, 2011 at 1:27 PM, Franciscus SOG <jclugbu@gmail.com> wrote:

>
> Dear Yulian,
>
> Excel bisa dan mempunyai kemampuan tersebut. Sangat kebetulan, belum lama ini saya juga mengerjakan project yang memerlukan coding list file in folder.
>
> Coding memerlukan Reference : Microsoft Scripting Runtime.
> Ditambahkan melalui jendela VBE, Tools > Reference > centang Microsoft Sripting Runtime.
>
> Coding list file in folder didapat dari sumber yang ada diinternet. (maap lupa)
>
> Berikut cuplikan coding :
>
> Sub TestListFilesInFolder()
> Application.ScreenUpdating = False
> Cells.Clear
> ' add headers
> With Range("A1")
> .Formula = "Folder contents:"
> .Font.Bold = True
> .Font.Size = 12
> End With
> Range("A3").Formula = "File Path:"
> Range("B3").Formula = "File Name with extension:"
> Range("A3:B3").Font.Bold = True
> ListFilesInFolder ThisWorkbook.Path, True
> ' list all files included subfolders
> Call Add_Hyperlink
> Application.ScreenUpdating = True
> MsgBox "Done"
> End Sub
>
> Sub ListFilesInFolder(SourceFolderName As String, IncludeSubfolders As
> Boolean)
> ' lists information about the files in SourceFolder
> ' example: ListFilesInFolder "C:\FolderName\", True
> Dim FSO As Scripting.FileSystemObject
> Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder
> Dim FileItem As Scripting.File
> Dim r As Long
> Set FSO = New Scripting.FileSystemObject
> Set SourceFolder = FSO.GetFolder(SourceFolderName)
> r = Range("A65536").End(xlUp).Row + 1
> For Each FileItem In SourceFolder.Files
> ' display file properties
> If FileItem.Name <> ThisWorkbook.Name And FileItem.Name <> "~$" &
> ThisWorkbook.Name Then
> Cells(r, 1).Formula = FileItem.Path
> Cells(r, 2).Formula = FileItem.Name
> r = r + 1 '
> End If
> Next FileItem
> If IncludeSubfolders Then
> For Each SubFolder In SourceFolder.SubFolders
> ListFilesInFolder SubFolder.Path, True
> Next SubFolder
> End If
> Columns("A:H").AutoFit
> Set FileItem = Nothing
> Set SourceFolder = Nothing
> Set FSO = Nothing
> ActiveWorkbook.Saved = True
> End Sub
>
> Sub Add_Hyperlink()
> Dim i As Integer
>
> For i = 4 To ActiveSheet.UsedRange.Rows.Count
> Range("B" & i).Select
> ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Range("A" &
> i).Value, TextToDisplay:=Range("B" & i).Value
> Next
> End Sub
>
> File terlampir sudah menambahan Reference Microsoft Scripting Runtime.
>
> CMIIW
>
> Blessings,
>
> Fran'z

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1f.: Re: menyalin file dari suatu folder & membuat hyperlink file tsb dng

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Thu Oct 6, 2011 3:19 am (PDT)

Yul..
sebetulnya file ini sudah pernah ditayangkan di milis
tapi aku sendiri sudah lupa-babar-blass kapan, kasus siapa..
yg teringat hanya yg dicari adalah file MP3 (mau di PLAY dari excel dgn
Hyperlinks)

ini makro nya (akan di list di bagian bawah nanti)
yg penting lihat workbook lampiran.
ya mirip mirip lah dengan book kiriman pak franz, lha wong satu guru :
"Perguruan BeExcel" ..

CATATAN KECIL:

file sebaiknya dijadikan satu folder dengan FILES.pdf (atau apapun) yg ingin
di proses.
(proses mendaftar file di suatu folder ke sheet excel, file dipiih /
difilter sesuai Extension
Name nya, sedangkan Extension nya dapat anda tentukan di cell i2 (drop down
list)
Artinya pencari pendaftar dan Hyperlinker file ini tidak hanya terbatas
untuk PDF
tetapi juga untuk extension lain

nama dan lokasi folder bebas...

ADA DUA CARA MENJALANKAN PROSES UNTUK MENENTUKAN FOLDER

[image: hyperlinker interface.GIF]

(1a) Klik Tombol 1 sehingga muncul "Cari di Folder ...."
ini berarti makro akan menggunakan folder dimana book ini di-saved.
(1b) Klik Tombol 2, proses akan dijalankan

(2a) Pilih Folder (Tombol 1 = "Tentukan dulu Foldernya..")
(2a) Klik Tombol 2
* tombol 2 akan memunculkan *DialogBox BrowseFolder* dimana anda dapat
memilih SATU folder diseluruh sistem PC anda.
* setelah Folder dipilih baru proses dijalankan

Public PathDirNm As String

Sub ListFilesNameOfSpecifiedFolder()
'----------------------------------------------------------
' siti Vi / mendaftar NamaFiles dari sebuah folder tertentu,
' ditulis di ActiveSheet's cells
'----------------------------------------------------------
Dim fBrowser As BrowseInfo
Dim szTitle As String
Dim lpIDList As Long
Dim FSO As Object
Dim FOL As Object
Dim ext As String
Dim F As Object
Dim r As Integer

'==== BAGIAN I: Urusan mencari Folder ================
'---- (user pilih folder melalui BrowseInfo)----------
If Not Sheets("Sheet1").FoldTogg Then
szTitle = "©tv: Pilih salah satu Folder yg akan diproses..."
With fBrowser
.hWndOwner = Application.Hwnd
.lpszTitle = lstrcat(szTitle, "")
.ulFlags = BI_RetuOnlyFSDir + BI_NoGoBelowDomain
End With
lpIDList = SHBrowseForFolder(fBrowser)
If (lpIDList) Then
PathDirNm = Space(Max_Path)
SHGetPathFromIDList lpIDList, PathDirNm
PathDirNm = Left(PathDirNm, InStr(PathDirNm, vbNullChar) - 1)
Range("D2") = PathDirNm
End If
Else
Range("D2") = PathDirNm
End If

'==== BAGIAN II: ======================================
'---- Urusan mendaftar fileName ke sheet --------------
On Error GoTo Akhir
Set FSO = CreateObject("Scripting.FileSystemObject")
Set FOL = FSO.GetFolder(PathDirNm).Files
ext = Sheets("Sheet1").Range("i2").Value

' hapus area data
Range("b6").CurrentRegion.ClearContents
Range("c5:g5") = Split("No.\Nama File\Size(KB)\LastModif.\Type", "\")
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
' - kunjungi semua Anggota Koleksi (file)
For Each F In FOL
' memfilter fle sesuai EXT nya
If Mid(F.Name, InStr(1, F.Name, ".", 1) + 1, 5) = ext Then
r = r + 1
With Range("c6")
' nomor urut dan nama file
.Cells(r, 1) = r
.Cells(r, 2) = F.Name
' memberi Hyperlink ---
.Cells(r, 2).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, _
Address:=PathDirNm & "\" & F.Name, TextToDisplay:=F.Name
' attribut lain ---
.Cells(r, 3) = F.Size / 1024
.Cells(r, 4) = F.datelastModified
.Cells(r, 5) = F.Type
End With
End If
Next

Akhir:
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Range("A5").Activate
End Sub

di Module sheet ada beberapa makro ecek-ecek yg tugasanya
hanya mengatur-atur tombol

~siti markonah

2011/10/6 yulian nugroho <yuliannug@gmail.com>

> **
>
> dear kawan XL
> apakah XL memiliki kemampuan untuk
> 1. menyalin nama file dalam suatu folder
> 2. membuat hyperlink nama2 tsb dng cara cepat (tidak satu persatu,
> berulang)
> ato aku terlalu berharap banyak padanya ?
> dibantu ya ...
>
> terimakaseeh....
>
> YN
>
>

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

2a.: Bls: [belajar-excel] Menghitung bulan

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Wed Oct 5, 2011 10:24 pm (PDT)

untuk mendapatkan hasil 4 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1
formulanya

=EDATE(A1;4)-1

hasilnya 5 Pebruari 2012

untuk mendapatkan hasil 9 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1
=EDATE(A1;9)-1
hasilnya
5 Juli 2011

silahkan dicoba

wassalam

Ghozi Alkatiri

________________________________
Dari: Budhi Cahyanto <budhi.cahyanto@id.certissecurity.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 6 Oktober 2011 11:15
Judul: [belajar-excel] Menghitung bulan

Dear Excel,

Jika saat ini
(katakan kolom A) tanggal 6 Oct 2011, dan saya ingin mendapatkan tanggal (dikurang
1 hari) dan bulan pada 4 bulan ke depan atau 9 bulan ke depan (katakan pada
kolom B),
jadi kalau
dimasukan rumus 4 bulan ke depan, hasilnya : 5 Feb 2012 (kolom B) atau 9 bulan
ke depan, hasilnya : 5 Jul 2012. Dan tanggal dimundurkan 1 hari dari tanggal
yang ada di kolom A tersebut.

Bagaimana formulasinya
?

Rgrds,
Budhi

P Please consider the environment before printing
this email.

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)
2b.: Re: Menghitung bulan

Posted by: "Budhi Cahyanto" budhi.cahyanto@id.certissecurity.com

Thu Oct 6, 2011 3:21 am (PDT)

Pak Ghozi,

Saya coba menggunakan formula "EDATE", tapi kok hasilnya #NAME?
Kenapa yach ?

=======mod note =========================
coba aktifkan Add-In 'Analysis Tool Pak '
=========================================

From: belajar-excel@yahoogroups.com
On Behalf Of ghozi alkatiri
Sent: Thursday, October 06, 2011 12:25 PM
To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] Menghitung bulan

untuk mendapatkan hasil 4 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1
formulanya

=EDATE(A1;4)-1

hasilnya 5 Pebruari 2012

untuk mendapatkan hasil 9 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1

=EDATE(A1;9)-1

hasilnya 5 Juli 2011

silahkan dicoba

wassalam
Ghozi Alkatiri

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)
2c.: Bls: [belajar-excel] Menghitung bulan

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Thu Oct 6, 2011 3:30 am (PDT)

mungkin bapak menggunakan excel 2003 karena fungsi ini baru bisa digunakan di excel 2007 atau turuti anjuran moderator pada note di bawah.

wassalam

Ghozi Alkatiri

________________________________
Dari: Budhi Cahyanto <budhi.cahyanto@id.certissecurity.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 6 Oktober 2011 17:21
Judul: RE: [belajar-excel] Menghitung bulan

Pak Ghozi,

Saya coba menggunakan formula "EDATE", tapi kok hasilnya #NAME?
Kenapa yach ?

=======mod note =========================
coba aktifkan Add-In 'Analysis Tool Pak '
=========================================

From: belajar-excel@yahoogroups.com
On Behalf Of ghozi alkatiri
Sent: Thursday, October 06, 2011 12:25 PM
To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] Menghitung bulan

untuk mendapatkan hasil 4 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1
formulanya

=EDATE(A1;4)-1

hasilnya 5 Pebruari 2012

untuk mendapatkan hasil 9 bulan ke depan dikurangi satu hari dari tanggal 6 Oct 2011 di A1

=EDATE(A1;9)-1

hasilnya 5 Juli 2011

silahkan dicoba

wassalam
Ghozi Alkatiri

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)
2d.: Re: Menghitung bulan

Posted by: "Budhi Cahyanto" budhi.cahyanto@id.certissecurity.com

Thu Oct 6, 2011 3:32 am (PDT)

Thanks mba' Siti

Warm Regards,

Budhi Cahyanto

From: belajar-excel@yahoogroups.com
On Behalf Of STDEV(i)
Sent: Thursday, October 06, 2011 12:04 PM

oops salah !!
=DATE(YEAR(A1), MONTH(A1)+7, DAY(A1)-4)

2011/10/6 STDEV(i) <setiyowati.devi@gmail.com>
ringkasnya
tanggal di A1 ingin Maju 7 bulan mundur 4 hari
=DATE(YEAR(A1), MONTH(A1)+7, DAY(A4)-4)

'gitu kaleee...

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

3a.: Rumus suku bunga

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Wed Oct 5, 2011 10:45 pm (PDT)

Hi,

Mau Tanya nih. saudara2 pasti sudah tau jika kita ingin membayar kartu
kredit melalui pihak ketiga / nitip..

Saya sudah buat contohnya...
Apakah bisa dirapihkan?

Thanks, file terlampir..

Salam,
gober

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
3b.: Re: Rumus suku bunga

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 11:07 pm (PDT)

alangkah sulitnya menterjemahkan "DIRAPIHKAN"
karena setiap orang punya tujuan yg berbeda dengan satu KATA tsb.
jadi saya kira penanggap perlu dipermudah dengan diberi pernjelasan

kalau saya, saat ini, menterjemahkan "rapih" untuk kolom A misalnya,
( hanyalah soal formatting saja, materi dan rumus tidak saya lihat.)
seperti gambar berikut ini

[image: kolom A dirapihkan.PNG]

2011/10/6 Gober <gober.mirc@gmail.com>

> **
>
> Hi,
> Mau Tanya nih. saudara2 pasti sudah tau jika kita ingin membayar kartu
> kredit melalui pihak ketiga / nitip..
> Saya sudah buat contohnya...
> * Apakah bisa dirapihkan?*
> Thanks, file terlampir..
> Salam,
> gober
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
3c.: Re: Rumus suku bunga

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Wed Oct 5, 2011 11:59 pm (PDT)

Iya maaf mbak Siti kl ada pemahaman yang kurang kelas…

Bagaimana rumus yang untuk merapihkan kolom A tersebut? Dan bagaimana rumus E2 secara otomatis terhitung lama cicilannya…
Thanks
gober

From: belajar-excel@yahoogroups.com On Behalf Of STDEV(i)
Sent: 06 October, 2011 1:07 PM

alangkah sulitnya menterjemahkan "DIRAPIHKAN"
karena setiap orang punya tujuan yg berbeda dengan satu KATA tsb.
jadi saya kira penanggap perlu dipermudah dengan diberi pernjelasan
kalau saya, saat ini, menterjemahkan "rapih" untuk kolom A misalnya,
( hanyalah soal formatting saja, materi dan rumus tidak saya lihat.)
seperti gambar berikut ini

2011/10/6 Gober <gober.mirc@gmail.com>
Hi,
Mau Tanya nih. saudara2 pasti sudah tau jika kita ingin membayar kartu kredit melalui pihak ketiga / nitip..
Saya sudah buat contohnya...
Apakah bisa dirapihkan?
Thanks, file terlampir..
Salam,
gober

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
3d.: Bls: [belajar-excel] Rumus suku bunga

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Thu Oct 6, 2011 1:48 am (PDT)

rumus untuk menghitung lama cicilan pada E2

=ROUNDUP(B4/E1;0)&" "&"bulan"

wassalam

Ghozi Alkatiri

________________________________
Dari: Gober <gober.mirc@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 6 Oktober 2011 13:39
Judul: RE: [belajar-excel] Rumus suku bunga

Iya maaf mbak Siti kl ada pemahaman yang kurang kelas…

Bagaimana rumus yang untuk merapihkan kolom A tersebut? Dan bagaimana rumus E2 secara otomatis terhitung lama cicilannya…
Thanks
gober

From: belajar-excel@yahoogroups.com On Behalf Of STDEV(i)
Sent: 06 October, 2011 1:07 PM

alangkah sulitnya menterjemahkan "DIRAPIHKAN"
karena setiap orang punya tujuan yg berbeda dengan satu KATA tsb.
jadi saya kira penanggap perlu dipermudah dengan diberi pernjelasan
kalau saya, saat ini, menterjemahkan "rapih" untuk kolom A misalnya,
( hanyalah soal formatting saja, materi dan rumus tidak saya lihat.)
seperti gambar berikut ini

2011/10/6 Gober <gober.mirc@gmail.com>
Hi,
Mau Tanya nih. saudara2 pasti sudah tau jika kita ingin membayar kartu kredit melalui pihak ketiga / nitip..
Saya sudah buat contohnya...
Apakah bisa dirapihkan?
Thanks, file terlampir..
Salam,
gober

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
3e.: Re: Rumus suku bunga

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Thu Oct 6, 2011 4:58 am (PDT)

Hi Ghozi,

Kok ga bisa yah… muncul error http://uploadpic.org/storage/2011/iZzWprySjvc2vHbzOa9DHxth.png

Bisa tidak lama cicilannya itu berdasarkan sisa tagihannya, bukan berdasarkan titip bayar Rp.1.000.000

Thanks
gober

==catatan Mods==================================
perhatikan tanda pemisah argument
setting komputer pak Ghozi ; (semi colon)
mungkin di pc anda = , (koma)
kalau argument seperatornya di pc paman gober
= KOMA), rumusnya hanya perlu edit sedikittts

=ROUNDUP( B4 / E1, 0) & " " & "bulan"

================================================

From: belajar-excel@yahoogroups.com
On Behalf Of ghozi alkatiri
Sent: 06 October, 2011 3:48 PM

rumus untuk menghitung lama cicilan pada E2
=ROUNDUP(B4/E1;0)&" "&"bulan"

wassalam
Ghozi Alkatiri

2011/10/6 Gober <gober.mirc@gmail.com <mailto:gober.mirc%40gmail.com> Hi,
Mau Tanya nih. saudara2 pasti sudah tau jika kita ingin membayar kartu kredit melalui pihak ketiga / nitip..
Saya sudah buat contohnya...
Apakah bisa dirapihkan?
Thanks, file terlampir..
Salam,
gober

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

4a.: Re: Setting Ukuran Kolom dan Baris

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Wed Oct 5, 2011 11:03 pm (PDT)

Langkah 1 : sudah
Langkah 2 : sudah
Langkah 3 : sudah
Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan atau
harus dibuka terlebih dahulu VBA nya?

On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com>
wrote:

> sebentar....
> tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
> Proses apa saja yg telah pak Ade Lakukan ?
>
> *mungkin kah spt ini ?*
>
> 1. membuat suatu otomasi dengan makro di suatu workbook
> (seperti apa makronya) ?
> 2. menSave workbook tsb sebagai Add-In (xla / xlam)
> 3. mengaktifkan Add in tersebut
> * di excel 2003 : menu Tools > Add In >
> muncul dialogbox datar Addin,
> aktifkan (beri contreng checkboxnya)
> * di excel 2007 mmirip tetapi add in di akses melalui
> Excel Options > Advanced
>
> setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
> bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
> semua workbook lain yg sedang dibuka
>
> CMIIW...
>
>
>
> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id>
>
>> **
>>
>> *Saya sudah add-in*, tapi kalau buka Workbook baru bagaimana cara
>> panggilnya?
>> add-in sudah aktif tp kok gak muncul ya master?
>>
>> Ade
>>
>>
>> On Thu, 06 Oct 2011 11:16:32 +0700, M.Ade Alfarid <QA@kkmi.co.id> wrote:
>>
>> > Apakah ukurannya jika diinput 10 maka itu adalah 10mm?
>> >
>> > On Thu, 06 Oct 2011 10:26:13 +0700, STDEV(i)
>> <setiyowati.devi@gmail.com>
>> > wrote:
>> >
>> >> Di Mr Excel pernah ada yg menjelaskan
>> >>
>> >> link: http://www.mrexcel.com/tip071.shtml
>> >>
>> >> barangkali ada gunanya...
>>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4b.: Re: Setting Ukuran Kolom dan Baris

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 11:30 pm (PDT)

makro tsb di dalam workbook (sebelum di jadikan add-in)
seperti apa perilakunya; bagaimana menjalankannya ?

Jika makro ditulis dlam Procedure Function, menjalannkannya
dengan menulis fungsi tsb di sheet
misalnya
=Terbilang(A1)

Kalau makro yg ditulis sebagai Prosedur SUB
menjalankannya dengan memanggil namanya
atau, dengan memberi Tombol (Command button) di mana command button
memangggil nama Prosedur Sub tsb

Bisa juga dengan meng-Assign suatu drawing object untk memanggil
makro tsb
atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
misalnya klik kanan suatu cell. (makro spt ini ditils didalam
Prosedur Event)

Paling mudah menjalankan makro
pencet Alt + F8 > muncul dialogBox nama-nama makro
Pilih nama makronya > Klik tombol RUN

Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
lain yg sedang aktaif)

Jadi jawaban masih mengambang karena si penjawab tidak melihat
(tidak diberi kesempatan membuka workbook yg berisi) makro nya

cmiiw
sambil menunggu tanggapan dari members lain
dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
(Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)

2011/10/6 M.Ade Alfarid <QA@kkmi.co.id>

> Langkah 1 : sudah
> Langkah 2 : sudah
> Langkah 3 : sudah
> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan atau
> harus dibuka terlebih dahulu VBA nya?
>
>
> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com>
> wrote:
>
> > sebentar....
> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
> > Proses apa saja yg telah pak Ade Lakukan ?
> >
> > *mungkin kah spt ini ?*
> >
> > 1. membuat suatu otomasi dengan makro di suatu workbook
> > (seperti apa makronya) ?
> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
> > 3. mengaktifkan Add in tersebut
> > * di excel 2003 : menu Tools > Add In >
> > muncul dialogbox datar Addin,
> > aktifkan (beri contreng checkboxnya)
> > * di excel 2007 mmirip tetapi add in di akses melalui
> > Excel Options > Advanced
> >
> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
> > semua workbook lain yg sedang dibuka
> >
> > CMIIW...
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4c.: Re: Setting Ukuran Kolom dan Baris

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 1:33 am (PDT)

Ohh maaf mbak,
begini saya ,membuka workbook baru.
kemudian saya ingin setting semua cellnya berukuran sama,
sama disini maksudnya ukuran lebar dan kolom sama (bujursangkar)(cuma ini
saja mbak)
Macro dari Mr Kid sudah OK.
Namun karena g mudeng dgn macro saya coba code dari web atas saran mbak
siti.
Kemudian dicopy ke VBA disave jadiin Add-in.
Nah jika workbook yg baru dibuka,
add-in nya ada, tapi menjalankannya macronya buka VBA dulu baru run.
saya ingin semacam shortcut atau Alt+F8.
Mungkin ada yang kurang di codenya (saya g begitu paham).

Jadi, buka workbook ,pencet macro atau shortcut,setting size
row.column,finish.

NB : Worksheetnya memang kosong karena yg diinginkan hanya setting row dan
baris

Ade

On Thu, 06 Oct 2011 13:29:42 +0700, STDEV(i) <setiyowati.devi@gmail.com>
wrote:

> makro tsb di dalam workbook (sebelum di jadikan add-in)
> seperti apa perilakunya; bagaimana menjalankannya ?
>
> Jika makro ditulis dlam Procedure Function, menjalannkannya
> dengan menulis fungsi tsb di sheet
> misalnya
> =Terbilang(A1)
>
> Kalau makro yg ditulis sebagai Prosedur SUB
> menjalankannya dengan memanggil namanya
> atau, dengan memberi Tombol (Command button) di mana command button
> memangggil nama Prosedur Sub tsb
>
> Bisa juga dengan meng-Assign suatu drawing object untk memanggil
> makro tsb
> atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
> selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
> misalnya klik kanan suatu cell. (makro spt ini ditils didalam
> Prosedur Event)
>
> Paling mudah menjalankan makro
> pencet Alt + F8 > muncul dialogBox nama-nama makro
> Pilih nama makronya > Klik tombol RUN
>
> Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
> sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
> lain yg sedang aktaif)
>
> Jadi jawaban masih mengambang karena si penjawab tidak melihat
> (tidak diberi kesempatan membuka workbook yg berisi) makro nya
>
> cmiiw
> sambil menunggu tanggapan dari members lain
> dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
> (Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)
>
>
>
> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id>
>
>> Langkah 1 : sudah
>> Langkah 2 : sudah
>> Langkah 3 : sudah
>> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan
>> atau
>> harus dibuka terlebih dahulu VBA nya?
>>
>>
>> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com>
>> wrote:
>>
>> > sebentar....
>> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
>> > Proses apa saja yg telah pak Ade Lakukan ?
>> >
>> > *mungkin kah spt ini ?*
>> >
>> > 1. membuat suatu otomasi dengan makro di suatu workbook
>> > (seperti apa makronya) ?
>> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
>> > 3. mengaktifkan Add in tersebut
>> > * di excel 2003 : menu Tools > Add In >
>> > muncul dialogbox datar Addin,
>> > aktifkan (beri contreng checkboxnya)
>> > * di excel 2007 mmirip tetapi add in di akses melalui
>> > Excel Options > Advanced
>> >
>> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
>> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
>> > semua workbook lain yg sedang dibuka
>> >
>> > CMIIW...
>>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4d.: Re: Setting Ukuran Kolom dan Baris

Posted by: "zainul ulum <>" zainul_ulum@yahoo.com zainul_ulum

Thu Oct 6, 2011 1:45 am (PDT)

Tambahkan code di file settingsquarecell.xlam

Sub Auto_Open()

MakeSquareCells2

End Sub

Simpan filenya.

1. Buka file excel baru

2. buka file settingsquarecell.xlam

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of M.Ade Alfarid
Sent: Thursday, October 06, 2011 3:36 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Setting Ukuran Kolom dan Baris

Ohh maaf mbak,
begini saya ,membuka workbook baru.
kemudian saya ingin setting semua cellnya berukuran sama,
sama disini maksudnya ukuran lebar dan kolom sama (bujursangkar)(cuma ini
saja mbak)
Macro dari Mr Kid sudah OK.
Namun karena g mudeng dgn macro saya coba code dari web atas saran mbak
siti.
Kemudian dicopy ke VBA disave jadiin Add-in.
Nah jika workbook yg baru dibuka,
add-in nya ada, tapi menjalankannya macronya buka VBA dulu baru run.
saya ingin semacam shortcut atau Alt+F8.
Mungkin ada yang kurang di codenya (saya g begitu paham).

Jadi, buka workbook ,pencet macro atau shortcut,setting size
row.column,finish.

NB : Worksheetnya memang kosong karena yg diinginkan hanya setting row dan
baris

Ade

On Thu, 06 Oct 2011 13:29:42 +0700, STDEV(i) <setiyowati.devi@gmail.com
<mailto:setiyowati.devi%40gmail.com> >
wrote:

> makro tsb di dalam workbook (sebelum di jadikan add-in)
> seperti apa perilakunya; bagaimana menjalankannya ?
>
> Jika makro ditulis dlam Procedure Function, menjalannkannya
> dengan menulis fungsi tsb di sheet
> misalnya
> =Terbilang(A1)
>
> Kalau makro yg ditulis sebagai Prosedur SUB
> menjalankannya dengan memanggil namanya
> atau, dengan memberi Tombol (Command button) di mana command button
> memangggil nama Prosedur Sub tsb
>
> Bisa juga dengan meng-Assign suatu drawing object untk memanggil
> makro tsb
> atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
> selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
> misalnya klik kanan suatu cell. (makro spt ini ditils didalam
> Prosedur Event)
>
> Paling mudah menjalankan makro
> pencet Alt + F8 > muncul dialogBox nama-nama makro
> Pilih nama makronya > Klik tombol RUN
>
> Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
> sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
> lain yg sedang aktaif)
>
> Jadi jawaban masih mengambang karena si penjawab tidak melihat
> (tidak diberi kesempatan membuka workbook yg berisi) makro nya
>
> cmiiw
> sambil menunggu tanggapan dari members lain
> dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
> (Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)
>
>
>
> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id <mailto:QA%40kkmi.co.id> >
>
>> Langkah 1 : sudah
>> Langkah 2 : sudah
>> Langkah 3 : sudah
>> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan
>> atau
>> harus dibuka terlebih dahulu VBA nya?
>>
>>
>> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com
<mailto:setiyowati.devi%40gmail.com> >
>> wrote:
>>
>> > sebentar....
>> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
>> > Proses apa saja yg telah pak Ade Lakukan ?
>> >
>> > *mungkin kah spt ini ?*
>> >
>> > 1. membuat suatu otomasi dengan makro di suatu workbook
>> > (seperti apa makronya) ?
>> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
>> > 3. mengaktifkan Add in tersebut
>> > * di excel 2003 : menu Tools > Add In >
>> > muncul dialogbox datar Addin,
>> > aktifkan (beri contreng checkboxnya)
>> > * di excel 2007 mmirip tetapi add in di akses melalui
>> > Excel Options > Advanced
>> >
>> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
>> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
>> > semua workbook lain yg sedang dibuka
>> >
>> > CMIIW...
>>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4e.: Re: Setting Ukuran Kolom dan Baris

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 2:14 am (PDT)

Pak Zainul,
hasilnya sebelum worksheet Excel loading,sudah muncul ya Pak.
Kalau namanya saja di macro nya codenya apa ya Pak?

Ade

On Thu, 06 Oct 2011 15:45:32 +0700, zainul ulum <<yahoo>>
<zainul_ulum@yahoo.com> wrote:

> Tambahkan code di file settingsquarecell.xlam
>
>
> Sub Auto_Open()
>
> MakeSquareCells2
>
> End Sub
>
>
> Simpan filenya.
>
> 1. Buka file excel baru
>
> 2. buka file settingsquarecell.xlam
>
>
> From: belajar-excel@yahoogroups.com
> [mailto:belajar-excel@yahoogroups.com]
> On Behalf Of M.Ade Alfarid
> Sent: Thursday, October 06, 2011 3:36 PM
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] Setting Ukuran Kolom dan Baris
>
>
>
> Ohh maaf mbak,
> begini saya ,membuka workbook baru.
> kemudian saya ingin setting semua cellnya berukuran sama,
> sama disini maksudnya ukuran lebar dan kolom sama (bujursangkar)(cuma ini
> saja mbak)
> Macro dari Mr Kid sudah OK.
> Namun karena g mudeng dgn macro saya coba code dari web atas saran mbak
> siti.
> Kemudian dicopy ke VBA disave jadiin Add-in.
> Nah jika workbook yg baru dibuka,
> add-in nya ada, tapi menjalankannya macronya buka VBA dulu baru run.
> saya ingin semacam shortcut atau Alt+F8.
> Mungkin ada yang kurang di codenya (saya g begitu paham).
>
> Jadi, buka workbook ,pencet macro atau shortcut,setting size
> row.column,finish.
>
> NB : Worksheetnya memang kosong karena yg diinginkan hanya setting row
> dan
> baris
>
> Ade
>
> On Thu, 06 Oct 2011 13:29:42 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
> wrote:
>
>> makro tsb di dalam workbook (sebelum di jadikan add-in)
>> seperti apa perilakunya; bagaimana menjalankannya ?
>>
>> Jika makro ditulis dlam Procedure Function, menjalannkannya
>> dengan menulis fungsi tsb di sheet
>> misalnya
>> =Terbilang(A1)
>>
>> Kalau makro yg ditulis sebagai Prosedur SUB
>> menjalankannya dengan memanggil namanya
>> atau, dengan memberi Tombol (Command button) di mana command button
>> memangggil nama Prosedur Sub tsb
>>
>> Bisa juga dengan meng-Assign suatu drawing object untk memanggil
>> makro tsb
>> atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
>> selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
>> misalnya klik kanan suatu cell. (makro spt ini ditils didalam
>> Prosedur Event)
>>
>> Paling mudah menjalankan makro
>> pencet Alt + F8 > muncul dialogBox nama-nama makro
>> Pilih nama makronya > Klik tombol RUN
>>
>> Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
>> sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
>> lain yg sedang aktaif)
>>
>> Jadi jawaban masih mengambang karena si penjawab tidak melihat
>> (tidak diberi kesempatan membuka workbook yg berisi) makro nya
>>
>> cmiiw
>> sambil menunggu tanggapan dari members lain
>> dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
>> (Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)
>>
>>
>>
>> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id <mailto:QA%40kkmi.co.id> >
>>
>>> Langkah 1 : sudah
>>> Langkah 2 : sudah
>>> Langkah 3 : sudah
>>> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan
>>> atau
>>> harus dibuka terlebih dahulu VBA nya?
>>>
>>>
>>> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
>>> wrote:
>>>
>>> > sebentar....
>>> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
>>> > Proses apa saja yg telah pak Ade Lakukan ?
>>> >
>>> > *mungkin kah spt ini ?*
>>> >
>>> > 1. membuat suatu otomasi dengan makro di suatu workbook
>>> > (seperti apa makronya) ?
>>> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
>>> > 3. mengaktifkan Add in tersebut
>>> > * di excel 2003 : menu Tools > Add In >
>>> > muncul dialogbox datar Addin,
>>> > aktifkan (beri contreng checkboxnya)
>>> > * di excel 2007 mmirip tetapi add in di akses melalui
>>> > Excel Options > Advanced
>>> >
>>> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
>>> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
>>> > semua workbook lain yg sedang dibuka
>>> >
>>> > CMIIW...
>>>
>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4f.: Re: Setting Ukuran Kolom dan Baris

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 2:23 am (PDT)

Problem Solved,
Terimakasih Mr Kid,Mbak Dev,Mas Zainul

Regards,

ADe

On Thu, 06 Oct 2011 15:45:32 +0700, zainul ulum <<yahoo>>
<zainul_ulum@yahoo.com> wrote:

> Tambahkan code di file settingsquarecell.xlam
>
>
> Sub Auto_Open()
>
> MakeSquareCells2
>
> End Sub
>
>
> Simpan filenya.
>
> 1. Buka file excel baru
>
> 2. buka file settingsquarecell.xlam
>
>
> From: belajar-excel@yahoogroups.com
> [mailto:belajar-excel@yahoogroups.com]
> On Behalf Of M.Ade Alfarid
> Sent: Thursday, October 06, 2011 3:36 PM
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] Setting Ukuran Kolom dan Baris
>
>
>
> Ohh maaf mbak,
> begini saya ,membuka workbook baru.
> kemudian saya ingin setting semua cellnya berukuran sama,
> sama disini maksudnya ukuran lebar dan kolom sama (bujursangkar)(cuma ini
> saja mbak)
> Macro dari Mr Kid sudah OK.
> Namun karena g mudeng dgn macro saya coba code dari web atas saran mbak
> siti.
> Kemudian dicopy ke VBA disave jadiin Add-in.
> Nah jika workbook yg baru dibuka,
> add-in nya ada, tapi menjalankannya macronya buka VBA dulu baru run.
> saya ingin semacam shortcut atau Alt+F8.
> Mungkin ada yang kurang di codenya (saya g begitu paham).
>
> Jadi, buka workbook ,pencet macro atau shortcut,setting size
> row.column,finish.
>
> NB : Worksheetnya memang kosong karena yg diinginkan hanya setting row
> dan
> baris
>
> Ade
>
> On Thu, 06 Oct 2011 13:29:42 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
> wrote:
>
>> makro tsb di dalam workbook (sebelum di jadikan add-in)
>> seperti apa perilakunya; bagaimana menjalankannya ?
>>
>> Jika makro ditulis dlam Procedure Function, menjalannkannya
>> dengan menulis fungsi tsb di sheet
>> misalnya
>> =Terbilang(A1)
>>
>> Kalau makro yg ditulis sebagai Prosedur SUB
>> menjalankannya dengan memanggil namanya
>> atau, dengan memberi Tombol (Command button) di mana command button
>> memangggil nama Prosedur Sub tsb
>>
>> Bisa juga dengan meng-Assign suatu drawing object untk memanggil
>> makro tsb
>> atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
>> selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
>> misalnya klik kanan suatu cell. (makro spt ini ditils didalam
>> Prosedur Event)
>>
>> Paling mudah menjalankan makro
>> pencet Alt + F8 > muncul dialogBox nama-nama makro
>> Pilih nama makronya > Klik tombol RUN
>>
>> Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
>> sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
>> lain yg sedang aktaif)
>>
>> Jadi jawaban masih mengambang karena si penjawab tidak melihat
>> (tidak diberi kesempatan membuka workbook yg berisi) makro nya
>>
>> cmiiw
>> sambil menunggu tanggapan dari members lain
>> dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
>> (Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)
>>
>>
>>
>> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id <mailto:QA%40kkmi.co.id> >
>>
>>> Langkah 1 : sudah
>>> Langkah 2 : sudah
>>> Langkah 3 : sudah
>>> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan
>>> atau
>>> harus dibuka terlebih dahulu VBA nya?
>>>
>>>
>>> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
>>> wrote:
>>>
>>> > sebentar....
>>> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
>>> > Proses apa saja yg telah pak Ade Lakukan ?
>>> >
>>> > *mungkin kah spt ini ?*
>>> >
>>> > 1. membuat suatu otomasi dengan makro di suatu workbook
>>> > (seperti apa makronya) ?
>>> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
>>> > 3. mengaktifkan Add in tersebut
>>> > * di excel 2003 : menu Tools > Add In >
>>> > muncul dialogbox datar Addin,
>>> > aktifkan (beri contreng checkboxnya)
>>> > * di excel 2007 mmirip tetapi add in di akses melalui
>>> > Excel Options > Advanced
>>> >
>>> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
>>> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
>>> > semua workbook lain yg sedang dibuka
>>> >
>>> > CMIIW...
>>>
>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (15)
4g.: Re: Setting Ukuran Kolom dan Baris

Posted by: "zainul ulum <>" zainul_ulum@yahoo.com zainul_ulum

Thu Oct 6, 2011 2:25 am (PDT)

Saat aku coba, nggak perlu setting addin.
Jadi urutan kalo mau memakai macronya adalah:
1. buka excel kosong
2. buka file settingsquarecell.xlam
3. jalankan instruksi yang ada di macro....

-----Original Message-----
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of M.Ade Alfarid
Sent: Thursday, October 06, 2011 4:16 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Setting Ukuran Kolom dan Baris

Pak Zainul,
hasilnya sebelum worksheet Excel loading,sudah muncul ya Pak.
Kalau namanya saja di macro nya codenya apa ya Pak?

Ade

On Thu, 06 Oct 2011 15:45:32 +0700, zainul ulum <<yahoo>>
<zainul_ulum@yahoo.com> wrote:

> Tambahkan code di file settingsquarecell.xlam
>
>
> Sub Auto_Open()
>
> MakeSquareCells2
>
> End Sub
>
>
> Simpan filenya.
>
> 1. Buka file excel baru
>
> 2. buka file settingsquarecell.xlam
>
>
> From: belajar-excel@yahoogroups.com
> [mailto:belajar-excel@yahoogroups.com]
> On Behalf Of M.Ade Alfarid
> Sent: Thursday, October 06, 2011 3:36 PM
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] Setting Ukuran Kolom dan Baris
>
>
>
> Ohh maaf mbak,
> begini saya ,membuka workbook baru.
> kemudian saya ingin setting semua cellnya berukuran sama,
> sama disini maksudnya ukuran lebar dan kolom sama (bujursangkar)(cuma ini
> saja mbak)
> Macro dari Mr Kid sudah OK.
> Namun karena g mudeng dgn macro saya coba code dari web atas saran mbak
> siti.
> Kemudian dicopy ke VBA disave jadiin Add-in.
> Nah jika workbook yg baru dibuka,
> add-in nya ada, tapi menjalankannya macronya buka VBA dulu baru run.
> saya ingin semacam shortcut atau Alt+F8.
> Mungkin ada yang kurang di codenya (saya g begitu paham).
>
> Jadi, buka workbook ,pencet macro atau shortcut,setting size
> row.column,finish.
>
> NB : Worksheetnya memang kosong karena yg diinginkan hanya setting row
> dan
> baris
>
> Ade
>
> On Thu, 06 Oct 2011 13:29:42 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
> wrote:
>
>> makro tsb di dalam workbook (sebelum di jadikan add-in)
>> seperti apa perilakunya; bagaimana menjalankannya ?
>>
>> Jika makro ditulis dlam Procedure Function, menjalannkannya
>> dengan menulis fungsi tsb di sheet
>> misalnya
>> =Terbilang(A1)
>>
>> Kalau makro yg ditulis sebagai Prosedur SUB
>> menjalankannya dengan memanggil namanya
>> atau, dengan memberi Tombol (Command button) di mana command button
>> memangggil nama Prosedur Sub tsb
>>
>> Bisa juga dengan meng-Assign suatu drawing object untk memanggil
>> makro tsb
>> atau bisa juga diberi Short Cut (misal dengen memencet Ctrl + K
>> selain itu makro juga bisa JALAN SENDIRI kalau suatu EVENT terjadi
>> misalnya klik kanan suatu cell. (makro spt ini ditils didalam
>> Prosedur Event)
>>
>> Paling mudah menjalankan makro
>> pencet Alt + F8 > muncul dialogBox nama-nama makro
>> Pilih nama makronya > Klik tombol RUN
>>
>> Ketika workbook sudah menjadi add-in dan sudah diaktifkan, perilakunya
>> sama saja (hanya dia tidak terlihat, dan makro bisa berlaku di workbook
>> lain yg sedang aktaif)
>>
>> Jadi jawaban masih mengambang karena si penjawab tidak melihat
>> (tidak diberi kesempatan membuka workbook yg berisi) makro nya
>>
>> cmiiw
>> sambil menunggu tanggapan dari members lain
>> dan juga menunggu kiriman workbook yg tidak kunjung dilampirkan
>> (Jangan dikirm kalau memang isinya bersifat privatae / rahasia...)
>>
>>
>>
>> 2011/10/6 M.Ade Alfarid <QA@kkmi.co.id <mailto:QA%40kkmi.co.id> >
>>
>>> Langkah 1 : sudah
>>> Langkah 2 : sudah
>>> Langkah 3 : sudah
>>> Langkah 4 : bagaimana cara panggilnya? apakah sudah otomatis berjalan
>>> atau
>>> harus dibuka terlebih dahulu VBA nya?
>>>
>>>
>>> On Thu, 06 Oct 2011 12:14:33 +0700, STDEV(i) <setiyowati.devi@gmail.com
> <mailto:setiyowati.devi%40gmail.com> >
>>> wrote:
>>>
>>> > sebentar....
>>> > tolong dijelaskan dulu "*saya sudah add-in*" itu bgmana?
>>> > Proses apa saja yg telah pak Ade Lakukan ?
>>> >
>>> > *mungkin kah spt ini ?*
>>> >
>>> > 1. membuat suatu otomasi dengan makro di suatu workbook
>>> > (seperti apa makronya) ?
>>> > 2. menSave workbook tsb sebagai Add-In (xla / xlam)
>>> > 3. mengaktifkan Add in tersebut
>>> > * di excel 2003 : menu Tools > Add In >
>>> > muncul dialogbox datar Addin,
>>> > aktifkan (beri contreng checkboxnya)
>>> > * di excel 2007 mmirip tetapi add in di akses melalui
>>> > Excel Options > Advanced
>>> >
>>> > setelah Suatu Add IN menjadi aktif (ikut terbuka secara background
>>> > bila excel dibuka) maka makro yg ada di addin tsb akan berlaku bagi
>>> > semua workbook lain yg sedang dibuka
>>> >
>>> > CMIIW...
>>>
>

--
Using Opera's revolutionary email client: http://www.opera.com/mail/

------------------------------------

----------------------------------------------------------
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
----------------------------------------------------------Yahoo!
Groups Links

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

5a.: Re: Menghapus karakter di belakang Spasi ke 2

Posted by: "Ratno Hadi Suswanto" rh_suswanto@hotmail.com rattip25

Thu Oct 6, 2011 1:51 am (PDT)

Dear Mas Ghozi, Mas Kid, Mas Summonery, Mas Undang, Mbak Siti (menurut be-exceler cantik), dan all,

Saya setuju dengan Mas Ghozi.

Buat saya sekarang adalah bagaimana mengingatkan teman2 setim di office supaya melakukan sesuatu harus "comply" dengan role yang ada sehingga tidak muncul problem aneh-aneh (padahal semakin banyak problem...semakin banyak ilmu yang di dapat).

Anyway...saya sangat appreciated dan terima kasih dengan bantuan teman-teman di "lovely" milis ini, karena saya dari "nothing" jadi "something" dalam hal excel dari milis ini....

Adakah ide untuk mengadakan whorkshop ?

Best regards,
RHS.

To: belajar-excel@yahoogroups.com
From: summonery@yahoo.com
Date: Wed, 5 Oct 2011 15:06:25 +0000
Subject: [belajar-excel] Re: Menghapus karakter di belakang Spasi ke 2

coba,

=TRIM(LEFT(SUBSTITUTE(SUBSTITUTE(A2;"-";" ");" ";REPT(" ";99));2*99))

>semoga bermanfaat

========================================================================
--- In belajar-excel@yahoogroups.com, Ratno Hadi Suswanto <rh_suswanto@...> wrote:

Ternyata...setelah saya applikasikan semua fungsi dari temen2...begitu dicheck, alamakkkk....ada penulisan product yang diluar jalur sehingga fungsi-fungsi tadi tidak sesuai lagin.....
Saya sudah coba dengan fungsi-fungsi lainnya.

Ada tidak fungsi yang lebih "cerdik" dan "ringakas" untuk menyelesaikannya.

Mbak Siti...UDF lagi aku coba nih....

Thx a lot & Regards,
RHS

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (13)
5b.: Re: Menghapus karakter di belakang Spasi ke 2

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Thu Oct 6, 2011 4:49 am (PDT)

*UDF LeftWord Jilid II *

UDF (user definded function / fungsi buatan 'dalam negeri') yg ditulis di
workbook terlampir sudah mengalami sedikit perbaikan

ceritaknya begini:
sebetulnya pak Ratno itu (menurut dugaan asal-asalan-ku) mempunyai records
yg terdiri dari 3 data (tetapi ditulis di 1 cell)
data 1 = product code
data 2 = variant dari product code
data 3 = vendor /supplier atau apalah namanya

*Dugaan *asal-asalan dari diriku :
pak Ratno HS ingin menampilkan ProductCode dan Varian, tetapi ada
ProductCode yg tidak ada data Variannya
"Cilakak"-nya, unfortunately, penyusunan data, jika ketemu product code yg
tak punya variant diulisnya hanya : (1)ProductCode dan (2)Supplier nya
saja; sedangkan "biasanya" posisi (2) ini kan ditempati oleh "variant"

Mungkin.. mungkin lho ya, akan lebih gampang diolah kalau ditulisnya
(1) ProductCode (2)None (3)Supplier

Dengan demikian jika diminta 2 kata pertama hasilnya mungkin "007007X
None" artinya code 007007x yg tidak ada variannya.
Dengan cara lain, cara khusus (seperti rumus mas Kid) menolak "None" Jadi
bisa dibuat banyak sekali Product yg tanpa variant karena semua product
tanpa Variant; "part (2) nya cukup ditulis: None

Rumus penolak None nya hanya bertugas menolak 1 (satu) kemungkinan; bukan
menolak SNOW dan mungkin BANYAK LAGI nama depan Supplier lain (yg product
nya tidak ada variannya)

Cara lain yg lebih lazim
Ketiga data diberi delimiter (tanda pemisah) berupa KOMA:
ProductCode,Variant,Supplier

Jika tidak ada variannya cara menulisnya jangan diulang kesalahan yg sama
ProductCode, Supplier
tetapi
ProductCode,,Suplier
ada koma yg mengapit data kosong

Jika cara ini dipakai, maka pengolahan data lebih lanjut menjadi lebih
gampang...

Sekarang mengenai UDF yg diperbaiki

Dia masih menganut cara menolak SNOW; tetapi karena kita menduga nantinya
akan ada kata lain yg harus ditolak, maka disediakan argument untuk merujuk
*daftar kata* yg akan ditolak.

LeftWrod(TEXTasal, N_Kata_yg_ingin_diambil, DaftarKata_yg_Ditolak)
- Daftar Kata yg ditolak bisa berupa
** Range *
misal A3:A14
** Array Konstanta* (misal : {"Daku","Dikau","Dia",SebelDeh"}
atau bisa juga hanya satu kata berupa
** String*
contoh : "Snow"

file terlampir tidak harus benar benar dipakai, tetapi ini diajukan hanya
untuk menjawab
"bahwa keinginan itu bisa dipenuhi"

salam kompakz
~siti
http://tech.groups.yahoo.com/group/xl-Villager/messages

terima kasih dikira cantik... (ich Ge-Er banget.. nh..)

--- listing prosedur fungsi -----
Function LeftWord(S As String, N As Long, Exclusion) As String
' siti / 8 Oct 2011 / BeExcel
Dim i As Long, e As Integer, ArS, Exc() As String
Dim ExCount As Integer, ExFound As Boolean

ArS = Split(" " & Replace(S, "-", " "), " ")

Select Case IsArray(Exclusion)
Case True
If TypeName(Exclusion) = "Range" Then
ReDim Exc(1 To Exclusion.Cells.Count)
For i = 1 To Exclusion.Cells.Count
Exc(i) = Exclusion(i)
Next
Exclusion = Exc()
ExCount = UBound(Exclusion)
ElseIf TypeName(Exclusion) = "Variant()" Then
ExCount = UBound(Exclusion)
End If
Case False
Exclusion = Array("", Exclusion)
ExCount = 1
End Select

For i = 1 To N
For e = 1 To ExCount

If i = N Then
If Exclusion(e) = ArS(i) Then
ExFound = True
ArS(i) = ""
Exit For
End If
End If

Next e
LeftWord = LeftWord & ArS(i) & " "
If ExFound Then Exit For
Next i
LeftWord = Trim(LeftWord)
End Function
-----------------------------------------

2011/10/6 Ratno Hadi Suswanto <rh_suswanto@hotmail.com>
>
> Dear Mas Ghozi, Mas Kid, Mas Summonery, Mas Undang, Mbak Siti (menurut
be-exceler cantik), dan all,
>
> Saya setuju dengan Mas Ghozi.
>
> Buat saya sekarang adalah bagaimana mengingatkan teman2 setim di office
supaya melakukan sesuatu harus "comply" dengan role yang ada sehingga tidak
muncul problem aneh-aneh (padahal semakin banyak problem...semakin banyak
ilmu yang di dapat).
>
> Anyway...saya sangat appreciated dan terima kasih dengan bantuan
teman-teman di "lovely" milis ini, karena saya dari "nothing" jadi
"something" dalam hal excel dari milis ini....
>
> Adakah ide untuk mengadakan whorkshop ?
>
> Best regards,
> RHS.
>

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

Create New Topic | Visit Your Group on the Web

Messages

---------------------------------------------------------------------
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
---------------------------------------------------------------------

MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

Kamis, 06 Oktober 2011

Messages In This Digest (24 Messages)

Messages

Posted by: "yulian nugroho" yuliannug@gmail.com yuliannug

Wed Oct 5, 2011 10:16 pm (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 10:38 pm (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 10:54 pm (PDT)

Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit

Wed Oct 5, 2011 11:27 pm (PDT)

Posted by: "yulian nugroho" yuliannug@gmail.com yuliannug

Thu Oct 6, 2011 12:27 am (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Thu Oct 6, 2011 3:19 am (PDT)

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Wed Oct 5, 2011 10:24 pm (PDT)

Posted by: "Budhi Cahyanto" budhi.cahyanto@id.certissecurity.com

Thu Oct 6, 2011 3:21 am (PDT)

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Thu Oct 6, 2011 3:30 am (PDT)

Posted by: "Budhi Cahyanto" budhi.cahyanto@id.certissecurity.com

Thu Oct 6, 2011 3:32 am (PDT)

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Wed Oct 5, 2011 10:45 pm (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 11:07 pm (PDT)

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Wed Oct 5, 2011 11:59 pm (PDT)

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id ghozialkatiri

Thu Oct 6, 2011 1:48 am (PDT)

Posted by: "Gober" gober.mirc@gmail.com gober_mirc

Thu Oct 6, 2011 4:58 am (PDT)

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Wed Oct 5, 2011 11:03 pm (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Wed Oct 5, 2011 11:30 pm (PDT)

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 1:33 am (PDT)

Posted by: "zainul ulum <>" zainul_ulum@yahoo.com zainul_ulum

Thu Oct 6, 2011 1:45 am (PDT)

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 2:14 am (PDT)

Posted by: "M.Ade Alfarid" QA@kkmi.co.id aderyo

Thu Oct 6, 2011 2:23 am (PDT)

Posted by: "zainul ulum <>" zainul_ulum@yahoo.com zainul_ulum

Thu Oct 6, 2011 2:25 am (PDT)

Posted by: "Ratno Hadi Suswanto" rh_suswanto@hotmail.com rattip25

Thu Oct 6, 2011 1:51 am (PDT)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi

Thu Oct 6, 2011 4:49 am (PDT)

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me