13 New Messages
Digest #2461
2e
Trs: [belajar-excel] Memotong Rumus - Revisi Buat Link dgn Indirect by "Andy Ajhis Ramadhan" andy_ajhis37
Messages
Fri Aug 2, 2013 12:50 am (PDT) . Posted by:
"Ahmad Syaifullah Lubis" syaifullah
Mr Kid,
ijinkan saya diberikan contoh file xls yg sudah ada macro dimaksud. karena saya bolak balik ikutin instruksinya gak bisa2 juga. errornya di ("B3:G9")
yang mana setelah ALT 11 saya klik insert procedure kan. terus saya langsung copy macronya. saya run , tapi error hasilnya.
>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah general module -> buat sebuah blok prosedur Sub ber-scope public dengan nama sesukanya -> isi blok persedur tersebut dengan script :
Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
To: belajar-excel@yahoogroups.com
From: mr.nmkid@gmail.com
Date: Fri, 2 Aug 2013 10:17:21 +0700
Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Hai Ahmad,
Jika diikuti ceritanya :
1. Misalkan ada dua buah workbook yang terbuka
>> Artinya, buka Excel. Lalu menu File Open -> pilih workbook pertama, kemudian menu FIle Open -> pilih workbook kedua
2. yaitu bernama Keuangan.xls dan Laporan.xls>> jadi, workbook pertama dinomor 1 itu adalah memilih file bernama Keuangan.xls
dan workbook kedua dinomor 1 itu adalah memilih file bernama Laporan.xls
>> Jika belum punya, maka harus buat dulu file Keuangan.xls dan Laporan.xls
(2 bijik workbook format xl2003 file karena xls. kenapa ? agar seluruh BeExceller yang masih pakai xl2003 bisa ikut menikmatinya)
3. yang masing-masing berisi banyak worksheet.
>> setiap file dipastikan berisi banyak sheet (minimal 3 atau 4 sheet lah biar muanteb), lalu di save
4. Ketika bekerja pada workbook Laporan.xls bisa menggunakan nilai yang ada dalam workbook Keuangan.xls pada sheet bernama Dataku>> berarti di file Keuangan.xls, salah satu sheet dari banyak sheet yang ada di file tersebut harus diberinama Dataku
5. di range dengan alamat B3 sampai G9.
>> isilah nilai sesuka Anda dari B3 sampai G9. Bisa copas dari mana saja atau buat acak.
6. Artinya, dari workbook Laporan.xls
>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah general module -> buat sebuah blok prosedur Sub ber-scope public dengan nama sesukanya -> isi blok persedur tersebut dengan script :
Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
7. Simpan kedua workbook dan aktifkan workbook Laporan.xls
8. Jalankan blok prosedur yang Anda buat
9. Lihat di workbook keuangan pada sheet bernama Dataku diarea range B3:G9 sudah ada semut jalan dipinggir areanya.
;)
Wassalam,
Kid.
2013/8/1 Ahmad Syaifullah Lubis <syaifullah@hotmail.com >
Mr Kid,
saya sudah masuk object2 utama dalam excel. saya baru masuk pada contoh 1: menggunakan workbook lain, saya ingin coba jalankan macro yg tertera disitu, tetapi gak jalan, pesan errornya compile error: invalid outside procedure. di VBA tersorot ("B3..G9") itu yang salah.
Panduan Penggunaan object-nya adalah sebagai berikut :
Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
Artinya, dari workbook Laporan.xls, hubungi workbook bernama
Keuangan.xls yang sedang terbuka. Kemudian ke worksheet bernama Dataku
yang ada di workbook Keuangan.xls yang telah dihubungi tersebut. Di
worksheet bernama Dataku tersebut, lakukan pemilihan cells agar didapat
range mulai dari B3 sampai G9. Range yang dituju tersebut di-Copy ke
clipboard.
mohon bantuannya.
terima kasih.
ASL
To: belajar-excel@yahoogroups.com
From: mr.nmkid@gmail.com
Date: Sun, 28 Jul 2013 00:04:33 +0700
Subject: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Dear BeExceller,
Dalam Excel VBA akan sering berseliweran yang namanya Workbook, Worksheet, maupun range. Hal yang disebutkan tersebut adalah object-object utama dalam Excel.
Ada baiknya, sebelum melangkah lebih jauh, kita kenal lebih dulu tentang object-object utama tersebut. Untuk hal ini, silakan jalan-jalan kesini.
Wassalam,
Kid.
ijinkan saya diberikan contoh file xls yg sudah ada macro dimaksud. karena saya bolak balik ikutin instruksinya gak bisa2 juga. errornya di ("B3:G9"
yang mana setelah ALT 11 saya klik insert procedure kan. terus saya langsung copy macronya. saya run , tapi error hasilnya.
>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah general module -> buat sebuah blok prosedur Sub ber-scope public dengan nama sesukanya -> isi blok persedur tersebut dengan script :
Workbooks("
[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
To: belajar-excel@
From: mr.nmkid@gmail.
Date: Fri, 2 Aug 2013 10:17:21 +0700
Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Hai Ahmad,
Jika diikuti ceritanya :
1. Misalkan ada dua buah workbook yang terbuka
>> Artinya, buka Excel. Lalu menu File Open -> pilih workbook pertama, kemudian menu FIle Open -> pilih workbook kedua
2. yaitu bernama Keuangan.xls dan Laporan.xls>
dan workbook kedua dinomor 1 itu adalah memilih file bernama Laporan.xls
>> Jika belum punya, maka harus buat dulu file Keuangan.xls dan Laporan.xls
(2 bijik workbook format xl2003 file karena xls. kenapa ? agar seluruh BeExceller yang masih pakai xl2003 bisa ikut menikmatinya)
3. yang masing-masing berisi banyak worksheet.
>> setiap file dipastikan berisi banyak sheet (minimal 3 atau 4 sheet lah biar muanteb), lalu di save
4. Ketika bekerja pada workbook Laporan.xls bisa menggunakan nilai yang ada dalam workbook Keuangan.xls pada sheet bernama Dataku>> berarti di file Keuangan.xls, salah satu sheet dari banyak sheet yang ada di file tersebut harus diberinama Dataku
5. di range dengan alamat B3 sampai G9.
>> isilah nilai sesuka Anda dari B3 sampai G9. Bisa copas dari mana saja atau buat acak.
6. Artinya, dari workbook Laporan.xls
>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah general module -> buat sebuah blok prosedur Sub ber-scope public dengan nama sesukanya -> isi blok persedur tersebut dengan script :
Workbooks("
[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
7. Simpan kedua workbook dan aktifkan workbook Laporan.xls
8. Jalankan blok prosedur yang Anda buat
9. Lihat di workbook keuangan pada sheet bernama Dataku diarea range B3:G9 sudah ada semut jalan dipinggir areanya.
;)
Wassalam,
Kid.
2013/8/1 Ahmad Syaifullah Lubis <syaifullah@hotmail.
Mr Kid,
saya sudah masuk object2 utama dalam excel. saya baru masuk pada contoh 1: menggunakan workbook lain, saya ingin coba jalankan macro yg tertera disitu, tetapi gak jalan, pesan errornya compile error: invalid outside procedure. di VBA tersorot ("B3..G9"
Panduan Penggunaan object-nya adalah sebagai berikut :
Workbooks("
Artinya, dari workbook Laporan.xls, hubungi workbook bernama
Keuangan.xls yang sedang terbuka. Kemudian ke worksheet bernama Dataku
yang ada di workbook Keuangan.xls yang telah dihubungi tersebut. Di
worksheet bernama Dataku tersebut, lakukan pemilihan cells agar didapat
range mulai dari B3 sampai G9. Range yang dituju tersebut di-Copy ke
clipboard.
mohon bantuannya.
terima kasih.
ASL
To: belajar-excel@
From: mr.nmkid@gmail.
Date: Sun, 28 Jul 2013 00:04:33 +0700
Subject: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Dear BeExceller,
Dalam Excel VBA akan sering berseliweran yang namanya Workbook, Worksheet, maupun range. Hal yang disebutkan tersebut adalah object-object utama dalam Excel.
Ada baiknya, sebelum melangkah lebih jauh, kita kenal lebih dulu tentang object-object utama tersebut. Untuk hal ini, silakan jalan-jalan kesini.
Wassalam,
Kid.
Fri Aug 2, 2013 1:04 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Bagaimana jika Anda melampirkan kedua file (laporan.xls dan keuangan.xls)
yang bermasalah. Justri belajar dari suatu kesalahan akan lebih banyak
bermanfaat bagi khalayak. Bukankah banyak orang tidak mau mengalami nasib
serupa dengan si A yang begini begitu dibandingkan meneladani si B yang
tidak pernah tertimpa hal begono atau begunu.
Wassalam,
Kid.
2013/8/2 Ahmad Syaifullah Lubis <syaifullah@hotmail.com >
> **
>
>
> Mr Kid,
> ijinkan saya diberikan contoh file xls yg sudah ada macro dimaksud. karena
> saya bolak balik ikutin instruksinya gak bisa2 juga. errornya di ("B3:G9")
>
> yang mana setelah ALT 11 saya klik insert procedure kan. terus saya
> langsung copy macronya. saya run , tapi error hasilnya.
>
> >> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert
> sebuah general module -> buat sebuah *blok *prosedur Sub ber-scope public
> dengan nama sesukanya -> isi blok persedur tersebut dengan script :
> * Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy*
> [pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>
> ------------------------------
> To: belajar-excel@yahoogroups.com
> From: mr.nmkid@gmail.com
> Date: Fri, 2 Aug 2013 10:17:21 +0700
> Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range
> yuk...
>
>
>
>
> Hai Ahmad,
>
> Jika diikuti ceritanya :
> 1. Misalkan ada dua buah workbook yang terbuka
> >> Artinya, buka Excel. Lalu menu File Open -> pilih workbook pertama,
> kemudian menu FIle Open -> pilih workbook kedua
>
> 2. yaitu bernama Keuangan.xls dan Laporan.xls
> >> jadi, workbook pertama dinomor 1 itu adalah memilih file bernama
> Keuangan.xls
> dan workbook kedua dinomor 1 itu adalah memilih file bernama Laporan.xls
> >> Jika belum punya, maka harus buat dulu file Keuangan.xls dan
> Laporan.xls
> (2 bijik workbook format xl2003 file karena xls. kenapa ? agar seluruh
> BeExceller yang masih pakai xl2003 bisa ikut menikmatinya)
>
> 3. yang masing-masing berisi banyak worksheet.
> >> setiap file dipastikan berisi banyak sheet (minimal 3 atau 4 sheet lah
> biar muanteb), lalu di save
>
> 4. Ketika bekerja pada workbook Laporan.xls bisa menggunakan nilai yang
> ada dalam workbook Keuangan.xls pada sheet bernama Dataku
> >> berarti di file Keuangan.xls, salah satu sheet dari banyak sheet yang
> ada di file tersebut harus diberinama *Dataku*
>
> 5. di range dengan alamat B3 sampai G9.
> >> isilah nilai sesuka Anda dari B3 sampai G9. Bisa copas dari mana saja
> atau buat acak.
>
> 6. Artinya, dari workbook Laporan.xls
> >> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert
> sebuah general module -> buat sebuah *blok *prosedur Sub ber-scope public
> dengan nama sesukanya -> isi blok persedur tersebut dengan script :
> * Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy*
> [pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>
> 7. Simpan kedua workbook dan aktifkan workbook Laporan.xls
>
> 8. Jalankan blok prosedur yang Anda buat
>
> 9. Lihat di workbook keuangan pada sheet bernama Dataku diarea range B3:G9
> sudah ada semut jalan dipinggir areanya.
>
> ;)
>
> Wassalam,
> Kid.
>
>
> 2013/8/1 Ahmad Syaifullah Lubis <syaifullah@hotmail.com >
>
> **
>
>
> Mr Kid,
> saya sudah masuk object2 utama dalam excel. saya baru masuk pada contoh 1:
> menggunakan workbook lain, saya ingin coba jalankan macro yg tertera
> disitu, tetapi gak jalan, pesan errornya compile error: invalid outside
> procedure. di VBA tersorot ("B3..G9") itu yang salah.
> Panduan Penggunaan object-nya adalah sebagai berikut :
> *Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy*
>
> Artinya, dari workbook Laporan.xls, hubungi workbook bernama Keuangan.xls
> yang sedang terbuka. Kemudian ke worksheet bernama Dataku yang ada di
> workbook Keuangan.xls yang telah dihubungi tersebut. Di worksheet bernama
> Dataku tersebut, lakukan pemilihan cells agar didapat range mulai dari B3
> sampai G9. Range yang dituju tersebut di-Copy ke clipboard.
>
> mohon bantuannya.
> terima kasih.
> ASL
>
> ------------------------------
> To: belajar-excel@yahoogroups.com
> From: mr.nmkid@gmail.com
> Date: Sun, 28 Jul 2013 00:04:33 +0700
> Subject: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
>
>
>
>
> Dear BeExceller,
>
> Dalam Excel VBA akan sering berseliweran yang namanya Workbook, Worksheet,
> maupun range. Hal yang disebutkan tersebut adalah object-object utama dalam
> Excel.
>
> Ada baiknya, sebelum melangkah lebih jauh, kita kenal lebih dulu tentang
> object-object utama tersebut. Untuk hal ini, silakan jalan-jalan kesini<http://b-excel.blogspot.com/2013/07/belajarvba-006-object-dalam-excel.html >
> .
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
yang bermasalah. Justri belajar dari suatu kesalahan akan lebih banyak
bermanfaat bagi khalayak. Bukankah banyak orang tidak mau mengalami nasib
serupa dengan si A yang begini begitu dibandingkan meneladani si B yang
tidak pernah tertimpa hal begono atau begunu.
Wassalam,
Kid.
2013/8/2 Ahmad Syaifullah Lubis <syaifullah@hotmail.
> **
>
>
> Mr Kid,
> ijinkan saya diberikan contoh file xls yg sudah ada macro dimaksud. karena
> saya bolak balik ikutin instruksinya gak bisa2 juga. errornya di ("B3:G9"
>
> yang mana setelah ALT 11 saya klik insert procedure kan. terus saya
> langsung copy macronya. saya run , tapi error hasilnya.
>
> >> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert
> sebuah general module -> buat sebuah *blok *prosedur Sub ber-scope public
> dengan nama sesukanya -> isi blok persedur tersebut dengan script :
> * Workbooks("
> [pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>
> ------------
> To: belajar-excel@
> From: mr.nmkid@gmail.
> Date: Fri, 2 Aug 2013 10:17:21 +0700
> Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range
> yuk...
>
>
>
>
> Hai Ahmad,
>
> Jika diikuti ceritanya :
> 1. Misalkan ada dua buah workbook yang terbuka
> >> Artinya, buka Excel. Lalu menu File Open -> pilih workbook pertama,
> kemudian menu FIle Open -> pilih workbook kedua
>
> 2. yaitu bernama Keuangan.xls dan Laporan.xls
> >> jadi, workbook pertama dinomor 1 itu adalah memilih file bernama
> Keuangan.xls
> dan workbook kedua dinomor 1 itu adalah memilih file bernama Laporan.xls
> >> Jika belum punya, maka harus buat dulu file Keuangan.xls dan
> Laporan.xls
> (2 bijik workbook format xl2003 file karena xls. kenapa ? agar seluruh
> BeExceller yang masih pakai xl2003 bisa ikut menikmatinya)
>
> 3. yang masing-masing berisi banyak worksheet.
> >> setiap file dipastikan berisi banyak sheet (minimal 3 atau 4 sheet lah
> biar muanteb), lalu di save
>
> 4. Ketika bekerja pada workbook Laporan.xls bisa menggunakan nilai yang
> ada dalam workbook Keuangan.xls pada sheet bernama Dataku
> >> berarti di file Keuangan.xls, salah satu sheet dari banyak sheet yang
> ada di file tersebut harus diberinama *Dataku*
>
> 5. di range dengan alamat B3 sampai G9.
> >> isilah nilai sesuka Anda dari B3 sampai G9. Bisa copas dari mana saja
> atau buat acak.
>
> 6. Artinya, dari workbook Laporan.xls
> >> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert
> sebuah general module -> buat sebuah *blok *prosedur Sub ber-scope public
> dengan nama sesukanya -> isi blok persedur tersebut dengan script :
> * Workbooks("
> [pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>
> 7. Simpan kedua workbook dan aktifkan workbook Laporan.xls
>
> 8. Jalankan blok prosedur yang Anda buat
>
> 9. Lihat di workbook keuangan pada sheet bernama Dataku diarea range B3:G9
> sudah ada semut jalan dipinggir areanya.
>
> ;)
>
> Wassalam,
> Kid.
>
>
> 2013/8/1 Ahmad Syaifullah Lubis <syaifullah@hotmail.
>
> **
>
>
> Mr Kid,
> saya sudah masuk object2 utama dalam excel. saya baru masuk pada contoh 1:
> menggunakan workbook lain, saya ingin coba jalankan macro yg tertera
> disitu, tetapi gak jalan, pesan errornya compile error: invalid outside
> procedure. di VBA tersorot ("B3..G9"
> Panduan Penggunaan object-nya adalah sebagai berikut :
> *Workbooks("
>
> Artinya, dari workbook Laporan.xls, hubungi workbook bernama Keuangan.xls
> yang sedang terbuka. Kemudian ke worksheet bernama Dataku yang ada di
> workbook Keuangan.xls yang telah dihubungi tersebut. Di worksheet bernama
> Dataku tersebut, lakukan pemilihan cells agar didapat range mulai dari B3
> sampai G9. Range yang dituju tersebut di-Copy ke clipboard.
>
> mohon bantuannya.
> terima kasih.
> ASL
>
> ------------
> To: belajar-excel@
> From: mr.nmkid@gmail.
> Date: Sun, 28 Jul 2013 00:04:33 +0700
> Subject: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
>
>
>
>
> Dear BeExceller,
>
> Dalam Excel VBA akan sering berseliweran yang namanya Workbook, Worksheet,
> maupun range. Hal yang disebutkan tersebut adalah object-object utama dalam
> Excel.
>
> Ada baiknya, sebelum melangkah lebih jauh, kita kenal lebih dulu tentang
> object-object utama tersebut. Untuk hal ini, silakan jalan-jalan kesini<http://b-excel.
> .
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
Fri Aug 2, 2013 12:50 am (PDT) . Posted by:
"Andy Ajhis Ramadhan" andy_ajhis37
MEMOTONG RUMUS
Nama nilai kali Nilai kali dari sheets lain rumusan
Andy 3 30 =D8*Andy!A1
Ryuky 4 80 =B4*Ryuky!$A$1
السلام عليكم ورحمة الله وبركاته
Dear,
Master Excel
Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
dikalikan.
karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada
yang tau solusinya ?
وسلام عليكم ورحمة الله وبركاته
Thanks & Best Regards
Andy Ajhis. R
Nama nilai kali Nilai kali dari sheets lain rumusan
Andy 3 30 =D8*Andy!A1
Ryuky 4 80 =B4*Ryuky!$A$
السلام عليكم ورحمة الله وبركاته
Dear,
Master Excel
Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
dikalikan.
karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada
yang tau solusinya ?
وسلام عليكم ورحمة الله وبركاته
Thanks & Best Regards
Andy Ajhis. R
Fri Aug 2, 2013 1:12 am (PDT) . Posted by:
"Jan Raisin"
������������ ��������� ���������� ����� �������������
coba gunakan fungsi Indirect
formula awal:
=D8*Andy!A1
yang warna merah diubah menjadi
Indirect(alamat_cell_nya&"
!A1"
)
misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
=D8*
Indirect(A4&"
!A1
"
)
���������� ���������� ���������� ����� �������������
-Miss Jan Raisin-
Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan
<andyajhisramadhan@ymail.com >menulis:
> **
>
>
> MEMOTONG RUMUS Nama nilai kali Nilai kali dari sheets lain rumusan
> Andy 3 30
> =D8*Andy!A1
> Ryuky 4 80 =B4*Ryuky!$A$1
> ������ ����� ����� ���� �������
> Dear,
> Master Excel
>
> Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
> tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
> dikalikan.
>
> karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada yang
> tau solusinya ? ����� ����� ����� ���� �������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
>
>
coba gunakan fungsi Indirect
formula awal:
=D8*Andy!A1
yang warna merah diubah menjadi
Indirect(alamat_
!A1"
)
misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
=D8*
Indirect(A4&"
!A1
"
)
���������� ���������� ���������� ����� �������������
-Miss Jan Raisin-
Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan
<andyajhisramadhan@
> **
>
>
> MEMOTONG RUMUS Nama nilai kali Nilai kali dari sheets lain rumusan
> Andy 3 30
> =D8*Andy!A1
> Ryuky 4 80 =B4*Ryuky!$A$
> ������ ����� ����� ���� �������
> Dear,
> Master Excel
>
> Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
> tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
> dikalikan.
>
> karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada yang
> tau solusinya ? ����� ����� ����� ���� �������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
>
>
Fri Aug 2, 2013 2:43 am (PDT) . Posted by:
"Andy Ajhis Ramadhan" andy_ajhis37
السلام عليكم ورحمة الله وبركاته
Miss Jan Raisin
Mkasih banyak miss :D wah ternyata rumusnya itu. thanks you miss...
hehe
وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Thanks & Best Regards
Andy Ajhis. R
________________________________
Dari: Jan Raisin <miss.jan.raisin@gmail.com >
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 2 Agustus 2013 15:12
Judul: Re: [belajar-excel] Memotong Rumus
وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
coba gunakan fungsi Indirect
formula awal:
=D8*Andy!A1
yang warna merah diubah menjadi
Indirect(alamat_cell_nya&"!A1"
)
misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
=D8*
Indirect(A4&"!A1
")
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
-Miss Jan Raisin-
Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan <andyajhisramadhan@ymail.com > menulis:
>
>MEMOTONG RUMUS
>Nama nilai kali Nilai kali dari sheets lain rumusan
>Andy 3 30 =D8*Andy!A1
>
>
>Ryuky 4 80 =B4*Ryuky!$A$1
>
>
>
>السلام عليكم ورحمة الله وبركاته
>
>Dear,
>Master Excel
>
>Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
dikalikan.
>
>karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada
yang tau solusinya ?
>وسلام عليكم ورحمة الله وبركاته
>
>
>
>Thanks & Best Regards
>Andy Ajhis. R
>
>
Miss Jan Raisin
Mkasih banyak miss :D wah ternyata rumusnya itu. thanks you miss...
hehe
وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Thanks & Best Regards
Andy Ajhis. R
____________
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Jumat, 2 Agustus 2013 15:12
Judul: Re: [belajar-excel] Memotong Rumus
وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
coba gunakan fungsi Indirect
formula awal:
=D8*Andy!A1
yang warna merah diubah menjadi
Indirect(alamat_
)
misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
=D8*
Indirect(A4&"
")
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
-Miss Jan Raisin-
Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan <andyajhisramadhan@
>
>MEMOTONG RUMUS
>Nama nilai kali Nilai kali dari sheets lain rumusan
>Andy 3 30 =D8*Andy!A1
>
>
>Ryuky 4 80 =B4*Ryuky!$A$
>
>
>
>السلام عليكم ورحمة الله وبركاته
>
>Dear,
>Master Excel
>
>Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
dikalikan.
>
>karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada
yang tau solusinya ?
>وسلام عليكم ورحمة الله وبركاته
>
>
>
>Thanks & Best Regards
>Andy Ajhis. R
>
>
Fri Aug 2, 2013 2:49 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Fungsi Indirect termasuk fungsi volatile. Artinya, jika ada sebuah cell
antah berantah yang tidak ada hubungannya dengan cell yang diberi formula
Indirect tadi berubah nilai, maka cell yang berformula indirect akan ikut
dikalkulasi.
Coba bayangkan jika ada 250000 cell menggunakan Indirect yang merujuk ke
sheet 1 sampai 12, dan pada sheet yang baru dibuat ada sembarang cell
sebijik yang berubah nilai. Lalu Excel mengkalkulasi yang 250000 cell itu.
(inilah sifat volatile)
Gimana ya kalau ternyata harus ada kegiatan entry data yang banyak ya.
Jadi, gunakan fungsi-fungsi volatile secara bijak dan tidak asal pasang.
Wassalam,
Kid,
2013/8/2 Andy Ajhis Ramadhan <andyajhisramadhan@ymail.com >
> **
>
>
> ������ ����� ����� ���� �������
>
> Miss Jan Raisin
>
> Mkasih banyak miss :D wah ternyata rumusnya itu. thanks you miss...
>
> hehe
>
>
> ������������ ��������� ���������� ����� �������������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
> ------------------------------
> *Dari:* Jan Raisin <miss.jan.raisin@gmail.com >
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Jumat, 2 Agustus 2013 15:12
> *Judul:* Re: [belajar-excel] Memotong Rumus
>
>
> ������������ ��������� ���������� ����� �������������
> coba gunakan fungsi Indirect
> formula awal:
> =D8*Andy!A1
>
> yang warna merah diubah menjadi
> Indirect(alamat_cell_nya&"
> !A1"
> )
>
> misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
> =D8*
> Indirect(A4&"
> !A1
> "
> )
>
> ���������� ���������� ���������� ����� �������������
>
> -Miss Jan Raisin-
>
>
> Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan <
> andyajhisramadhan@ymail.com > menulis:
>
> **
>
> MEMOTONG RUMUS Nama nilai kali Nilai kali dari sheets lain rumusan
> Andy 3 30
> =D8*Andy!A1
> Ryuky 4 80 =B4*Ryuky!$A$1
> ������ ����� ����� ���� �������
> Dear,
> Master Excel
>
> Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
> tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
> dikalikan.
>
> karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada yang
> tau solusinya ? ����� ����� ����� ���� �������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
>
>
>
>
antah berantah yang tidak ada hubungannya dengan cell yang diberi formula
Indirect tadi berubah nilai, maka cell yang berformula indirect akan ikut
dikalkulasi.
Coba bayangkan jika ada 250000 cell menggunakan Indirect yang merujuk ke
sheet 1 sampai 12, dan pada sheet yang baru dibuat ada sembarang cell
sebijik yang berubah nilai. Lalu Excel mengkalkulasi yang 250000 cell itu.
(inilah sifat volatile)
Gimana ya kalau ternyata harus ada kegiatan entry data yang banyak ya.
Jadi, gunakan fungsi-fungsi volatile secara bijak dan tidak asal pasang.
Wassalam,
Kid,
2013/8/2 Andy Ajhis Ramadhan <andyajhisramadhan@
> **
>
>
> ������ ����� ����� ���� �������
>
> Miss Jan Raisin
>
> Mkasih banyak miss :D wah ternyata rumusnya itu. thanks you miss...
>
> hehe
>
>
> ������������ ��������� ���������� ����� �������������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
> ------------
> *Dari:* Jan Raisin <miss.jan.raisin@
> *Kepada:* belajar-excel@
> *Dikirim:* Jumat, 2 Agustus 2013 15:12
> *Judul:* Re: [belajar-excel] Memotong Rumus
>
>
> ������������ ��������� ���������� ����� �������������
> coba gunakan fungsi Indirect
> formula awal:
> =D8*Andy!A1
>
> yang warna merah diubah menjadi
> Indirect(alamat_
> !A1"
> )
>
> misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
> =D8*
> Indirect(A4&"
> !A1
> "
> )
>
> ���������� ���������� ���������� ����� �������������
>
> -Miss Jan Raisin-
>
>
> Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan <
> andyajhisramadhan@
>
> **
>
> MEMOTONG RUMUS Nama nilai kali Nilai kali dari sheets lain rumusan
> Andy 3 30
> =D8*Andy!A1
> Ryuky 4 80 =B4*Ryuky!$A$
> ������ ����� ����� ���� �������
> Dear,
> Master Excel
>
> Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
> tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
> dikalikan.
>
> karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada yang
> tau solusinya ? ����� ����� ����� ���� �������
>
> Thanks & Best Regards
> Andy Ajhis. R
>
>
>
>
>
Fri Aug 2, 2013 3:49 am (PDT) . Posted by:
"Andy Ajhis Ramadhan" andy_ajhis37
Oh begitu ya Mr. Kid.
Mister aq mau tanya tentang hyperlink mister yang menggunakan Indirect yang gagal. atau mungkin karena kurangnya pemahaman saya.
Mohon bantuannya untuk para milis belajar juga. File terlampir. Terima Kasih.
Thanks & Best Regards
Andy Ajhis.R
----- Pesan yang Diteruskan -----
Dari: Mr. Kid <mr.nmkid@gmail.
Kepada: BeExcel <belajar-excel@
Dikirim: Jumat, 2 Agustus 2013 16:48
Judul: Re: [belajar-excel] Memotong Rumus
Fungsi Indirect termasuk fungsi volatile. Artinya, jika ada sebuah cell antah berantah yang tidak ada hubungannya dengan cell yang diberi formula Indirect tadi berubah nilai, maka cell yang berformula indirect akan ikut dikalkulasi.
Coba bayangkan jika ada 250000 cell menggunakan Indirect yang merujuk ke sheet 1 sampai 12, dan pada sheet yang baru dibuat ada sembarang cell sebijik yang berubah nilai. Lalu Excel mengkalkulasi yang 250000 cell itu.
(inilah sifat volatile)
Gimana ya kalau ternyata harus ada kegiatan entry data yang banyak ya.
Jadi, gunakan fungsi-fungsi volatile secara bijak dan tidak asal pasang.
Wassalam,
Kid,
2013/8/2 Andy Ajhis Ramadhan <andyajhisramadhan@
>
>السلام عليكم ورحمة الله وبركاته
>
>
>
>Miss Jan Raisin
>
>
>Mkasih banyak miss :D wah ternyata rumusnya itu. thanks you miss...
>
>
>hehe
>
>
>
>
> وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
>
>
>Thanks & Best Regards
>Andy Ajhis. R
>
>
>
>________
> Dari: Jan Raisin <miss.jan.raisin@
>Kepada: belajar-excel@
>Dikirim: Jumat, 2 Agustus 2013 15:12
>Judul: Re: [belajar-excel] Memotong Rumus
>
>
>
>
> وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>coba gunakan fungsi Indirect
>formula awal:
>=D8*Andy!
>
>
>
>yang warna merah diubah menjadi
>Indirect(
>)
>
>
>misal alamat cell yang berisi Andy ada di cell A4, maka formulanya menjadi
>=D8*
>Indirect(
>")
>
>
>وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 2 Agustus 2013 14.25, Andy Ajhis Ramadhan <andyajhisramadhan@
>
>
>>
>>MEMOTONG RUMUS
>>Nama nilai kali Nilai kali dari sheets lain rumusan
>>Andy 3 30 =D8*Andy!A1
>>
>>
>>Ryuky 4 80 =B4*Ryuky!$A$
>>
>>
>>
>>السلام عليكم ورحمة الله وبركاته
>>
>>Dear,
>>Master Excel
>>
>>Bagaimana cara membuat nama perkalian diatas menggunakan data disamping
tanpa membuat rumus dengan mengetik nama tersebut/mengklik sheet yang ingin
dikalikan.
>>
>>karena kalau rumusnya diubah menjadi =D8*A3&!A1 hasilnya gagal. Ada
yang tau solusinya ?
>>وسلام عليكم ورحمة الله وبركاته
>>
>>
>>
>>Thanks & Best Regards
>>Andy Ajhis. R
>>
>>
>
>
Fri Aug 2, 2013 12:51 am (PDT) . Posted by:
"Ahmad Syaifullah Lubis" syaifullah
Mr De Premor,
tip Range("D" & lRow) = Mid(sht.Range("A2"), 9) ini sudah bisa jalan.
tetapi mengapa formula tsb saya pakai untuk mengganti Nama2 Perusahaan, bisa tepat bisa tidak tepat karena masih ada 1 spasi di depannya. seperti kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa tanda titik) akan menghasilkan "Andika Bahtera" (cocok); tetapi kalau targetnya tertulis "PT. ANDIKA BAHTERA" akan menghasilkan " Andika Bahtera" (hasilnya ada spasi didepan Andika Bahtera. macro yang saya isi adalah Range("C" & lRow) = Mid(UCWords(sht.Range("A1")), 4) ini modifikasi dari macro yang lamanya yaitu Range("C" & lRow) = UCWords(sht.Range("A1")).
bagai
jangan pernah bosan ya Mr De Premor.
terima kasih.
ASL
tip Range("
tetapi mengapa formula tsb saya pakai untuk mengganti Nama2 Perusahaan, bisa tepat bisa tidak tepat karena masih ada 1 spasi di depannya. seperti kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa tanda titik) akan menghasilkan "Andika Bahtera" (cocok); tetapi kalau targetnya tertulis "PT. ANDIKA BAHTERA" akan menghasilkan " Andika Bahtera" (hasilnya ada spasi didepan Andika Bahtera. macro yang saya isi adalah Range("
bagai
jangan pernah bosan ya Mr De Premor.
terima kasih.
ASL
Fri Aug 2, 2013 1:02 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Fungsi replace dari library Excel alias yang bisa dipakai dalam cell, jika
akan digunakan dalam VBA harus menggunakan worksheetfunction.
Jika fungsi replace dari VB/VBA nya sendiri, dalam VBA bisa dipakai secara
langsung. Jadi fungsi replace dari VBA akan setara dengan fungsi MsgBox
atau Dir atau Mid, dst.
Penggunaan karakter $ dibelakang nama fungsi adalah untuk memanggil nama
fungsi tersebut. Fungsi yang namanya memiliki karakter $ adalah fungsi yang
membutuhkan input berupa string atau menghasilkan output berupa string.
Contoh fungsi Mid dan Mid$. VBA memiliki kedua fungsi tersebut. Yang lebih
dikenal adalah fungsi Mid daripada fungsi Mid$. Jika ditulis Mid( akan
tampak bahwa beberapa variabel seperti string dan Mid (nama fungsi) tidak
memiliki typedata yang jelas, maka pastilah akan ber-datatype variant.
Sedang pada Mid$( akan tampak bahwa variabel string memiliki datatype
string dan mid$ (nama fungsi) akan menghasilkan datatype string. Pengerjaan
fungsi yang memiliki kejelasan tipedata (baik input atau output) akan lebih
cepat dibanding yang variant.
Kadang kala, saking latahnya pake fungsi string (ada $) maka beberapa
fungsi yang memang bawaan orok sudah diset bertype string seperti replace,
tidak digunakan. Malah lebih memilih yang ada $ seperti replace$. Jadi
masalah $ ini adalah pilihan ketika ingin benar-benar pasti bahwa data
input maupun output harus disimpan sebagai string tanpa perlu memikirkan
lagi fungsi tersebut sudah bawaan oroknya string atau bukan.
Wassalam,
Kid.
2013/8/2 hendrik karnadi <hendrikkarnadi@yahoo.com >
> **
>
>
> Mr Kid,
> Ada beberapa Function dalam Worksheet, mis. Transpose, yang harus
> didahului dengan WorksheetFunction (ditulis WorksheetFunction.Transpose()
> ), sedangkan Replace (contoh Mr. Kid) tidak diahului dengan
> WorksheetFunction (pake $ cukup).
>
> Pertanyaannya:
> Waktu nulis VBA di VBE sheet, bagaimana kita mengetahui apakah suatu
> Function harus didahului dengan WorksheetFunction atau tidak atau harus
> pake $ atau tidak ?
>
> Terima ksaih.
>
> Salam,
> HK
>
>
> ------------------------------
> *From:* Mr. Kid <mr.nmkid@gmail.com >
> *To:* BeExcel <belajar-excel@yahoogroups.com >
> *Sent:* Thursday, 1 August 2013, 20:32
> *Subject:* Re: [belajar-excel] Fungsi Excel dalam Macro
>
>
> Hai Ahmad,
>
> Ganti :
> Range("D" & lRow) = sht.Range("A2")
> dengan
> Range("D" & lRow)*.value* = Replace$(sht.Range("A2") , "Laporan
> ",vbnullstring)
> (sorry, saya masuk aliran yang tidak suka menggunakan default property,
> agar tingkat ketertukaran dengan bahasa pemrograman lain bisa lebih tinggi
> karena mudah dikonversi ke dalam bahasa pemrograman lain)
>
> Wassalam,
> Kid.
>
>
>
> 2013/8/2 Ahmad Syaifullah Lubis <syaifullah@hotmail.com >
>
> **
>
> Mr De Premor & Excellers,
> Mohon dibantu ya,
> saya ingin belajar langsung praktek dari hasil macro Mr De Premor kirimkan
> tempo hari mengenai rekap nama2 workbook.
> bagaimana ya cara mempergunakan fungsi excel di dalam macro.
> sebagai contoh : Mr De Premor menuliskan dalam macro sbb : Range("D" &
> lRow) = sht.Range("A2") -> ini adalah untuk mengisi jenis laporan. Sehingga
> hasilnya adalah "Laporan Mandiri".
> pertanyaannya : bagaimana caranya agar yang diisi jenis laporan itu
> hanyalah nama banknya saja, jadi kata Laporan dibuang. bagaimana caranya
> agar fungsi TRIM(RIGHT(D6;LEN(D6)-7)) yang akan membuang kata : "Laporan"
> dalam macro tsb. Dengan kata lain saya tidak bisa menggabungkan penulisan
> macro dari Range("D" & lRow) = sht.Range("A2") digabungkan dengan funsi
> dari TRIM(RIGHT(D6;LEN(D6)-7)) yang mana yang saya tahu fungsi dari
> trim(right(len) akan membuang 7 karakter di depannya.
> Terima Kasih.
> ASL.
>
>
>
>
>
>
>
akan digunakan dalam VBA harus menggunakan worksheetfunction.
Jika fungsi replace dari VB/VBA nya sendiri, dalam VBA bisa dipakai secara
langsung. Jadi fungsi replace dari VBA akan setara dengan fungsi MsgBox
atau Dir atau Mid, dst.
Penggunaan karakter $ dibelakang nama fungsi adalah untuk memanggil nama
fungsi tersebut. Fungsi yang namanya memiliki karakter $ adalah fungsi yang
membutuhkan input berupa string atau menghasilkan output berupa string.
Contoh fungsi Mid dan Mid$. VBA memiliki kedua fungsi tersebut. Yang lebih
dikenal adalah fungsi Mid daripada fungsi Mid$. Jika ditulis Mid( akan
tampak bahwa beberapa variabel seperti string dan Mid (nama fungsi) tidak
memiliki typedata yang jelas, maka pastilah akan ber-datatype variant.
Sedang pada Mid$( akan tampak bahwa variabel string memiliki datatype
string dan mid$ (nama fungsi) akan menghasilkan datatype string. Pengerjaan
fungsi yang memiliki kejelasan tipedata (baik input atau output) akan lebih
cepat dibanding yang variant.
Kadang kala, saking latahnya pake fungsi string (ada $) maka beberapa
fungsi yang memang bawaan orok sudah diset bertype string seperti replace,
tidak digunakan. Malah lebih memilih yang ada $ seperti replace$. Jadi
masalah $ ini adalah pilihan ketika ingin benar-benar pasti bahwa data
input maupun output harus disimpan sebagai string tanpa perlu memikirkan
lagi fungsi tersebut sudah bawaan oroknya string atau bukan.
Wassalam,
Kid.
2013/8/2 hendrik karnadi <hendrikkarnadi@
> **
>
>
> Mr Kid,
> Ada beberapa Function dalam Worksheet, mis. Transpose, yang harus
> didahului dengan WorksheetFunction (ditulis WorksheetFunction.
> ), sedangkan Replace (contoh Mr. Kid) tidak diahului dengan
> WorksheetFunction (pake $ cukup).
>
> Pertanyaannya:
> Waktu nulis VBA di VBE sheet, bagaimana kita mengetahui apakah suatu
> Function harus didahului dengan WorksheetFunction atau tidak atau harus
> pake $ atau tidak ?
>
> Terima ksaih.
>
> Salam,
> HK
>
>
> ------------
> *From:* Mr. Kid <mr.nmkid@gmail.
> *To:* BeExcel <belajar-excel@
> *Sent:* Thursday, 1 August 2013, 20:32
> *Subject:* Re: [belajar-excel] Fungsi Excel dalam Macro
>
>
> Hai Ahmad,
>
> Ganti :
> Range("
> dengan
> Range("
> ",vbnullstring
> (sorry, saya masuk aliran yang tidak suka menggunakan default property,
> agar tingkat ketertukaran dengan bahasa pemrograman lain bisa lebih tinggi
> karena mudah dikonversi ke dalam bahasa pemrograman lain)
>
> Wassalam,
> Kid.
>
>
>
> 2013/8/2 Ahmad Syaifullah Lubis <syaifullah@hotmail.
>
> **
>
> Mr De Premor & Excellers,
> Mohon dibantu ya,
> saya ingin belajar langsung praktek dari hasil macro Mr De Premor kirimkan
> tempo hari mengenai rekap nama2 workbook.
> bagaimana ya cara mempergunakan fungsi excel di dalam macro.
> sebagai contoh : Mr De Premor menuliskan dalam macro sbb : Range("
> lRow) = sht.Range("
> hasilnya adalah "Laporan Mandiri"
> pertanyaannya : bagaimana caranya agar yang diisi jenis laporan itu
> hanyalah nama banknya saja, jadi kata Laporan dibuang. bagaimana caranya
> agar fungsi TRIM(RIGHT(D6;
> dalam macro tsb. Dengan kata lain saya tidak bisa menggabungkan penulisan
> macro dari Range("
> dari TRIM(RIGHT(D6;
> trim(right(len) akan membuang 7 karakter di depannya.
> Terima Kasih.
> ASL.
>
>
>
>
>
>
>
Fri Aug 2, 2013 2:31 am (PDT) . Posted by:
"De Premor" de.premor
Paling enaknya kalau masalahnya seperti ini, kita gunakan seperti yang
sudah dijabarkan Mr. Kid
Yaitu menggunakan fungsi Replace
Range("C" & lRow) = Trim(Replace(Replace(sht.Range("A1"), "PT.",
vbNullString), "PT", vbNullString))
Maksudnya adalah jika di Sht.Range("A1") ada katanya "PT." maka langsung
aja dibuang, lalu hasilnya dilihat lagi, ada lagikah kata "PT"? jika ada
buang juga, lalu hasilnya di TRIM buat membuang karakter spasi dikanan
kirinya(kalau ada)
Dengan menggunakan fungsi Replace ini ada keuntungannya, yaitu
jikamisalnilai Range A1 adalah :
"KUD Maju Beudh", maka hasilnya akan tetap seperti itu, beda kalau kita
memanfaatkan fungsi Mid seperti sebelumnya yang akan menghasilkan "D
Maju Beudh" padahal kita ingin hanya membuang kata PT, tetapi KU ikutan
terbuang.
Kekurangannya,
Jikamisalkan orang yang kebarat-baratan, mau bikin group usaha bernama
ACCEPT GROUP, maka akan ikut2an dibuang jugasehingga menjadi ACCE GROUP
(^_^)
Pada 02/08/2013 14:31, Ahmad Syaifullah Lubis menulis:
>
> Mr De Premor,
> tip Range("D" & lRow) = Mid(sht.Range("A2"), 9) ini sudah bisa jalan.
> tetapi mengapa formula tsb saya pakai untuk mengganti Nama2
> Perusahaan, bisa tepat bisa tidak tepat karena masih ada 1 spasi di
> depannya. seperti kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa
> tanda titik) akan menghasilkan "Andika Bahtera" (cocok); tetapi kalau
> targetnya tertulis "PT. ANDIKA BAHTERA" akan menghasilkan " Andika
> Bahtera" (hasilnya ada spasi didepan Andika Bahtera. macro yang saya
> isi adalah Range("C" & lRow) = Mid(UCWords(sht.Range("A1")), 4) ini
> modifikasi dari macro yang lamanya yaitu Range("C" & lRow) =
> UCWords(sht.Range("A1")).
> bagai
> jangan pernah bosan ya Mr De Premor.
> terima kasih.
> ASL
>
>
sudah dijabarkan Mr. Kid
Yaitu menggunakan fungsi Replace
Range("
vbNullString)
Maksudnya adalah jika di Sht.Range("
aja dibuang, lalu hasilnya dilihat lagi, ada lagikah kata "PT"
buang juga, lalu hasilnya di TRIM buat membuang karakter spasi dikanan
kirinya(kalau ada)
Dengan menggunakan fungsi Replace ini ada keuntungannya, yaitu
jikamisalnilai Range A1 adalah :
"KUD Maju Beudh", maka hasilnya akan tetap seperti itu, beda kalau kita
memanfaatkan fungsi Mid seperti sebelumnya yang akan menghasilkan "D
Maju Beudh" padahal kita ingin hanya membuang kata PT, tetapi KU ikutan
terbuang.
Kekurangannya,
Jikamisalkan orang yang kebarat-baratan, mau bikin group usaha bernama
ACCEPT GROUP, maka akan ikut2an dibuang jugasehingga menjadi ACCE GROUP
(^_^)
Pada 02/08/2013 14:31, Ahmad Syaifullah Lubis menulis:
>
> Mr De Premor,
> tip Range("
> tetapi mengapa formula tsb saya pakai untuk mengganti Nama2
> Perusahaan, bisa tepat bisa tidak tepat karena masih ada 1 spasi di
> depannya. seperti kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa
> tanda titik) akan menghasilkan "Andika Bahtera" (cocok); tetapi kalau
> targetnya tertulis "PT. ANDIKA BAHTERA" akan menghasilkan " Andika
> Bahtera" (hasilnya ada spasi didepan Andika Bahtera. macro yang saya
> isi adalah Range("
> modifikasi dari macro yang lamanya yaitu Range("
> UCWords(sht.
> bagai
> jangan pernah bosan ya Mr De Premor.
> terima kasih.
> ASL
>
>
Fri Aug 2, 2013 2:42 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Kadangkala, spasi itu penuh daya guna.
"ACCEPT GROUP" jika diubah dulu menjadi " ACCEPT GROUP" maka bisa
menggunakan replace untuk " PT." atau " PT "
Wassalam,
Kid.
2013/8/2 De Premor <de@premor.net>
> **
>
>
> Paling enaknya kalau masalahnya seperti ini, kita gunakan seperti yang
> sudah dijabarkan Mr. Kid
> Yaitu menggunakan fungsi Replace
>
> Range("C" & lRow) = Trim(Replace(Replace(sht.Range("A1"), "PT.",
> vbNullString), "PT", vbNullString))
>
> Maksudnya adalah jika di Sht.Range("A1") ada katanya "PT." maka langsung
> aja dibuang, lalu hasilnya dilihat lagi, ada lagi kah kata "PT" ? jika
> ada buang juga, lalu hasilnya di TRIM buat membuang karakter spasi dikanan
> kirinya (kalau ada)
>
> Dengan menggunakan fungsi Replace ini ada keuntungannya, yaitu jika misalnilai Range A1 adalah :
> "KUD Maju Beudh", maka hasilnya akan tetap seperti itu, beda kalau kita
> memanfaatkan fungsi Mid seperti sebelumnya yang akan menghasilkan "D Maju
> Beudh" padahal kita ingin hanya membuang kata PT, tetapi KU ikutan terbuang.
>
> Kekurangannya,
> Jika misalkan orang yang kebarat-baratan, mau bikin group usaha bernama ACCEPT
> GROUP, maka akan ikut2an dibuang juga sehingga menjadi ACCE GROUP (^_^)
>
> Pada 02/08/2013 14:31, Ahmad Syaifullah Lubis menulis:
>
>
>
> Mr De Premor,
> tip Range("D" & lRow) = Mid(sht.Range("A2"), 9) ini sudah bisa jalan.
> tetapi mengapa formula tsb saya pakai untuk mengganti Nama2 Perusahaan,
> bisa tepat bisa tidak tepat karena masih ada 1 spasi di depannya. seperti
> kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa tanda titik) akan
> menghasilkan "Andika Bahtera" (cocok); tetapi kalau targetnya tertulis "PT.
> ANDIKA BAHTERA" akan menghasilkan " Andika Bahtera" (hasilnya ada spasi
> didepan Andika Bahtera. macro yang saya isi adalah Range("C" & lRow) =
> Mid(UCWords(sht.Range("A1")), 4) ini modifikasi dari macro yang lamanya
> yaitu Range("C" & lRow) = UCWords(sht.Range("A1")).
> bagai
> jangan pernah bosan ya Mr De Premor.
> terima kasih.
> ASL
>
>
>
>
"ACCEPT GROUP" jika diubah dulu menjadi " ACCEPT GROUP" maka bisa
menggunakan replace untuk " PT." atau " PT "
Wassalam,
Kid.
2013/8/2 De Premor <de@premor.net>
> **
>
>
> Paling enaknya kalau masalahnya seperti ini, kita gunakan seperti yang
> sudah dijabarkan Mr. Kid
> Yaitu menggunakan fungsi Replace
>
> Range("
> vbNullString)
>
> Maksudnya adalah jika di Sht.Range("
> aja dibuang, lalu hasilnya dilihat lagi, ada lagi kah kata "PT" ? jika
> ada buang juga, lalu hasilnya di TRIM buat membuang karakter spasi dikanan
> kirinya (kalau ada)
>
> Dengan menggunakan fungsi Replace ini ada keuntungannya, yaitu jika misalnilai Range A1 adalah :
> "KUD Maju Beudh", maka hasilnya akan tetap seperti itu, beda kalau kita
> memanfaatkan fungsi Mid seperti sebelumnya yang akan menghasilkan "D Maju
> Beudh" padahal kita ingin hanya membuang kata PT, tetapi KU ikutan terbuang.
>
> Kekurangannya,
> Jika misalkan orang yang kebarat-baratan, mau bikin group usaha bernama ACCEPT
> GROUP, maka akan ikut2an dibuang juga sehingga menjadi ACCE GROUP (^_^)
>
> Pada 02/08/2013 14:31, Ahmad Syaifullah Lubis menulis:
>
>
>
> Mr De Premor,
> tip Range("
> tetapi mengapa formula tsb saya pakai untuk mengganti Nama2 Perusahaan,
> bisa tepat bisa tidak tepat karena masih ada 1 spasi di depannya. seperti
> kalau targetnya tertulis "PT ANDIKA BAHTERA" (tanpa tanda titik) akan
> menghasilkan "Andika Bahtera" (cocok); tetapi kalau targetnya tertulis "PT.
> ANDIKA BAHTERA" akan menghasilkan " Andika Bahtera" (hasilnya ada spasi
> didepan Andika Bahtera. macro yang saya isi adalah Range("
> Mid(UCWords(
> yaitu Range("
> bagai
> jangan pernah bosan ya Mr De Premor.
> terima kasih.
> ASL
>
>
>
>
Fri Aug 2, 2013 1:40 am (PDT) . Posted by:
"Heru Safrudin" superheruu
Misalkan kolom A hanya boleh diisi dengan numeric
Dan kolom B hanya boleh diisii string
Bagaimana code-nya ?
<ymsgr:sendIM?heru.safrudin>;
<http://www.carajawab.com/?id=heru.safrudin >
_____
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ]
On Behalf Of Jan Raisin
Sent: 02 Agustus 2013 14:32
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mendeteksi keystroke pada lembar kerja
pak Heru,
coba gunakan application.onkey
setiap tombol diwakili oleh tombol tersebut
misal:
{a} untuk huruf a
{1} untuk angka 1
{ENTER} untuk tombol ENTER
{F1} untuk tombol F1
sepesial karakter diapit dengan kurung kurawal
contoh: {^} untuk tanda ^ yang memiliki arti berbeda dengan "^" atau CTRL
spesial tombol hanya 3 yaitu:
tombol CTRL diwakili dengan "^"
tombol Shift diwakili dengan "+"
tombol Alt diwakili dengan "%"
contoh untuk men-disable tombol CTRL C (copy melalui keyboard)
Private Sub Worksheet_Activate()
Application.OnKey "^{c}", ""
End Sub
syntaxnya:
Application.OnKey nama_tombolnya, parameternya
Salam,
-Miss Jan Raisin-
Pada 2 Agustus 2013 13.41, Heru Safrudin <superheruu@gmail.com > menulis:
Dear Master,
Bisakah lembar kerja mendeteksi kunci yg sedang kita tombol ?
Ceritanya saya pingin mencegah/mengunci tombol tertentu.
Terima kasih
Dan kolom B hanya boleh diisii string
Bagaimana code-nya ?
<ymsgr:sendIM?
<http://www.carajawa
_____
From: belajar-excel@
On Behalf Of Jan Raisin
Sent: 02 Agustus 2013 14:32
To: belajar-excel@
Subject: Re: [belajar-excel] Mendeteksi keystroke pada lembar kerja
pak Heru,
coba gunakan application.
setiap tombol diwakili oleh tombol tersebut
misal:
{a} untuk huruf a
{1} untuk angka 1
{ENTER} untuk tombol ENTER
{F1} untuk tombol F1
sepesial karakter diapit dengan kurung kurawal
contoh: {^} untuk tanda ^ yang memiliki arti berbeda dengan "^" atau CTRL
spesial tombol hanya 3 yaitu:
tombol CTRL diwakili dengan "^"
tombol Shift diwakili dengan "+"
tombol Alt diwakili dengan "%"
contoh untuk men-disable tombol CTRL C (copy melalui keyboard)
Private Sub Worksheet_Activate(
Application.
End Sub
syntaxnya:
Application.
Salam,
-Miss Jan Raisin-
Pada 2 Agustus 2013 13.41, Heru Safrudin <superheruu@gmail.
Dear Master,
Bisakah lembar kerja mendeteksi kunci yg sedang kita tombol ?
Ceritanya saya pingin mencegah/mengunci tombol tertentu.
Terima kasih
Fri Aug 2, 2013 2:44 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Selain dengan data validation yang memiliki banyak keterbatasan, bisa juga
dengan manfaatkan event change milik worksheet, misal :
dim rng as range
application.enableevents=false
for each rng in target
select case rng.column
case 1
if not isnumeric(rng.value) then
rng.clearcontents
endif
case 2
if isnumeric(rng.value) then
rng.clearcontents
endif
end select
next rng
application.enableevents=true
:)
supaya yang kondang gak suma IF saja
Wassalam,
Kid.
2013/8/2 Heru Safrudin <superheruu@gmail.com >
> **
>
>
> Misalkan kolom A hanya boleh diisi dengan numeric****
>
> Dan kolom B hanya boleh diisii string****
>
> ** **
>
> Bagaimana code-nya ?****
>
> ** **
>
> ****** **
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> <http://www.carajawab.com/?id=heru.safrudin >****
>
> ****
> ------------------------------
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com ] *On Behalf Of *Jan Raisin
> *Sent:* 02 Agustus 2013 14:32
> *To:* belajar-excel@yahoogroups.com
> *Subject:* Re: [belajar-excel] Mendeteksi keystroke pada lembar kerja****
>
> ** **
>
> ****
>
> pak Heru,****
>
> ** **
>
> coba gunakan application.onkey****
>
> setiap tombol diwakili oleh tombol tersebut****
>
> ** **
>
> misal:****
>
> {a} untuk huruf a****
>
> {1} untuk angka 1****
>
> {ENTER} untuk tombol ENTER****
>
> {F1} untuk tombol F1****
>
> sepesial karakter diapit dengan kurung kurawal****
>
> contoh: {^} untuk tanda ^ yang memiliki arti berbeda dengan "^" atau CTRL*
> ***
>
> ** **
>
> spesial tombol hanya 3 yaitu:****
>
> tombol CTRL diwakili dengan "^"****
>
> tombol Shift diwakili dengan "+"****
>
> tombol Alt diwakili dengan "%"****
>
> ** **
>
> contoh untuk men-disable tombol CTRL C (copy melalui keyboard) ****
>
> ** **
>
> Private Sub Worksheet_Activate()****
>
> Application.OnKey "^{c}", ""****
>
> End Sub****
>
> ** **
>
> syntaxnya:****
>
> ** **
>
> Application.OnKey nama_tombolnya, parameternya****
>
> ** **
>
> Salam,****
>
> ** **
>
> -Miss Jan Raisin-****
>
> ** **
>
> Pada 2 Agustus 2013 13.41, Heru Safrudin <superheruu@gmail.com > menulis:**
> **
>
> ****
>
> Dear Master,****
>
> ****
>
> Bisakah lembar kerja mendeteksi kunci yg sedang kita tombol ?****
>
> Ceritanya saya pingin mencegah/mengunci tombol tertentu.****
>
> ****
>
> Terima kasih****
>
> ****
>
> ****
>
> ****
>
> ** **
>
>
>
dengan manfaatkan event change milik worksheet, misal :
dim rng as range
application.
for each rng in target
select case rng.column
case 1
if not isnumeric(rng.
rng.clearcontents
endif
case 2
if isnumeric(rng.
rng.clearcontents
endif
end select
next rng
application.
:)
supaya yang kondang gak suma IF saja
Wassalam,
Kid.
2013/8/2 Heru Safrudin <superheruu@gmail.
> **
>
>
> Misalkan kolom A hanya boleh diisi dengan numeric****
>
> Dan kolom B hanya boleh diisii string****
>
> ** **
>
> Bagaimana code-nya ?****
>
> ** **
>
> ****** **
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> <http://www.carajawa
>
> ****
> ------------
>
> *From:* belajar-excel@
> belajar-excel@
> *Sent:* 02 Agustus 2013 14:32
> *To:* belajar-excel@
> *Subject:* Re: [belajar-excel] Mendeteksi keystroke pada lembar kerja****
>
> ** **
>
> ****
>
> pak Heru,****
>
> ** **
>
> coba gunakan application.
>
> setiap tombol diwakili oleh tombol tersebut****
>
> ** **
>
> misal:****
>
> {a} untuk huruf a****
>
> {1} untuk angka 1****
>
> {ENTER} untuk tombol ENTER****
>
> {F1} untuk tombol F1****
>
> sepesial karakter diapit dengan kurung kurawal****
>
> contoh: {^} untuk tanda ^ yang memiliki arti berbeda dengan "^" atau CTRL*
> ***
>
> ** **
>
> spesial tombol hanya 3 yaitu:****
>
> tombol CTRL diwakili dengan "^"
>
> tombol Shift diwakili dengan "+"
>
> tombol Alt diwakili dengan "%"
>
> ** **
>
> contoh untuk men-disable tombol CTRL C (copy melalui keyboard) ****
>
> ** **
>
> Private Sub Worksheet_Activate(
>
> Application.
>
> End Sub****
>
> ** **
>
> syntaxnya:**
>
> ** **
>
> Application.
>
> ** **
>
> Salam,****
>
> ** **
>
> -Miss Jan Raisin-****
>
> ** **
>
> Pada 2 Agustus 2013 13.41, Heru Safrudin <superheruu@gmail.
> **
>
> ****
>
> Dear Master,****
>
> ****
>
> Bisakah lembar kerja mendeteksi kunci yg sedang kita tombol ?****
>
> Ceritanya saya pingin mencegah/mengunci tombol tertentu.***
>
> ****
>
> Terima kasih****
>
> ****
>
> ****
>
> ****
>
> ** **
>
>
>
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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:
Posting Komentar