[belajar-excel] Digest Number 4245

Milis Belajar Microsoft Excel Group

15 Messages

Digest #4245

1a

Hapus Banyak Cell Styles sekaligus by "Heri Pamungkas ( Gmail )" dchoosen88

1b

Re: Hapus Banyak Cell Styles sekaligus by "hendrik karnadi" hendrikkarnadi

1c

Re: Hapus Banyak Cell Styles sekaligus by "nangagus"

1d

Re: Hapus Banyak Cell Styles sekaligus [1 Attachment] by "Heri Pamungkas ( Gmail )" dchoosen88

1e

Re: Hapus Banyak Cell Styles sekaligus [2 Attachments] by "hendrik karnadi" hendrikkarnadi

1f

Re: Hapus Banyak Cell Styles sekaligus [2 Attachments] by "Heri Pamungkas ( Gmail )" dchoosen88

1g

Re: Hapus Banyak Cell Styles sekaligus by "Mr. Kid" nmkid.family@ymail.com

2a

PEMBAGIAN SHU by "marone oke" maroneoke940

2b

Bls: [belajar-excel] PEMBAGIAN SHU [1 Attachment] by rwanto78

3a

Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria men by "Danny Prasetyo"

3b

Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria men by "Danny Prasetyo"

3c

Re: Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria by "Mr. Kid" nmkid.family@ymail.com

4a

Menhitung interval/klasifikasi data by "amsar sar" moch_amsar

4b

Re: Menhitung interval/klasifikasi data by "hendrik karnadi" hendrikkarnadi

5a

Re: Rumus Mid, Left, Vlookup by "Mr. Kid" nmkid.family@ymail.com

Messages

1a

Hapus Banyak Cell Styles sekaligus

Mon Jul 24, 2017 9:41 pm (PDT) . Posted by:

"Heri Pamungkas ( Gmail )" dchoosen88

--
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Dear Para Rekan-rekan.

Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
Error nya karena "Too Much Style Format"

Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1b

Re: Hapus Banyak Cell Styles sekaligus

Mon Jul 24, 2017 10:28 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Hai Heri,
Coba copas macro ini ke VBE Sheet (module) :
Sub hapus_Stail()    Dim ws As Worksheet    For Each ws In ThisWorkbook.Worksheets        ws.Cells.Style = "Normal"    Next wsEnd Sub
Salam,HK

On Tuesday, July 25, 2017, 11:41:18 AM GMT+7, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

 

--
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Dear Para Rekan-rekan.

Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
Error nya karena "Too Much Style Format"

Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1c

Re: Hapus Banyak Cell Styles sekaligus

Mon Jul 24, 2017 10:47 pm (PDT) . Posted by:

"nangagus"

Wasalamualaikum warahmatullah,

Dear Heri,

Coba blok semua cell, Pada tab Home dan group styles pilih Cell Styles,
kemudian KLik Normal.

Wasalamualaikum warahmatullah.
NangAgus
On 7/25/2017 11:37 AM, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com
[belajar-excel] wrote:
>
>
> --
> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
> Semangat pagi,.
>
> Dear Para Rekan-rekan.
>
> Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
> Error nya karena "Too Much Style Format"
>
> Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.
>
> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Warm Regards,
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1d

Re: Hapus Banyak Cell Styles sekaligus [1 Attachment]

Tue Jul 25, 2017 12:08 am (PDT) . Posted by:

"Heri Pamungkas ( Gmail )" dchoosen88

السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Hehehe, maafkan saya yang kurang lengkap dalam menjelaskan.

Maksud saya bagaimana cara menghapus sekaligus Style-style seperti gambar.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

On 25/07/2017 12:40, nangagus nangagus@gmail.com [belajar-excel] wrote:
>
> Wasalamualaikum warahmatullah,
>
> Dear Heri,
>
> Coba blok semua cell, Pada tab Home dan group styles pilih Cell
> Styles, kemudian KLik Normal.
>
>
>
> Wasalamualaikum warahmatullah.
> NangAgus
> On 7/25/2017 11:37 AM, 'Heri Pamungkas ( Gmail )'
> ghery.dharma@gmail.com [belajar-excel] wrote:
>>
>>
>> --
>> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>> Semangat pagi,.
>>
>> Dear Para Rekan-rekan.
>>
>> Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
>> Error nya karena "Too Much Style Format"
>>
>> Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.
>>
>> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>
>> Warm Regards,
>>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1e

Re: Hapus Banyak Cell Styles sekaligus [2 Attachments]

Tue Jul 25, 2017 12:19 am (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Coba ini,
Sub hapus_shape()    Dim wks As Worksheet    Dim sh As Shape    For Each wks In ThisWorkbook.Worksheets        For Each sh In wks.Shapes            sh.Delete        Next    NextEnd Sub
Salam,HK
On Tuesday, July 25, 2017, 2:09:17 PM GMT+7, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

 


السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Hehehe, maafkan saya yang kurang lengkap dalam menjelaskan.

Maksud saya bagaimana cara menghapus sekaligus Style-style seperti gambar.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards, On 25/07/2017 12:40, nangagus nangagus@gmail.com [belajar-excel] wrote:

 


Wasalamualaikum warahmatullah,

Dear Heri,

Coba blok semua cell, Pada tab Home dan group styles pilih Cell Styles, kemudian KLik Normal.


Wasalamualaikum warahmatullah. NangAgus
On 7/25/2017 11:37 AM, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] wrote:

 

