15 New Messages
Digest #2461
Messages
Sun Aug 12, 2012 3:36 am (PDT) . Posted by:
"Suprayitno"
Selamat Pagi,
Permisi Para pakar Excel semuanya, saya mengalami kesulitan dalam membuat macro yang secara otomatis menggantikan tanggal dari sumber data dengan hanya memasukan tanggal penggantinya.
Dibawah ini gambar dari lampiran file nya. :
[cid:image001.jpg@01CD7793.F2309360 ]
Mohon pencerahannya untuk hal tersebut diatas, Kami kesulitan membuat macronya...
Sekian atas perhatiannya saya sampaikan terima kasih..
salam,
Ayik
Permisi Para pakar Excel semuanya, saya mengalami kesulitan dalam membuat macro yang secara otomatis menggantikan tanggal dari sumber data dengan hanya memasukan tanggal penggantinya.
Dibawah ini gambar dari lampiran file nya. :
[cid:image001.jpg@
Mohon pencerahannya untuk hal tersebut diatas, Kami kesulitan membuat macronya...
Sekian atas perhatiannya saya sampaikan terima kasih..
salam,
Ayik
Sun Aug 12, 2012 3:36 am (PDT) . Posted by:
"effendi Wijaya"
Dear Para pakar excel mania,
Trimakasih pada group ini,karena banyak membantu sy dalam menyelesaikan
pekerjaan sehari hari
Kali ini sy butuh bantuan dari pakar semua,
Bagaimana mencari BOM dari suatu product,
Contoh kasus terlampir.
Trimakasih pada teman2 yg bias kasih solusi, pakai formula or macro is ok.
E.Wijaya
Trimakasih pada group ini,karena banyak membantu sy dalam menyelesaikan
pekerjaan sehari hari
Kali ini sy butuh bantuan dari pakar semua,
Bagaimana mencari BOM dari suatu product,
Contoh kasus terlampir.
Trimakasih pada teman2 yg bias kasih solusi, pakai formula or macro is ok.
E.Wijaya
Sun Aug 12, 2012 3:37 am (PDT) . Posted by:
"rivo jacob" revival_name
mudah-mudahan sesuai harapan
On 8/7/12, ahmad <ahmad@tanabe.co.id > wrote:
>
> Dear All,
>
> Mohon pencerahannya seperti data dibawah ini
>
>
>
> Terimakasih.
>
> Salam hormat,
> Aa
>
>
> <p class=MsoNormal><font size=1 color=gray face=Arial><span
> style='font-size:7.5pt;color:gray'>
> Information provided in this email, including any attachments, is intended
> for the addressee named and deemed confidential property of PT. Tanabe
> Indonesia. Any use of information provided herein, including but not limited
> to the registered PT. Tanabe Indonesia name and logo are prohibited without
> the written permission of PT. Tanabe Indonesia. If you are not the intended
> recipient, any use, printing, copying or distribution of this e-mail or of
> any attachments to it is strictly prohibited. If you received this e-mail in
> error, please advise the sender immediately and delete the e-mail and any
> attachments from your system. Thank you.
> </span></font><font face="Times New Roman"><span style='font-family:"Times
> New Roman"'><o:p></o:p></span></font></p>
>
On 8/7/12, ahmad <ahmad@tanabe.
>
> Dear All,
>
> Mohon pencerahannya seperti data dibawah ini
>
>
>
> Terimakasih.
>
> Salam hormat,
> Aa
>
>
> <p class=MsoNormal>
> style='font-
> Information provided in this email, including any attachments, is intended
> for the addressee named and deemed confidential property of PT. Tanabe
> Indonesia. Any use of information provided herein, including but not limited
> to the registered PT. Tanabe Indonesia name and logo are prohibited without
> the written permission of PT. Tanabe Indonesia. If you are not the intended
> recipient, any use, printing, copying or distribution of this e-mail or of
> any attachments to it is strictly prohibited. If you received this e-mail in
> error, please advise the sender immediately and delete the e-mail and any
> attachments from your system. Thank you.
> </span></font>
> New Roman"'><o:p>
>
Sun Aug 12, 2012 3:41 am (PDT) . Posted by:
"Iwan Setiawan"
Di cell D5 diketik formula : =IF($B5="";"";$B5&"."&COUNTIF($B$5:$B5;$B5))
Kemudian dicopy ke bawah
From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com ] On Behalf Of ahmad
Sent: 08 Agustus 2012 7:56
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Importance: High
Dear All,
Mohon pencerahannya seperti data dibawah ini
[cid:image001.jpg@01CD760A.EDC7D7A0 ]
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended for the addressee named and deemed confidential property of PT. Tanabe Indonesia. Any use of information provided herein, including but not limited to the registered PT. Tanabe Indonesia name and logo are prohibited without the written permission of PT. Tanabe Indonesia. If you are not the intended recipient, any use, printing, copying or distribution of this e-mail or of any attachments to it is strictly prohibited. If you received this e-mail in error, please advise the sender immediately and delete the e-mail and any attachments from your system. Thank you.
Kemudian dicopy ke bawah
From: XL-mania@yahoogroup
Sent: 08 Agustus 2012 7:56
To: XL-mania@yahoogroup
Subject: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Importance: High
Dear All,
Mohon pencerahannya seperti data dibawah ini
[cid:image001.jpg@
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended for the addressee named and deemed confidential property of PT. Tanabe Indonesia. Any use of information provided herein, including but not limited to the registered PT. Tanabe Indonesia name and logo are prohibited without the written permission of PT. Tanabe Indonesia. If you are not the intended recipient, any use, printing, copying or distribution of this e-mail or of any attachments to it is strictly prohibited. If you received this e-mail in error, please advise the sender immediately and delete the e-mail and any attachments from your system. Thank you.
Sun Aug 12, 2012 3:42 am (PDT) . Posted by:
"Ridwan"
Coba rumus di E5 : =CONCATENATE(B5,".",COUNTIF($B$5:B5,B5))
Tularkan ke bawahnya.
Ridwan
From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com ] On Behalf
Of ahmad
Sent: Wednesday, August 08, 2012 7:56 AM
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Importance: High
Dear All,
Mohon pencerahannya seperti data dibawah ini
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended
for the addressee named and deemed confidential property of PT. Tanabe
Indonesia. Any use of information provided herein, including but not limited
to the registered PT. Tanabe Indonesia name and logo are prohibited without
the written permission of PT. Tanabe Indonesia. If you are not the intended
recipient, any use, printing, copying or distribution of this e-mail or of
any attachments to it is strictly prohibited. If you received this e-mail in
error, please advise the sender immediately and delete the e-mail and any
attachments from your system. Thank you.
Tularkan ke bawahnya.
Ridwan
From: XL-mania@yahoogroup
Of ahmad
Sent: Wednesday, August 08, 2012 7:56 AM
To: XL-mania@yahoogroup
Subject: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Importance: High
Dear All,
Mohon pencerahannya seperti data dibawah ini
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended
for the addressee named and deemed confidential property of PT. Tanabe
Indonesia. Any use of information provided herein, including but not limited
to the registered PT. Tanabe Indonesia name and logo are prohibited without
the written permission of PT. Tanabe Indonesia. If you are not the intended
recipient, any use, printing, copying or distribution of this e-mail or of
any attachments to it is strictly prohibited. If you received this e-mail in
error, please advise the sender immediately and delete the e-mail and any
attachments from your system. Thank you.
Sun Aug 12, 2012 3:44 am (PDT) . Posted by:
"Kid Mr." nmkid.family@ymail.com
Coba :
=b5 + countif( b$5:b5 , b5 ) / 10
Regards,
Kid.
On Wed, Aug 8, 2012 at 7:55 AM, ahmad <ahmad@tanabe.co.id > wrote:
> **
>
> ** **
>
> Dear All,****
>
> ** **
>
> Mohon pencerahannya seperti data dibawah ini****
>
> ** **
>
> ****
>
> ** **
>
> Terimakasih.****
>
> ** **
>
> Salam hormat,****
>
> Aa****
>
>
> Information provided in this email, including any attachments, is intended
> for the addressee named and deemed confidential property of PT. Tanabe
> Indonesia. Any use of information provided herein, including but not
> limited to the registered PT. Tanabe Indonesia name and logo are prohibited
> without the written permission of PT. Tanabe Indonesia. If you are not the
> intended recipient, any use, printing, copying or distribution of this
> e-mail or of any attachments to it is strictly prohibited. If you received
> this e-mail in error, please advise the sender immediately and delete the
> e-mail and any attachments from your system. Thank you.
> ****
>
>
=b5 + countif( b$5:b5 , b5 ) / 10
Regards,
Kid.
On Wed, Aug 8, 2012 at 7:55 AM, ahmad <ahmad@tanabe.
> **
>
> ** **
>
> Dear All,****
>
> ** **
>
> Mohon pencerahannya seperti data dibawah ini****
>
> ** **
>
> ****
>
> ** **
>
> Terimakasih.
>
> ** **
>
> Salam hormat,****
>
> Aa****
>
>
> Information provided in this email, including any attachments, is intended
> for the addressee named and deemed confidential property of PT. Tanabe
> Indonesia. Any use of information provided herein, including but not
> limited to the registered PT. Tanabe Indonesia name and logo are prohibited
> without the written permission of PT. Tanabe Indonesia. If you are not the
> intended recipient, any use, printing, copying or distribution of this
> e-mail or of any attachments to it is strictly prohibited. If you received
> this e-mail in error, please advise the sender immediately and delete the
> e-mail and any attachments from your system. Thank you.
> ****
>
>
Sun Aug 12, 2012 3:39 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Kesulitan dengan FIFO adalah menetukan titik awal dari saldo terakhir. Untuk itu perlu dibuatkan kolom bantu sesuai urutan pembelian, dengan menggunkan fungsi countif
Kolom bantu juga digunakan untuk mencantumkan HPP dalam penjualan dan menghitung posisi stock akhir, sesuai urutan pembelian
Data Validation untuk memberi tanda apabila terjadi "kelebihan" penjualan atas sisa stock dari urutan pembelian sebelumnya.
Macro diperlukan untuk memberikan Pesan mengenai "kelebihan" tersebut agar user dapat melanjutkan dengan urutan pembelian berikutnya.
Salam,
Hendrik Karnadi
----- Forwarded Message -----
From: hendrik karnadi <hendrikkarnadi@yahoo.com >
To: "XL-mania@yahoogroups.com " <XL-mania@yahoogroups.com >
Sent: Wednesday, 8 August 2012, 20:59
Subject: Re: ]] XL-mania [[ nanya sistem HPP FIFO
Coba pelajari file terlampir, yang sumbernya saya modifikasi dari internet.
Pernah dijelaskan oleh Mbak Siti.
Karena penjelasannya cukup panjang, silakan baca bukunya berjudul "Tingkatkan Keinerja Excel 2007 - 2010 Anda dengan VBA Excel"
Salam,
Hendrik Karnadi
________________________________
From: verry susanto <verry.xlmania@gmail.com >
To: XL-mania@yahoogroups.com
Sent: Wednesday, 8 August 2012, 10:17
Subject: ]] XL-mania [[ nanya sistem HPP FIFO
hi teman - teman Xl mania
salam kenal dari nubie dalam hal excell
saya Verry
asal jakarta
pekerjaan kantoran
mohon dapat di ajarin rumus2 excell yang ajibbb
sekalian mau nanya, bisa ga ya kita buat HPP dari stok menggunakan sistem FIFO (First In First Out)
contoh data terlampir
terima kasih
Kolom bantu juga digunakan untuk mencantumkan HPP dalam penjualan dan menghitung posisi stock akhir, sesuai urutan pembelian
Data Validation untuk memberi tanda apabila terjadi "kelebihan" penjualan atas sisa stock dari urutan pembelian sebelumnya.
Macro diperlukan untuk memberikan Pesan mengenai "kelebihan" tersebut agar user dapat melanjutkan dengan urutan pembelian berikutnya.
Salam,
Hendrik Karnadi
----- Forwarded Message -----
From: hendrik karnadi <hendrikkarnadi@
To: "XL-mania@yahoogroup
Sent: Wednesday, 8 August 2012, 20:59
Subject: Re: ]] XL-mania [[ nanya sistem HPP FIFO
Coba pelajari file terlampir, yang sumbernya saya modifikasi dari internet.
Pernah dijelaskan oleh Mbak Siti.
Karena penjelasannya cukup panjang, silakan baca bukunya berjudul "Tingkatkan Keinerja Excel 2007 - 2010 Anda dengan VBA Excel"
Salam,
Hendrik Karnadi
____________
From: verry susanto <verry.xlmania@
To: XL-mania@yahoogroup
Sent: Wednesday, 8 August 2012, 10:17
Subject: ]] XL-mania [[ nanya sistem HPP FIFO
hi teman - teman Xl mania
salam kenal dari nubie dalam hal excell
saya Verry
asal jakarta
pekerjaan kantoran
mohon dapat di ajarin rumus2 excell yang ajibbb
sekalian mau nanya, bisa ga ya kita buat HPP dari stok menggunakan sistem FIFO (First In First Out)
contoh data terlampir
terima kasih
Sun Aug 12, 2012 3:39 am (PDT) . Posted by:
"NANG Agus"
Dear Neni
Bagaimana jika digunakan Sub Total saja. sehingga biar komputer yang
mengaturnya sendiri.
salam
NangAgus
2012/8/8 Neni Listiani <nine_nie91@yahoo.com >
> **
>
>
> Dear master-master excel,
>
> Saya ingin menjumlah kan angka-angka berdasarkan border tebal,,,
> jadi setiap dalam kotak tersebut saya ingin jumlahkan,,,
> atau barangkali dengan cara lain berdasarkan tanggalnya atau yang lain.
>
> Mohon bantuannya. karna kotak-kotak yang akan saya jumlahkan banyak sekali.
> Terima Kasih.
> Berikut saya lampirkan contohnya.
>
>
>
Bagaimana jika digunakan Sub Total saja. sehingga biar komputer yang
mengaturnya sendiri.
salam
NangAgus
2012/8/8 Neni Listiani <nine_nie91@yahoo.
> **
>
>
> Dear master-master excel,
>
> Saya ingin menjumlah kan angka-angka berdasarkan border tebal,,,
> jadi setiap dalam kotak tersebut saya ingin jumlahkan,,,
> atau barangkali dengan cara lain berdasarkan tanggalnya atau yang lain.
>
> Mohon bantuannya. karna kotak-kotak yang akan saya jumlahkan banyak sekali.
> Terima Kasih.
> Berikut saya lampirkan contohnya.
>
>
>
Sun Aug 12, 2012 3:43 am (PDT) . Posted by:
"Kid Mr." nmkid.family@ymail.com
Coba di D2 :
=IF(A3,SUM(INDEX(C$2:C2,MATCH(A3,A$2:A2,1)):C2),IF((LOOKUP(9^9,A$2:A2)=MAX($A$2:$A$87))*(LEN(B3)=0),SUM(INDEX(C$2:C2,MATCH(9^9,A$2:A2,1)):C2),""))
Regards,
Kid.
2012/8/8 Neni Listiani <nine_nie91@yahoo.com >
> **
>
>
> Dear master-master excel,
>
> Saya ingin menjumlah kan angka-angka berdasarkan border tebal,,,
> jadi setiap dalam kotak tersebut saya ingin jumlahkan,,,
> atau barangkali dengan cara lain berdasarkan tanggalnya atau yang lain.
>
> Mohon bantuannya. karna kotak-kotak yang akan saya jumlahkan banyak sekali.
> Terima Kasih.
> Berikut saya lampirkan contohnya.
>
>
>
=IF(A3,SUM(INDEX(
Regards,
Kid.
2012/8/8 Neni Listiani <nine_nie91@yahoo.
> **
>
>
> Dear master-master excel,
>
> Saya ingin menjumlah kan angka-angka berdasarkan border tebal,,,
> jadi setiap dalam kotak tersebut saya ingin jumlahkan,,,
> atau barangkali dengan cara lain berdasarkan tanggalnya atau yang lain.
>
> Mohon bantuannya. karna kotak-kotak yang akan saya jumlahkan banyak sekali.
> Terima Kasih.
> Berikut saya lampirkan contohnya.
>
>
>
Sun Aug 12, 2012 3:41 am (PDT) . Posted by:
"Alexander Ringo" alex_ringo95
Semoga bisa membantu ..
From: founie hilman [mailto:f.hilman03@gmail.com ]
Sent: 08 Agustus 2012 9:33
To: XL-mania
Subject: ]] XL-mania [[ Menampilkan nilai yang tdk terinput
Dear Pakar Excel,
Mohon bantuannya, bagaimana cara menampilkan isi pada kolom tertentu
yang datanya tidak diinputkan.
Misalnya pada kolom A adalah datanya, kolom C adalah inputnya, kolom E
adalah data pada kolom A yang tidak terdapat pada kolom C.
Utk lebih jelasnya bia dilihat file contoh terlampir.
Terimakasih atas bantuannya...
From: founie hilman [mailto:f.hilman03@gmail.
Sent: 08 Agustus 2012 9:33
To: XL-mania
Subject: ]] XL-mania [[ Menampilkan nilai yang tdk terinput
Dear Pakar Excel,
Mohon bantuannya, bagaimana cara menampilkan isi pada kolom tertentu
yang datanya tidak diinputkan.
Misalnya pada kolom A adalah datanya, kolom C adalah inputnya, kolom E
adalah data pada kolom A yang tidak terdapat pada kolom C.
Utk lebih jelasnya bia dilihat file contoh terlampir.
Terimakasih atas bantuannya..
Sun Aug 12, 2012 3:43 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Bisa pakai macro atau formula.
Saya lebih prefer pakai macro yang bunyinya sbb:
Sub Rekon()
Dim a, b, x As Range
Dim i As Integer
Set a = Range(Range("A1"), Range("A1").End(xlDown))
Set b = Range(Range("C1"), Range("C1").End(xlDown))
For Each x In a
If WorksheetFunction.CountIf(b, x) = 0 Then
i = i + 1
x.Copy Range("E" & i)
End If
Next x
End Sub
File terlampir.
Mudah2an tidak terlalu sulit untuk dipahami
Salam,
Hendrik Karnadi
________________________________
From: founie hilman <f.hilman03@gmail.com >
To: XL-mania <XL-mania@yahoogroups.com >
Sent: Wednesday, 8 August 2012, 9:33
Subject: ]] XL-mania [[ Menampilkan nilai yang tdk terinput
Dear Pakar Excel,
Mohon bantuannya, bagaimana cara menampilkan isi pada kolom tertentu
yang datanya tidak diinputkan.
Misalnya pada kolom A adalah datanya, kolom C adalah inputnya, kolom E
adalah data pada kolom A yang tidak terdapat pada kolom C.
Utk lebih jelasnya bia dilihat file contoh terlampir.
Terimakasih atas bantuannya...
Saya lebih prefer pakai macro yang bunyinya sbb:
Sub Rekon()
Dim a, b, x As Range
Dim i As Integer
Set a = Range(Range(
Set b = Range(Range(
For Each x In a
If WorksheetFunction.
i = i + 1
x.Copy Range("E" & i)
End If
Next x
End Sub
File terlampir.
Mudah2an tidak terlalu sulit untuk dipahami
Salam,
Hendrik Karnadi
____________
From: founie hilman <f.hilman03@gmail.
To: XL-mania <XL-mania@yahoogroup
Sent: Wednesday, 8 August 2012, 9:33
Subject: ]] XL-mania [[ Menampilkan nilai yang tdk terinput
Dear Pakar Excel,
Mohon bantuannya, bagaimana cara menampilkan isi pada kolom tertentu
yang datanya tidak diinputkan.
Misalnya pada kolom A adalah datanya, kolom C adalah inputnya, kolom E
adalah data pada kolom A yang tidak terdapat pada kolom C.
Utk lebih jelasnya bia dilihat file contoh terlampir.
Terimakasih atas bantuannya..
Sun Aug 12, 2012 3:42 am (PDT) . Posted by:
"Eko Susanto" ekosusanto2001
Hi Mas VerrySusanto,
Apakah seperti ini yg dimaksud?
Thx
From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com ] On Behalf
Of verry susanto
Sent: 08 Agustus 2012 10:17
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ nanya sistem HPP FIFO
hi teman - teman Xl mania
salam kenal dari nubie dalam hal excell
saya Verry
asal jakarta
pekerjaan kantoran
mohon dapat di ajarin rumus2 excell yang ajibbb
sekalian mau nanya, bisa ga ya kita buat HPP dari stok menggunakan sistem
FIFO (First In First Out)
contoh data terlampir
terima kasih
Apakah seperti ini yg dimaksud?
Thx
From: XL-mania@yahoogroup
Of verry susanto
Sent: 08 Agustus 2012 10:17
To: XL-mania@yahoogroup
Subject: ]] XL-mania [[ nanya sistem HPP FIFO
hi teman - teman Xl mania
salam kenal dari nubie dalam hal excell
saya Verry
asal jakarta
pekerjaan kantoran
mohon dapat di ajarin rumus2 excell yang ajibbb
sekalian mau nanya, bisa ga ya kita buat HPP dari stok menggunakan sistem
FIFO (First In First Out)
contoh data terlampir
terima kasih
Sun Aug 12, 2012 3:43 am (PDT) . Posted by:
"Opik Pds" opik_pds
1. Jika terdapat 10 sheets, misal asumsinya tiap2 sheet isinya sama persis macronya menjadi:
Sub Insert10()
Sheet1.Cells.Find(what:="m-t-m", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Selection.EntireColumn.Insert
Sheet2.Select
Sheet2.Cells.Find(what:="m-t-m", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Selection.EntireColumn.Insert
Sheet3.Select
Sheet3.Cells.Find(what:="m-t-m", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Selection.EntireColumn.Insert
'dan seterusnya sebanyak sheet yang diinginkan dengan mengubah yang diwarnain biru tersebut.
'tambahkan Sheet1.Select untuk kembali ke sheet awal setelah insert selesai
Sheet1.Select
End Sub
2. Awalnya saya ingin coba menggunakan formula [=((K7/J7)-1*100%)], tapi setelah dilakukan insert, alamat cell formula yang dituju tetap sama [=((K7/J7)-1*100%)] misalnya pertumbuhan mei ke juni. Makanya saya buat macro juga, setidaknya akan lebih mempermudah dibanding dengan mengetik formula setiap kali insert kolom. Mungkin ada formula yg tepat, tapi saya kurang faham dengan formula.
3. Asumsinya sama pertumbuhan bulan desember (2902993.727) tahun sebelumnya dengan bulan terakhir, paling saya bisa kasih solusi pake macro lagi. Bikin shape samping Formula, kemudian masukkan kedalam vba:
Sub YTD()
Selection.FormulaR1C1 = "=(RC[-2]/2902993.727)-1*100%"
End Sub
kemudian shapenya di Assign Macro ke YTD
Kendalanya, ketika pergantian tahun, maka di vbanya harus dirubah dengan nilai desember yg sekarang.
barangkali member yg lain bisa kasih solusi formulanya, biar saya bisa belajar juga untuk kasus seperti ini
Regard,
Opik
________________________________
From: achmad dwinanto <achmad_plangton2a@yahoo.com >
To: "XL-mania@yahoogroups.com " <XL-mania@yahoogroups.com >
Sent: Wednesday, August 8, 2012 10:52 AM
Subject: Re: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
terima kasih mas opik atas bantuannya.. macronya apik tenan :)
masih ada yg mo dintanya lagi neh,
1. Bagaimana macro jika insert kolom nya lebih dari 1 sheet? misal ada 10 sheet ( sheet 1 sampai sheet 10
2. untuk perhitungan m-t-m mohon dibuat dalam 1 x langkah, karena datanya sangat panjang. untuk perhitungan ini mungkin lebih efektifnya pakai formula (lebih simple), tp saya ga ngerti bagaimana formulanya.
3. untuk rumus y-t-d, sama dengan rumus m-t-m namun yg dibagi adalah bulan desember, misal (jun-des)/des.
oh iya... setiap bulan datanya tidak ada perubahan, begitu juga dengan data desember tidak berubah.
mohon bantuannya,
terima kasih
From: Opik Pds <opik_pds@yahoo.com >
To: "XL-mania@yahoogroups.com " <XL-mania@yahoogroups.com >
Sent: Saturday, August 4, 2012 2:45 AM
Subject: Re: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
Saya bukan master tapi pengen coba bantu selesaikan
Pertanyaan 1 macronya kira2 seperti ini:
Cells.Find(What:="m-t-m", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Selection.EntireColumn.Insert
Pertanyaan 2 pertumbuhan M-T-M saya hanya bisa bantu formula menggunakan macro, dengan petunjuk ada di file terlampir. Pertumbuhan Y-T-D saya tidak bisa, karena kondisi kolom Desember tahun sebelumnya bisa berubah2, kayanya tetep manual
From: achmad dwinanto <achmad_plangton2a@yahoo.com >
To: xl mania <XL-mania@yahoogroups.com >
Sent: Thursday, August 2, 2012 12:00 PM
Subject: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
para master excel yang canggih2
pada file attactment terdapat data series yang setiap bulan saya input datanya, karena masih manual mohon bantuan untuk macro nya dengan rincian :
1. insert kolom pada kolom setelah data bulan terakhir
2. memperhitungkan pertumbuhan month-to-month dan year on year
terima kasih
Sub Insert10()
Sheet1.Cells.
:=xlPart, SearchOrder:
False, SearchFormat:
Selection.EntireCol
Sheet2.Select
Sheet2.Cells.
:=xlPart, SearchOrder:
False, SearchFormat:
Selection.EntireCol
Sheet3.Select
Sheet3.Cells.
:=xlPart, SearchOrder:
False, SearchFormat:
Selection.EntireCol
'dan seterusnya sebanyak sheet yang diinginkan dengan mengubah yang diwarnain biru tersebut.
'tambahkan Sheet1.Select untuk kembali ke sheet awal setelah insert selesai
Sheet1.Select
End Sub
2. Awalnya saya ingin coba menggunakan formula [=((K7/J7)-1*
3. Asumsinya sama pertumbuhan bulan desember (2902993.727) tahun sebelumnya dengan bulan terakhir, paling saya bisa kasih solusi pake macro lagi. Bikin shape samping Formula, kemudian masukkan kedalam vba:
Sub YTD()
Selection.FormulaR1
End Sub
kemudian shapenya di Assign Macro ke YTD
Kendalanya, ketika pergantian tahun, maka di vbanya harus dirubah dengan nilai desember yg sekarang.
barangkali member yg lain bisa kasih solusi formulanya, biar saya bisa belajar juga untuk kasus seperti ini
Regard,
Opik
____________
From: achmad dwinanto <achmad_plangton2a@
To: "XL-mania@yahoogroup
Sent: Wednesday, August 8, 2012 10:52 AM
Subject: Re: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
terima kasih mas opik atas bantuannya.. macronya apik tenan :)
masih ada yg mo dintanya lagi neh,
1. Bagaimana macro jika insert kolom nya lebih dari 1 sheet? misal ada 10 sheet ( sheet 1 sampai sheet 10
2. untuk perhitungan m-t-m mohon dibuat dalam 1 x langkah, karena datanya sangat panjang. untuk perhitungan ini mungkin lebih efektifnya pakai formula (lebih simple), tp saya ga ngerti bagaimana formulanya.
3. untuk rumus y-t-d, sama dengan rumus m-t-m namun yg dibagi adalah bulan desember, misal (jun-des)/des.
oh iya... setiap bulan datanya tidak ada perubahan, begitu juga dengan data desember tidak berubah.
mohon bantuannya,
terima kasih
From: Opik Pds <opik_pds@yahoo.
To: "XL-mania@yahoogroup
Sent: Saturday, August 4, 2012 2:45 AM
Subject: Re: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
Saya bukan master tapi pengen coba bantu selesaikan
Pertanyaan 1 macronya kira2 seperti ini:
Cells.Find(What:
:=xlPart, SearchOrder:
False, SearchFormat:
Selection.EntireCol
Pertanyaan 2 pertumbuhan M-T-M saya hanya bisa bantu formula menggunakan macro, dengan petunjuk ada di file terlampir. Pertumbuhan Y-T-D saya tidak bisa, karena kondisi kolom Desember tahun sebelumnya bisa berubah2, kayanya tetep manual
From: achmad dwinanto <achmad_plangton2a@
To: xl mania <XL-mania@yahoogroup
Sent: Thursday, August 2, 2012 12:00 PM
Subject: ]] XL-mania [[ macro untuk insert kolom dan pertumbuhan
para master excel yang canggih2
pada file attactment terdapat data series yang setiap bulan saya input datanya, karena masih manual mohon bantuan untuk macro nya dengan rincian :
1. insert kolom pada kolom setelah data bulan terakhir
2. memperhitungkan pertumbuhan month-to-month dan year on year
terima kasih
Sun Aug 12, 2012 3:43 am (PDT) . Posted by:
"Pietroli Foe" pietrolifoe
Dear : Aa
Nyontek dari ilmu para suhu :
=IF((SUMPRODUCT(MAX(($B$5:D7=B8)*($D$5:D7)))+0,1)<B8;B8+0,1;SUMPRODUCT(MAX(($B$5:D7=B8)*($D$5:D7)))+0,1)
atau
=IF((MAX(INDEX(($B$5:B7=B8)*$D$5:D7;0))+0,1)<B8;B8+0,1;(MAX(INDEX(($B$5:B7=B8)*$D$5:D7;0))+0,1))
semoga membantu
Piet
________________________________
Dari: ahmad <ahmad@tanabe.co.id >
Kepada: XL-mania@yahoogroups.com
Dikirim: Rabu, 8 Agustus 2012 7:55
Judul: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Dear All,
Mohon pencerahannya seperti data dibawah ini
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended for the addressee named and deemed confidential property of PT. Tanabe Indonesia. Any use of information provided herein, including but not limited to the registered PT. Tanabe Indonesia name and logo are prohibited without the written permission of PT. Tanabe Indonesia. If you are not the intended recipient, any use, printing, copying or distribution of this e-mail or of any attachments to it is strictly prohibited. If you received this e-mail in error, please advise the sender immediately and delete the e-mail and any attachments from your system. Thank you.
Nyontek dari ilmu para suhu :
=IF((SUMPRODUCT(
atau
=IF((MAX(INDEX(
semoga membantu
Piet
____________
Dari: ahmad <ahmad@tanabe.
Kepada: XL-mania@yahoogroup
Dikirim: Rabu, 8 Agustus 2012 7:55
Judul: ]] XL-mania [[ manambahka angka dibelakang secara otomatis
Dear All,
Mohon pencerahannya seperti data dibawah ini
Terimakasih.
Salam hormat,
Aa
Information provided in this email, including any attachments, is intended for the addressee named and deemed confidential property of PT. Tanabe Indonesia. Any use of information provided herein, including but not limited to the registered PT. Tanabe Indonesia name and logo are prohibited without the written permission of PT. Tanabe Indonesia. If you are not the intended recipient, any use, printing, copying or distribution of this e-mail or of any attachments to it is strictly prohibited. If you received this e-mail in error, please advise the sender immediately and delete the e-mail and any attachments from your system. Thank you.
Sun Aug 12, 2012 3:44 am (PDT) . Posted by:
"ms siregar" mssiregar1967
Para suhu (mohon ma'af kalo sudah pernah),
Murid pengen menyimpan seluruh nama-nama file (misalnya di sub ditectory
\Anu,) yg ada. di dalam suatu worksheet. gimana ya.
Kalo dulu (masih system Dos) bisa diprint dengan perintah "dir *.*>prn".
nah kalau ini kayaknya harus ada jurusnya
Terimakasih para suhu
MS Siregar
081341119111
Murid pengen menyimpan seluruh nama-nama file (misalnya di sub ditectory
\Anu,) yg ada. di dalam suatu worksheet. gimana ya.
Kalo dulu (masih system Dos) bisa diprint dengan perintah "dir *.*>prn".
nah kalau ini kayaknya harus ada jurusnya
Terimakasih para suhu
MS Siregar
081341119111
GROUP FOOTER MESSAGE
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Selamat beribadah puasa... |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/ |
+-------------------------------------------------------------------+
| Berikan testimoni di : |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html |
+-------------------------------------------------------------------+
| Message lama ada di : |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
| http://www.mail-archive.com/xl-mania@yahoogroups.com |
+-------------------------------------------------------------------+
| Selamat beribadah puasa... |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/ |
+-------------------------------------------------------------------+
| Berikan testimoni di : |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html |
+-------------------------------------------------------------------+
| Message lama ada di : |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
| http://www.mail-archive.com/xl-mania@yahoogroups.com |
+-------------------------------------------------------------------+
Tidak ada komentar:
Posting Komentar