--
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Dear Para Rekan-rekan.

Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
Error nya karena "Too Much Style Format"

Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1f

Re: Hapus Banyak Cell Styles sekaligus [2 Attachments]

Tue Jul 25, 2017 12:37 am (PDT) . Posted by:

"Heri Pamungkas ( Gmail )" dchoosen88

السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Hiks hiks, not worked pak.

وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

On 25/07/2017 14:19, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] wrote:
> Coba ini,
>
> Sub hapus_shape()
> Dim wks As Worksheet
> Dim sh As Shape
> For Each wks In ThisWorkbook.Worksheets
> For Each sh In wks.Shapes
> sh.Delete
> Next
> Next
> End Sub
>
> Salam,
> HK
>
> ----------------------------------------------------------
> On Tuesday, July 25, 2017, 2:09:17 PM GMT+7, 'Heri Pamungkas ( Gmail
> )' ghery.dharma@gmail.com [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
>
> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
> Semangat pagi,.
>
> Hehehe, maafkan saya yang kurang lengkap dalam menjelaskan.
>
> Maksud saya bagaimana cara menghapus sekaligus Style-style seperti gambar.
>
> alt
>
>
>
> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Warm Regards,
> On 25/07/2017 12:40, nangagus nangagus@gmail.com
> <mailto:nangagus@gmail.com> [belajar-excel] wrote:
>>
>> Wasalamualaikum warahmatullah,
>>
>> Dear Heri,
>>
>> Coba blok semua cell, Pada tab Home dan group styles pilih Cell
>> Styles, kemudian KLik Normal.
>>
>> alt
>>
>> Wasalamualaikum warahmatullah.
>> NangAgus
>> On 7/25/2017 11:37 AM, 'Heri Pamungkas ( Gmail )'
>> ghery.dharma@gmail.com <mailto:ghery.dharma@gmail.com>
>> [belajar-excel] wrote:
>>>
>>>
>>> --
>>> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>> Semangat pagi,.
>>>
>>> Dear Para Rekan-rekan.
>>>
>>> Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
>>> Error nya karena "Too Much Style Format"
>>>
>>> Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.
>>>
>>> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>>
>>> Warm Regards,
>>>
>>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

1g

Re: Hapus Banyak Cell Styles sekaligus

Tue Jul 25, 2017 2:09 am (PDT) . Posted by:

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

Wa'alaikumussalam wr wb

Hai Heri,

Object style ya...

Dim st as style
On error resume next
For each st in thisworkbook.styles
St.locked=false
St.delete
Next st

Terkadang 2 baris kode itu dimasukkan dalam blok if :
If st.builtin then
St.locked=false
St.delete
Endif

Wassalamu'alaikum wr wb
Kid
Sent from my smart enough phone

> On Jul 25, 2017, at 14:39, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
> Semangat pagi,.
>
> Hiks hiks, not worked pak.
>
>
> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Warm Regards,
>> On 25/07/2017 14:19, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] wrote:
>>
>> Coba ini,
>>
>> Sub hapus_shape()
>> Dim wks As Worksheet
>> Dim sh As Shape
>> For Each wks In ThisWorkbook.Worksheets
>> For Each sh In wks.Shapes
>> sh.Delete
>> Next
>> Next
>> End Sub
>>
>> Salam,
>> HK
>>
>> On Tuesday, July 25, 2017, 2:09:17 PM GMT+7, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>>
>>
>>
>>
>> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>> Semangat pagi,.
>>
>> Hehehe, maafkan saya yang kurang lengkap dalam menjelaskan.
>>
>> Maksud saya bagaimana cara menghapus sekaligus Style-style seperti gambar.
>>
>>
>>
>>
>>
>> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>
>> Warm Regards,
>>> On 25/07/2017 12:40, nangagus nangagus@gmail.com [belajar-excel] wrote:
>>>
>>> Wasalamualaikum warahmatullah,
>>>
>>> Dear Heri,
>>>
>>> Coba blok semua cell, Pada tab Home dan group styles pilih Cell Styles, kemudian KLik Normal.
>>>
>>>
>>>
>>> Wasalamualaikum warahmatullah.
>>> NangAgus
>>>> On 7/25/2017 11:37 AM, 'Heri Pamungkas ( Gmail )' ghery.dharma@gmail.com [belajar-excel] wrote:
>>>>
>>>>
>>>> --
>>>> السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>>> Semangat pagi,.
>>>>
>>>> Dear Para Rekan-rekan.
>>>>
>>>> Saya ada kasus bahwa, ada satu sheet yang tidak bisa di insert.
>>>> Error nya karena "Too Much Style Format"
>>>>
>>>> Nah, bagaimana ya cara menghapus Cell Style tanpa harus satu-satu.
>>>>
>>>> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>>>>
>>>> Warm Regards,
>>>>
>>>
>>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (7) . Top ^

2a

PEMBAGIAN SHU

Mon Jul 24, 2017 10:32 pm (PDT) . Posted by:

"marone oke" maroneoke940

yth P ruswanto,

ini perhitungan shu yg saya hitung, mudah2an benar pak,

note : saya juga pengurus koperasi

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

2b

Bls: [belajar-excel] PEMBAGIAN SHU [1 Attachment]

Tue Jul 25, 2017 1:04 am (PDT) . Posted by:

rwanto78

Tks marone oke maroneoke940@yahoo.com [belajar-excel] atas masukannya..nanti sy pelajari lagi, kebetulan sy bendahara..br Berjalan 5 tahun, ini pertama mau membagikan shu, tks sekali lagi
Powered by Telkomsel BlackBerry®

-----Original Message-----
From: "marone oke maroneoke940@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 25 Jul 2017 04:05:51
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] PEMBAGIAN SHU [1 Attachment]

yth P ruswanto,

ini perhitungan shu yg saya hitung, mudah2an benar pak,

note : saya juga pengurus koperasi

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

3a

Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria men

Mon Jul 24, 2017 10:33 pm (PDT) . Posted by:

"Danny Prasetyo"

#yiv6245144220 #yiv6245144220ygrp-mkp hr{border: 1px solid
rgb(216, 216, 216);}#yiv6245144220 #yiv6245144220ygrp-mkp
#yiv6245144220hd{color: rgb(98, 140, 42);font-size:
85%;font-weight: 700;line-height: 122%;margin: 10px
0;}#yiv6245144220 #yiv6245144220ygrp-mkp
#yiv6245144220ads{margin-bottom: 10px;}#yiv6245144220
#yiv6245144220ygrp-mkp .yiv6245144220ad{padding: 0
0;}#yiv6245144220 #yiv6245144220ygrp-mkp .yiv6245144220ad
p{margin: 0;}#yiv6245144220 #yiv6245144220ygrp-mkp
.yiv6245144220ad a{color: rgb(0, 0, 255);text-decoration:
none;}#yiv6245144220 #yiv6245144220ygrp-sponsor
#yiv6245144220ygrp-lc{font-family: Arial;}#yiv6245144220
#yiv6245144220ygrp-sponsor #yiv6245144220ygrp-lc
#yiv6245144220hd{margin: 10px 0px;font-weight: 700;font-size:
78%;line-height: 122%;}#yiv6245144220 #yiv6245144220ygrp-sponsor
#yiv6245144220ygrp-lc .yiv6245144220ad{margin-bottom:
10px;padding: 0 0;}#yiv6245144220
#yiv6245144220actions{font-family: Verdana;font-size:
11px;padding: 10px 0;}#yiv6245144220
#yiv6245144220activity{background-color: rgb(224, 236,
238);float: left;font-family: Verdana;font-size: 10px;padding:
10px;}#yiv6245144220 #yiv6245144220activity span{font-weight:
700;}#yiv6245144220 #yiv6245144220activity
span:first-child{text-transform: uppercase;}#yiv6245144220
#yiv6245144220activity span a{color: rgb(80, 133,
182);text-decoration: none;}#yiv6245144220 #yiv6245144220activity
span span{color: rgb(255, 121, 0);}#yiv6245144220
#yiv6245144220activity span
.yiv6245144220underline{text-decoration:
underline;}#yiv6245144220 .yiv6245144220attach{clear:
both;display: table;font-family: Arial;font-size: 12px;padding:
10px 0;width: 400px;}#yiv6245144220 .yiv6245144220attach div
a{text-decoration: none;}#yiv6245144220 .yiv6245144220attach
img{border: none;padding-right: 5px;}#yiv6245144220
.yiv6245144220attach label{display: block;margin-bottom:
5px;}#yiv6245144220 .yiv6245144220attach label a{text-decoration:
none;}#yiv6245144220 blockquote{margin: 0 0 0 4px;}#yiv6245144220
.yiv6245144220bold{font-family: Arial;font-size:
13px;font-weight: 700;}#yiv6245144220 .yiv6245144220bold
a{text-decoration: none;}#yiv6245144220 dd.yiv6245144220last p
a{font-family: Verdana;font-weight: 700;}#yiv6245144220
dd.yiv6245144220last p span{margin-right: 10px;font-family:
Verdana;font-weight: 700;}#yiv6245144220 dd.yiv6245144220last p
span.yiv6245144220yshortcuts{margin-right: 0;}#yiv6245144220
div.yiv6245144220attach-table div div a{text-decoration:
none;}#yiv6245144220 div.yiv6245144220attach-table{width:
400px;}#yiv6245144220 div.yiv6245144220file-title a,
#yiv6245144220 div.yiv6245144220file-title a:active,
#yiv6245144220 div.yiv6245144220file-title a:hover,
#yiv6245144220 div.yiv6245144220file-title
a:visited{text-decoration: none;}#yiv6245144220
div.yiv6245144220photo-title a, #yiv6245144220
div.yiv6245144220photo-title a:active, #yiv6245144220
div.yiv6245144220photo-title a:hover, #yiv6245144220
div.yiv6245144220photo-title a:visited{text-decoration:
none;}#yiv6245144220 div#yiv6245144220ygrp-mlmsg
#yiv6245144220ygrp-msg p a
span.yiv6245144220yshortcuts{font-family: Verdana;font-size:
10px;font-weight: normal;}#yiv6245144220
.yiv6245144220green{color: rgb(98, 140, 42);}#yiv6245144220
.yiv6245144220MsoNormal{margin: 0 0 0 0;}#yiv6245144220
o{font-size: 0;}#yiv6245144220 #yiv6245144220photos div{float:
left;width: 72px;}#yiv6245144220 #yiv6245144220photos div
div{border: 1px solid rgb(102, 102, 102);min-height:
62px;overflow: hidden;width: 62px;}#yiv6245144220
#yiv6245144220photos div label{color: rgb(102, 102,
102);font-size: 10px;overflow: hidden;text-align:
center;white-space: nowrap;width: 64px;}#yiv6245144220
#yiv6245144220reco-category{font-size: 77%;}#yiv6245144220
#yiv6245144220reco-desc{font-size: 77%;}#yiv6245144220
.yiv6245144220replbq{margin: 4px;}#yiv6245144220
#yiv6245144220ygrp-actbar div a:first-child{margin-right:
2px;padding-right: 5px;}#yiv6245144220
#yiv6245144220ygrp-mlmsg{font-size: 13px;font-family: Arial,
helvetica, clean, sans-serif;}#yiv6245144220
#yiv6245144220ygrp-mlmsg table{font-size: inherit;font:
100%;}#yiv6245144220 #yiv6245144220ygrp-mlmsg select,
#yiv6245144220 input, #yiv6245144220 textarea{font: 99% Arial,
Helvetica, clean, sans-serif;}#yiv6245144220
#yiv6245144220ygrp-mlmsg pre, #yiv6245144220 code{font: 115%
monospace;}#yiv6245144220 #yiv6245144220ygrp-mlmsg *{line-height:
1.22em;}#yiv6245144220 #yiv6245144220ygrp-mlmsg
#yiv6245144220logo{padding-bottom: 10px;}#yiv6245144220
#yiv6245144220ygrp-msg p a{font-family: Verdana;}#yiv6245144220
#yiv6245144220ygrp-msg p#yiv6245144220attach-count span{color:
rgb(30, 102, 174);font-weight: 700;}#yiv6245144220
#yiv6245144220ygrp-reco #yiv6245144220reco-head{color: rgb(255,
121, 0);font-weight: 700;}#yiv6245144220
#yiv6245144220ygrp-reco{margin-bottom: 20px;padding:
0px;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ov
li a{font-size: 130%;text-decoration: none;}#yiv6245144220
#yiv6245144220ygrp-sponsor #yiv6245144220ov li{font-size:
77%;list-style-type: square;padding: 6px 0;}#yiv6245144220
#yiv6245144220ygrp-sponsor #yiv6245144220ov ul{margin: 0;padding:
0 0 0 8px;}#yiv6245144220 #yiv6245144220ygrp-text{font-family:
Georgia;}#yiv6245144220 #yiv6245144220ygrp-text p{margin: 0 0 1em
0;}#yiv6245144220 #yiv6245144220ygrp-text tt{font-size:
120%;}#yiv6245144220 #yiv6245144220ygrp-vital ul
li:last-child{border-right: none;}Contoh 1 =
Private Sub cmdDEL_Click()
Dim lRec As Long lRec = cboDT.ListIndex + 1 If lRec > 0
Then With shtKid.Range("_tbldt_") If
Len(.Cells(lRec, 1).Value) <> 0 Then .Cells(lRec,
1).Resize(1, 4).Delete xlShiftUp cboDT.RowSource =
"_lstDT_" End If End With Else
If cboDT.Value = "" Then
MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"
End If End If

End Sub
Contoh 2 =
Private Sub cmdDEL_Click()
Dim lRec As Long lRec = cboDT.ListIndex + 1 If lRec > 0
Then With shtKid.Range("_tbldt_") If
Len(.Cells(lRec, 1).Value) <> 0 Then .Cells(lRec,
1).Resize(1, 4).Delete xlShiftUp cboDT.RowSource =
"_lstDT_" End If End With Else
If cboDT.Value = "" Then
MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"
End If End If

End Sub
Sudah saya coba seperti ini tapi tetap tidak bisa.



Pada Selasa, 25 Juli 2017 8:53, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


Blok if terluar diubah dari
blok if endif menjadi if else endif. Msgbox Anda diletakkan pada
area else.

Regards,Kid
Sent from my smart enough phone
On Jul 25, 2017, at 01:53, Danny Prasetyo aydprasetyo@yahoo.com
<mailto:aydprasetyo@yahoo.com> [belajar-excel]
<belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com> > wrote:

Mr. Kid,
Saya ingin menambahkan peringatan seperti ini apabila user tidak
memilih atau pilihannya tidak sesuai dengan data
If cboDT.Value = "" ThenMsgBox "Pilih terlebih dahulu",
vbInformation, "PILIHAN"End If
ke dalam kode vba di bawah ini

Private Sub cmdDEL_Click() Dim lRec As Long lRec =
cboDT.ListIndex + 1 If lRec > 0 Then With
shtKid.Range("_tbldt_") If Len(.Cells(lRec, 1).Value)
<> 0 Then .Cells(lRec, 1).Resize(1, 4).Delete
xlShiftUp cboDT.RowSource = "_lstDT_"
End If End With End IfEnd Sub
Bagaimana yaa caranya? 2 jam saya otak atik gak bisa bisa. Saya
kurang mengerti soalnya hehehe... Mohon pencerahannya...

Pada Minggu, 23 Juli 2017 4:57, "'Mr. Kid' mr.nmkid@gmail.com
<mailto:mr.nmkid@gmail.com> [belajar-excel]"
<belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com> > menulis:


Hai Danny,

Bunyi .entirerow.delete diubah menjadi .resize( 1 ,
jumlah_kolom_tabel ).delete xlshiftup
jumlah_kolom_tabel diisi angka

Regards,
Kid






On Sat, Jul 22, 2017 at 1:58 PM, Danny Prasetyo
aydprasetyo@yahoo.com <mailto:aydprasetyo@yahoo.com>
[belajar-excel] <belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com> > wrote:
Terima kasih Mr. Kid atas
bantuannya.
Tapi setelah saya coba, ada beberapa hal ingin saya tanyakan
lagi,- pada form, saat saya ingin menghapus dengan cara
menuliskan kode, malah tidak terjadi apa2. Saya harus meng-klik
data dari list yang tertera terlebih dahulu agar dapat terhapus.-
yang saya inginkan hanya baris dalam tabel saja yang terhapus,
bukan 1 baris dari ujung kiri ke ujung kanan.
Bagaimana solusinya? Dan terima kasih sebelumnya.
Salam,
Danny Prasetyo

Pada Sabtu, 22 Juli 2017 11:21, "'Mr. Kid' mr.nmkid@gmail.com
<mailto:mr.nmkid@gmail.com> [belajar-excel]"
<belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com> > menulis:


Hai Danny,

File terlampir sekadar contoh saja.

Regards,
Kid


2017-07-21 20:20 GMT+07:00 Danny Prasetyo aydprasetyo@yahoo.com
<mailto:aydprasetyo@yahoo.com> [belajar-excel]
<belajar-excel@yahoogroups.com
<mailto:belajar-excel@yahoogroups.com> >:
Kode vba yang saya edit kok
malah error yaa, dan proses nya berbelit2, karna saya harus
mengkonversi value dari combobox dulu ke dalam cell, dan dari
cell dimasukkan ke dalam textbox.
Tolong dibantu yaa para master, agar tidak error dan proses nya
tidak berbelit hehehe...
Ini saya kirimkan file nya.Terima kasih sebelumnya...

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

3b

Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria men

Mon Jul 24, 2017 10:34 pm (PDT) . Posted by:

"Danny Prasetyo"

Contoh 1
Private Sub cmdDEL_Click()    Dim lRec As Long    lRec = cboDT.ListIndex + 1    If lRec > 0 Then        With shtKid.Range("_tbldt_")            If Len(.Cells(lRec, 1).Value) <> 0 Then                .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp                cboDT.RowSource = "_lstDT_"            End If        End With    Else
    If cboDT.Value = "" Then    MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"    End If    End If
End Sub

Contoh 2
Private Sub cmdDEL_Click()    Dim lRec As Long    lRec = cboDT.ListIndex + 1    If lRec > 0 Then        With shtKid.Range("_tbldt_")            If Len(.Cells(lRec, 1).Value) <> 0 Then                .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp                cboDT.RowSource = "_lstDT_"            Else
            If cboDT.Value = "" Then            MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"            End If
            End If                End With    End IfEnd Sub

Sudah saya coba seperti contoh di atas tetap tidak bisa Mr. Kid

Pada Selasa, 25 Juli 2017 8:53, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Blok if terluar diubah dari blok if endif menjadi if else endif. Msgbox Anda diletakkan pada area else.

Regards,Kid
Sent from my smart enough phone
On Jul 25, 2017, at 01:53, Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  Mr. Kid, 
Saya ingin menambahkan peringatan seperti ini apabila user tidak memilih atau pilihannya tidak sesuai dengan data
If cboDT.Value = "" ThenMsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"End If
ke dalam kode vba di bawah ini

Private Sub cmdDEL_Click()    Dim lRec As Long    lRec = cboDT.ListIndex + 1    If lRec > 0 Then        With shtKid.Range("_tbldt_")            If Len(.Cells(lRec, 1).Value) <> 0 Then                .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp                cboDT.RowSource = "_lstDT_"            End If        End With    End IfEnd Sub
Bagaimana yaa caranya? 2 jam saya otak atik gak bisa bisa. Saya kurang mengerti soalnya hehehe... Mohon pencerahannya...

Pada Minggu, 23 Juli 2017 4:57, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Hai Danny,

Bunyi .entirerow.delete diubah menjadi .resize( 1 , jumlah_kolom_tabel ).delete xlshiftup
jumlah_kolom_tabel diisi angka

Regards,
Kid

On Sat, Jul 22, 2017 at 1:58 PM, Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  Terima kasih Mr. Kid atas bantuannya.
Tapi setelah saya coba, ada beberapa hal ingin saya tanyakan lagi,- pada form, saat saya ingin menghapus dengan cara menuliskan kode, malah tidak terjadi apa2. Saya harus meng-klik data dari list yang tertera terlebih dahulu agar dapat terhapus.- yang saya inginkan hanya baris dalam tabel saja yang terhapus, bukan 1 baris dari ujung kiri ke ujung kanan.
Bagaimana solusinya? Dan terima kasih sebelumnya.
Salam,
Danny Prasetyo

Pada Sabtu, 22 Juli 2017 11:21, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:


  Hai Danny,

File terlampir sekadar contoh saja.

Regards,
Kid

2017-07-21 20:20 GMT+07:00 Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com >:

  Kode vba yang saya edit kok malah error yaa, dan proses nya berbelit2, karna saya harus mengkonversi value dari combobox dulu ke dalam cell, dan dari cell dimasukkan ke dalam textbox. 
Tolong dibantu yaa para master, agar tidak error dan proses nya tidak berbelit hehehe...
Ini saya kirimkan file nya.Terima kasih sebelumnya... 

#yiv6245144220 #yiv6245144220 -- #yiv6245144220ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv6245144220 #yiv6245144220ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv6245144220 #yiv6245144220ygrp-mkp #yiv6245144220hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv6245144220 #yiv6245144220ygrp-mkp #yiv6245144220ads {margin-bottom:10px;}#yiv6245144220 #yiv6245144220ygrp-mkp .yiv6245144220ad {padding:0 0;}#yiv6245144220 #yiv6245144220ygrp-mkp .yiv6245144220ad p {margin:0;}#yiv6245144220 #yiv6245144220ygrp-mkp .yiv6245144220ad a {color:#0000ff;text-decoration:none;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ygrp-lc {font-family:Arial;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ygrp-lc #yiv6245144220hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ygrp-lc .yiv6245144220ad {margin-bottom:10px;padding:0 0;}#yiv6245144220 #yiv6245144220actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv6245144220 #yiv6245144220activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv6245144220 #yiv6245144220activity span {font-weight:700;}#yiv6245144220 #yiv6245144220activity span:first-child {text-transform:uppercase;}#yiv6245144220 #yiv6245144220activity span a {color:#5085b6;text-decoration:none;}#yiv6245144220 #yiv6245144220activity span span {color:#ff7900;}#yiv6245144220 #yiv6245144220activity span .yiv6245144220underline {text-decoration:underline;}#yiv6245144220 .yiv6245144220attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv6245144220 .yiv6245144220attach div a {text-decoration:none;}#yiv6245144220 .yiv6245144220attach img {border:none;padding-right:5px;}#yiv6245144220 .yiv6245144220attach label {display:block;margin-bottom:5px;}#yiv6245144220 .yiv6245144220attach label a {text-decoration:none;}#yiv6245144220 blockquote {margin:0 0 0 4px;}#yiv6245144220 .yiv6245144220bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv6245144220 .yiv6245144220bold a {text-decoration:none;}#yiv6245144220 dd.yiv6245144220last p a {font-family:Verdana;font-weight:700;}#yiv6245144220 dd.yiv6245144220last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv6245144220 dd.yiv6245144220last p span.yiv6245144220yshortcuts {margin-right:0;}#yiv6245144220 div.yiv6245144220attach-table div div a {text-decoration:none;}#yiv6245144220 div.yiv6245144220attach-table {width:400px;}#yiv6245144220 div.yiv6245144220file-title a, #yiv6245144220 div.yiv6245144220file-title a:active, #yiv6245144220 div.yiv6245144220file-title a:hover, #yiv6245144220 div.yiv6245144220file-title a:visited {text-decoration:none;}#yiv6245144220 div.yiv6245144220photo-title a, #yiv6245144220 div.yiv6245144220photo-title a:active, #yiv6245144220 div.yiv6245144220photo-title a:hover, #yiv6245144220 div.yiv6245144220photo-title a:visited {text-decoration:none;}#yiv6245144220 div#yiv6245144220ygrp-mlmsg #yiv6245144220ygrp-msg p a span.yiv6245144220yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv6245144220 .yiv6245144220green {color:#628c2a;}#yiv6245144220 .yiv6245144220MsoNormal {margin:0 0 0 0;}#yiv6245144220 o {font-size:0;}#yiv6245144220 #yiv6245144220photos div {float:left;width:72px;}#yiv6245144220 #yiv6245144220photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv6245144220 #yiv6245144220photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv6245144220 #yiv6245144220reco-category {font-size:77%;}#yiv6245144220 #yiv6245144220reco-desc {font-size:77%;}#yiv6245144220 .yiv6245144220replbq {margin:4px;}#yiv6245144220 #yiv6245144220ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv6245144220 #yiv6245144220ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv6245144220 #yiv6245144220ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv6245144220 #yiv6245144220ygrp-mlmsg select, #yiv6245144220 input, #yiv6245144220 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv6245144220 #yiv6245144220ygrp-mlmsg pre, #yiv6245144220 code {font:115% monospace;}#yiv6245144220 #yiv6245144220ygrp-mlmsg * {line-height:1.22em;}#yiv6245144220 #yiv6245144220ygrp-mlmsg #yiv6245144220logo {padding-bottom:10px;}#yiv6245144220 #yiv6245144220ygrp-msg p a {font-family:Verdana;}#yiv6245144220 #yiv6245144220ygrp-msg p#yiv6245144220attach-count span {color:#1E66AE;font-weight:700;}#yiv6245144220 #yiv6245144220ygrp-reco #yiv6245144220reco-head {color:#ff7900;font-weight:700;}#yiv6245144220 #yiv6245144220ygrp-reco {margin-bottom:20px;padding:0px;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ov li a {font-size:130%;text-decoration:none;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv6245144220 #yiv6245144220ygrp-sponsor #yiv6245144220ov ul {margin:0;padding:0 0 0 8px;}#yiv6245144220 #yiv6245144220ygrp-text {font-family:Georgia;}#yiv6245144220 #yiv6245144220ygrp-text p {margin:0 0 1em 0;}#yiv6245144220 #yiv6245144220ygrp-text tt {font-size:120%;}#yiv6245144220 #yiv6245144220ygrp-vital ul li:last-child {border-right:none !important;}#yiv6245144220

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

3c

Re: Bls: Bls: [belajar-excel] Hapus baris terpilih dengan 1 kriteria

Mon Jul 24, 2017 10:38 pm (PDT) . Posted by:

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

Contoh 1 msgbox tok saja
Tidak usah pakai if yg Anda buat

Sent from my smart enough phone

> On Jul 25, 2017, at 11:40, Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
> Contoh 1
>
> Private Sub cmdDEL_Click()
> Dim lRec As Long
> lRec = cboDT.ListIndex + 1
> If lRec > 0 Then
> With shtKid.Range("_tbldt_")
> If Len(.Cells(lRec, 1).Value) <> 0 Then
> .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp
> cboDT.RowSource = "_lstDT_"
> End If
> End With
> Else
>
> If cboDT.Value = "" Then
> MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"
> End If
> End If
>
> End Sub
>
>
>
> Contoh 2
>
> Private Sub cmdDEL_Click()
> Dim lRec As Long
> lRec = cboDT.ListIndex + 1
> If lRec > 0 Then
> With shtKid.Range("_tbldt_")
> If Len(.Cells(lRec, 1).Value) <> 0 Then
> .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp
> cboDT.RowSource = "_lstDT_"
> Else
>
> If cboDT.Value = "" Then
> MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"
> End If
> End If
>
> End With
> End If
> End Sub
>
>
> Sudah saya coba seperti contoh di atas tetap tidak bisa Mr. Kid
>
>
> Pada Selasa, 25 Juli 2017 8:53, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Blok if terluar diubah dari blok if endif menjadi if else endif. Msgbox Anda diletakkan pada area else.
>
> Regards,
> Kid
> Sent from my smart enough phone
>
>> On Jul 25, 2017, at 01:53, Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>>
>>
>> Mr. Kid,
>>
>> Saya ingin menambahkan peringatan seperti ini apabila user tidak memilih atau pilihannya tidak sesuai dengan data
>>
>> If cboDT.Value = "" Then
>> MsgBox "Pilih terlebih dahulu", vbInformation, "PILIHAN"
>> End If
>>
>> ke dalam kode vba di bawah ini
>>
>> Private Sub cmdDEL_Click()
>> Dim lRec As Long
>> lRec = cboDT.ListIndex + 1
>> If lRec > 0 Then
>> With shtKid.Range("_tbldt_")
>> If Len(.Cells(lRec, 1).Value) <> 0 Then
>> .Cells(lRec, 1).Resize(1, 4).Delete xlShiftUp
>> cboDT.RowSource = "_lstDT_"
>> End If
>> End With
>> End If
>> End Sub
>>
>> Bagaimana yaa caranya? 2 jam saya otak atik gak bisa bisa. Saya kurang mengerti soalnya hehehe... Mohon pencerahannya...
>>
>>
>> Pada Minggu, 23 Juli 2017 4:57, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>
>>
>>
>> Hai Danny,
>>
>> Bunyi .entirerow.delete diubah menjadi .resize( 1 , jumlah_kolom_tabel ).delete xlshiftup
>> jumlah_kolom_tabel diisi angka
>>
>> Regards,
>> Kid
>>
>>
>>
>>
>>
>>
>> On Sat, Jul 22, 2017 at 1:58 PM, Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>>
>> Terima kasih Mr. Kid atas bantuannya.
>>
>> Tapi setelah saya coba, ada beberapa hal ingin saya tanyakan lagi,
>> - pada form, saat saya ingin menghapus dengan cara menuliskan kode, malah tidak terjadi apa2. Saya harus meng-klik data dari list yang tertera terlebih dahulu agar dapat terhapus.
>> - yang saya inginkan hanya baris dalam tabel saja yang terhapus, bukan 1 baris dari ujung kiri ke ujung kanan.
>>
>> Bagaimana solusinya? Dan terima kasih sebelumnya.
>>
>> Salam,
>>
>> Danny Prasetyo
>>
>>
>> Pada Sabtu, 22 Juli 2017 11:21, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>>
>>
>>
>> Hai Danny,
>>
>> File terlampir sekadar contoh saja.
>>
>> Regards,
>> Kid
>>
>>
>> 2017-07-21 20:20 GMT+07:00 Danny Prasetyo aydprasetyo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com >:
>>
>> Kode vba yang saya edit kok malah error yaa, dan proses nya berbelit2, karna saya harus mengkonversi value dari combobox dulu ke dalam cell, dan dari cell dimasukkan ke dalam textbox.
>>
>> Tolong dibantu yaa para master, agar tidak error dan proses nya tidak berbelit hehehe...
>>
>> Ini saya kirimkan file nya.
>> Terima kasih sebelumnya...
>>
>>
>>
>>
>>
>>
>
>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

4a

Menhitung interval/klasifikasi data

Mon Jul 24, 2017 10:42 pm (PDT) . Posted by:

"amsar sar" moch_amsar

salam kenal semua,saya mau bertanya bagaimana membuat nilai-nilai pada setiap titik pada fuzzy (mambership fuzzy) . ada ngak metode atau rumusnya, jika rentang nilai pada sumbu x adalah 0 - 100.

misalnya beberapa variabel berikut ini beserta intervalnya (maksudnya nilai intervalnya tidak dibuat sembaranganu, interval dibawah ini saya asumsikan saja) :
1. variabel A
rendah : 0 - 50
sedang: 20 - 80
tinggi  : 50 - 100

2. variabel B
rendah : 0 - 40
cukup  : 20 - 60
sedang: 40 - 80
tinggi  : 60 - 100
jadi, agar nilai kategori rendah, cukup, sedang, dan tinggi kita perolah apa rumus dan ketentuan yang dapat kita lakukan?

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

4b

Re: Menhitung interval/klasifikasi data

Mon Jul 24, 2017 10:50 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Hai Amsar,Intervalnya bisa overlap ?
Salam,HK
On Tuesday, July 25, 2017, 12:42:47 PM GMT+7, amsar sar moch_amsar@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

 

salam kenal semua,saya mau bertanya bagaimana membuat nilai-nilai pada setiap titik pada fuzzy (mambership fuzzy) . ada ngak metode atau rumusnya, jika rentang nilai pada sumbu x adalah 0 - 100.

misalnya beberapa variabel berikut ini beserta intervalnya (maksudnya nilai intervalnya tidak dibuat sembaranganu, interval dibawah ini saya asumsikan saja) :
1. variabel A
rendah : 0 - 50
sedang: 20 - 80
tinggi  : 50 - 100

2. variabel B
rendah : 0 - 40
cukup  : 20 - 60
sedang: 40 - 80
tinggi  : 60 - 100
jadi, agar nilai kategori rendah, cukup, sedang, dan tinggi kita perolah apa rumus dan ketentuan yang dapat kita lakukan?

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

5a

Re: Rumus Mid, Left, Vlookup

Tue Jul 25, 2017 2:29 am (PDT) . Posted by:

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

Hai Fatimah,

Maaf baru sempat menyusun ringkasan urutan pembuatannya.
Urutan proses pembuatan adalah dari sheet dengan tab sheet berlatar hijau,
dimulai dari paling kiri (sebagai langkah awal) sampai sheet terkanan
(sebagai langkah terakhir).

Wassalamu'alaikum wr wb
Kid

2017-07-22 12:37 GMT+07:00 Fatimah Nazmi fatimahnazmy@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> alhamdulillah, terima kasih banyak Mr. Kid, sangat membantu, kalau Mr
> Kid berkenan mohon dikirimkan tahapan pembuatannya hingga hasilnya
> seperti yang telah Mr buat. ingin belajar membuatnya ulang dari awal
> sendiri......terima kasih.
>
> Pada tanggal 22/07/17, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]
> <belajar-excel@yahoogroups.com> menulis:
> > Wa'alaikumussalam wr wb
> >
> > Hai Fatimah,
> >
> > File terlampir contoh penggunaan pivot table sebagai tabel bantu (sheet
> > bridge).
> > Asumsi : Kalender Transaksi Jan to Dec.
> >
> > Wassalamu'alaikum wr wb
> > Kid
> >
> >
> >
> >
> > 2017-07-21 9:31 GMT+07:00 Fatimah Nazmi fatimahnazmy@gmail.com
> > [belajar-excel] <belajar-excel@yahoogroups.com>:
> >
> >>
> >>
> >> Assalamu'alaikum Warahmatullahi Wabarakatuh,
> >> Mohon bantuan Rekan-rekan Milis untuk rumus rekap SPP ini, sudah
> >> dicoba tapi mungkin ada yang salah, hasil yang diinginkan seperti pada
> >> sheet rekap..untuk tabel sheet db kalau ada solusi lain selain kolom
> >> bantu yang ada silahkan di utak atik. terimakasih atas bantuan
> >> rekan-rekan.
> >> Wassalamu'alaikum Warahmatullahi Wabarakatuh,
> >>
> >>
> >
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (5) . Top ^

============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Visit Your Group

• New Members 6

• Privacy • Unsubscribe • Terms of Use