Messages In This Digest (25 Messages)

1a.: Re: durasi waktu From: tuti andrayani
1b.: Re: durasi waktu From: Kid Mr.
1c.: Re: durasi waktu From: dwint ruswanto

2a.: Re: help sepertinya ada yg salah dengan code ku From: Markonah
2b.: Bls: [belajar-excel] help sepertinya ada yg salah dengan code ku From: Harumi Wanasita

3a.: PENGELOMPOKAN TANGGAL From: Kurei recca
3b.: Re: PENGELOMPOKAN TANGGAL From: Markonah
3c.: Re: PENGELOMPOKAN TANGGAL From: yusajing_ehm@yahoo.com

4a.: Bls: [belajar-excel] help sepertinya ada yg salah dengan code ku From: Harumi Wanasita

5a.: Bagaiman merubah margin kanan From: Ariefin Sp
5b.: Re: Bagaiman merubah margin kanan From: dwint ruswanto
5c.: Bls: [belajar-excel] Bagaiman merubah margin kanan From: Joe Dien
5d.: Re: Bls: [belajar-excel] Bagaiman merubah margin kanan From: Ariefin Sp
5e.: Re: Bagaiman merubah margin kanan From: Ariefin Sp

6a.: input ditexsbook pada userform diberi rumus penjumlahan From: daniel_aho
6b.: Re: input ditexsbook pada userform diberi rumus penjumlahan From: Kid Mr.

7a.: Membuat Rumus (lookup 2 kriteria -- Mods) From: heru mulyono
7b.: Bls: [belajar-excel] Membuat Rumus (lookup 2 kriteria -- Mods) From: ghozi alkatiri
7c.: Re: Membuat Rumus (lookup 2 kriteria -- Mods) From: Kid Mr.
7d.: Re: Membuat Rumus (lookup 2 kriteria -- Mods) From: dwint ruswanto
7e.: Re: Membuat Rumus (lookup 2 kriteria -- Mods) From: Kid Mr.

8a.: Belajar buat history waktu From: lapendosol opik
8b.: Re: Belajar buat history waktu From: Markonah

9a.: Re: sort data From: Purnomo Sidi
9b.: sort data From: Purnomo Sidi

View All Topics | Create New Topic

Messages

1a.: Re: durasi waktu

Posted by: "tuti andrayani" andrayani_lee@yahoo.co.id andrayani_lee

Fri Jun 22, 2012 12:44 am (PDT)

Dear Pa Dwint,

Kalau 00:00 - 00:59 dengan rumus tersebut terhitungnya 0,5 seharusnya 1
Formula INT sepertinya untuk membulatkan ke bawah ya?
Formula untuk kalau kurangnya maksimal 2 menit dibulatkan ke atas apa ya?
Thanks
Tuti

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1b.: Re: durasi waktu

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 12:50 am (PDT)

Fungsi pembulatan :
Round,RoundDown,RoundUp -> pembulatan berdasar jumlah digit dibelakang koma
Floor, Ceiling -> pembulatan ke kelipatan tertentu
Int -> membulatkan ke bilangan bulat sebelumnya (yang lebih rendah)

Kid.

2012/6/22 tuti andrayani <andrayani_lee@yahoo.co.id>

> **
>
>
> Dear Pa Dwint,
>
> Kalau 00:00 - 00:59 dengan rumus tersebut terhitungnya 0,5 seharusnya 1
> Formula INT sepertinya untuk membulatkan ke bawah ya?
> Formula untuk kalau kurangnya maksimal 2 menit dibulatkan ke atas apa ya?
> Thanks
> Tuti
>
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
1c.: Re: durasi waktu

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 1:23 am (PDT)

coba formula ini, terinspirasi dari jawaban mr Kid sebelumnya dan
keterangan tambahan dari mr Kid

=FLOOR(((B2-A2)*24)+0,034;0,5)

-dwint-

Pada 22 Juni 2012 14:49, Kid Mr. <mr.nmkid@gmail.com> menulis:

> **
>
>
> Fungsi pembulatan :
> Round,RoundDown,RoundUp -> pembulatan berdasar jumlah digit dibelakang koma
> Floor, Ceiling -> pembulatan ke kelipatan tertentu
> Int -> membulatkan ke bilangan bulat sebelumnya (yang lebih rendah)
>
> Kid.
>
>
> 2012/6/22 tuti andrayani <andrayani_lee@yahoo.co.id>
>
>> **
>>
>>
>> Dear Pa Dwint,
>>
>> Kalau 00:00 - 00:59 dengan rumus tersebut terhitungnya 0,5 seharusnya 1
>> Formula INT sepertinya untuk membulatkan ke bawah ya?
>> Formula untuk kalau kurangnya maksimal 2 menit dibulatkan ke atas apa ya?
>> Thanks
>> Tuti
>>
>>
>
>

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

2a.: Re: help sepertinya ada yg salah dengan code ku

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 12:55 am (PDT)

coba dibandingkan makro asli dari mbak Harum -VS
makro yg telah kami coba perbaiki ini
kesalahan hanya pengisian cell terbalik

harusnya cell diisi dengan variables hasil select case
yg mbak Harum lakukan Variables diisi dengan cell di FORM

Sub GetData()
Dim nama, kelas As String
Dim nim As Long

With Worksheets("Bantuan")
nama = .Cells(1, 5).Value

Select Case nama
Case "Budi"
nis = .Cells(2, 2).Value
kelas = .Cells(2, 3).Value

Case "Bambang"
nis = .Cells(3, 2).Value
kelas = .Cells(3, 3).Value

Case "Wati"
nis = .Cells(4, 2).Value
kelas = .Cells(4, 3).Value

Case "Iwan"
nis = .Cells(5, 2).Value
kelas = .Cells(5, 3).Value

End Select

Cells(1, 4).ClearContents
End With

With Worksheets("Form")
*.Cells(5, 2).Value = nama*
*.Cells(6, 2).Value = nis*
*.Cells(7, 2).Value = kelas*
End With

End Sub

-mar-

2012/6/22 Harumi Wanasita <hwanasita@yahoo.com>

**
> thanks buat jawabannya dan rumusnya yg singkat. tp sy lg belajar dr
> buku... kl misalkan tetap pake rumus itu yg salah yg dimana? karena sy
> sedang belajar bertahap. biar lebih ngerti lg.. terlepas dr jumlah murid
> berapapun.
>
>
------------------------------
> *Dari:* Markonah <markonatul@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Jumat, 22 Juni 2012 6:48
> *Judul:* Re: [belajar-excel] help sepertinya ada yg salah dengan code ku
>
> yg pendek saja mbak, karena nilai dropdwon itu adalah Bilangan
> (index baris range yg dirujuk), tidak seperti yg tampak di dropdownnya;
> dan tabel juga punya index, jadi tinggal ambil berdasarkan alamat
> Cell(RowIdx,ColumnIdx) saja
> tidak perlu membuat select case sebanyak data tabel yg ada
> Kalau jml muridnya 1000, selec casenya tentu panjang sekali (1000 case)
>
> Sub MengambilData()
> Dim RowIdx As Long, ShBt As Worksheet
> Set ShBt = Sheets("bantuan")
> RowIdx = Sheets("bantuan").Range("D1").Value + 1
> With Worksheets("Form")
> .Cells(5, 2).Value = ShBt.Cells(RowIdx, 1)
> .Cells(6, 2).Value = ShBt.Cells(RowIdx, 2)
> .Cells(7, 2).Value = ShBt.Cells(RowIdx, 3)
> End With
> ShBt.Cells(1, 4).ClearContents
> End Sub
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)
2b.: Bls: [belajar-excel] help sepertinya ada yg salah dengan code ku

Posted by: "Harumi Wanasita" hwanasita@yahoo.com hwanasita

Fri Jun 22, 2012 2:28 am (PDT)

oh begitu ya mbak...
jdi berbeda yah dengan menuliskan dulu
nama =.cells(5,2).value
dengan

.cells(5,2).value = nama
jadi seperti sy bikin rumus baru di worksheet form dan tidak tehubung dengan worksheet bantuan gitu kah mbak?
trims...

________________________________
Dari: Markonah <markonatul@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 22 Juni 2012 14:48
Judul: Re: [belajar-excel] help sepertinya ada yg salah dengan code ku

coba dibandingkan makro asli dari mbak Harum -VS
makro yg telah kami coba perbaiki ini
kesalahan hanya pengisian cell terbalik

harusnya cell diisi dengan variables hasil select case
yg mbak Harum lakukan Variables diisi dengan cell di FORM

Sub GetData()
Dim nama, kelas As String
Dim nim As Long

With Worksheets("Bantuan")
nama = .Cells(1, 5).Value

Select Case nama
Case "Budi"
nis = .Cells(2, 2).Value
kelas = .Cells(2, 3).Value

Case "Bambang"
nis = .Cells(3, 2).Value
kelas = .Cells(3, 3).Value

Case "Wati"
nis = .Cells(4, 2).Value
kelas = .Cells(4, 3).Value

Case "Iwan"
nis = .Cells(5, 2).Value
kelas = .Cells(5, 3).Value

End Select

Cells(1, 4).ClearContents
End With

With Worksheets("Form")
.Cells(5, 2).Value = nama
.Cells(6, 2).Value = nis
.Cells(7, 2).Value = kelas
End With

End Sub
-mar-

2012/6/22 Harumi Wanasita <hwanasita@yahoo.com>

>thanks buat jawabannya dan rumusnya yg singkat. tp sy lg belajar dr buku... kl misalkan tetap pake rumus itu yg salah yg dimana? karena sy sedang belajar bertahap. biar lebih ngerti lg.. terlepas dr jumlah murid berapapun.
>

>________________________________
> Dari: Markonah <markonatul@gmail.com>
>Kepada: belajar-excel@yahoogroups.com
>Dikirim: Jumat, 22 Juni 2012 6:48
>Judul: Re: [belajar-excel] help sepertinya ada yg salah dengan code ku
>
>
>
>yg pendek saja mbak, karena nilai dropdwon itu adalah Bilangan
>(index baris range yg dirujuk), tidak seperti yg tampak di dropdownnya;
>dan tabel juga punya index, jadi tinggal ambil berdasarkan alamat Cell(RowIdx,ColumnIdx) saja
>tidak perlu membuat select case sebanyak data tabel yg ada
>Kalau jml muridnya 1000, selec casenya tentu panjang sekali (1000 case)
>
>
>Sub MengambilData()
> Dim RowIdx As Long, ShBt As Worksheet
> Set ShBt = Sheets("bantuan")
> RowIdx = Sheets("bantuan").Range("D1").Value + 1
> With Worksheets("Form")
> .Cells(5, 2).Value = ShBt.Cells(RowIdx, 1)
> .Cells(6, 2).Value = ShBt.Cells(RowIdx, 2)
> .Cells(7, 2).Value = ShBt.Cells(RowIdx, 3)
> End With
> ShBt.Cells(1, 4).ClearContents
>End Sub
>
>

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

3a.: PENGELOMPOKAN TANGGAL

Posted by: "Kurei recca" yusajing_ehm@yahoo.com yusajing_ehm

Fri Jun 22, 2012 2:26 am (PDT)

Salam Para Master Excel,

Saya sedang mengerjakan macro UDF, akan tetapi saya kesulitan dalam mengelompokkan,
Lebih jelasnya dapat dilihat di lampiran

Mohon Pencerahannya,

Best Regards

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)
3b.: Re: PENGELOMPOKAN TANGGAL

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 7:21 am (PDT)

mungkin seperti ini
(ini masih versi asal asalan, tetapi pelan pelan dapat diperbagus logikanya)

Function KelompokTgl(vRange As Range, TgRange As Range) As String
' Markonah for BeExcel Kasus # 17751
'-----------------------------------
Dim v As Long, i As Integer, S As String

For v = WorksheetFunction.Max(vRange) To 1 Step -1
For i = 1 To vRange.Columns.Count
If Not vRange(1, i).Value = vbNullString Then
If vRange(1, i).Value = v Then
S = S & TgRange(1, i).Value & ","
End If
End If
Next i
If Len(S) > 0 Then S = Left(S, Len(S) - 1)
S = S & " @ " & v & "S" & ", "
Next v

If Len(S) > 6 Then S = Trim(Left(S, Len(S) - 7))
If Right(S, 1) = "," Then S = Left(S, Len(S) - 1)
KelompokTgl = S
End Function

*2012/6/22 Kurei recca <yusajing_ehm@yahoo.com> *
>
> *Saya sedang mengerjakan macro UDF, akan tetapi saya kesulitan dalam
> mengelompokkan,*
> *Lebih jelasnya dapat dilihat di lampiran*
> *Mohon Pencerahannya,*
> *Best Regards*
>
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (3)
3c.: Re: PENGELOMPOKAN TANGGAL

Posted by: "yusajing_ehm@yahoo.com" yusajing_ehm@yahoo.com yusajing_ehm

Fri Jun 22, 2012 5:41 pm (PDT)

Wow, tq very much,,
Sudah terselesaikan..

Powered by Telkomsel BlackBerry®

-----Original Message-----
From: Markonah <markonatul@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Fri, 22 Jun 2012 21:21:26
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] PENGELOMPOKAN TANGGAL

mungkin seperti ini
(ini masih versi asal asalan, tetapi pelan pelan dapat diperbagus logikanya)

Function KelompokTgl(vRange As Range, TgRange As Range) As String
' Markonah for BeExcel Kasus # 17751
'-----------------------------------
Dim v As Long, i As Integer, S As String

For v = WorksheetFunction.Max(vRange) To 1 Step -1
For i = 1 To vRange.Columns.Count
If Not vRange(1, i).Value = vbNullString Then
If vRange(1, i).Value = v Then
S = S & TgRange(1, i).Value & ","
End If
End If
Next i
If Len(S) > 0 Then S = Left(S, Len(S) - 1)
S = S & " @ " & v & "S" & ", "
Next v

If Len(S) > 6 Then S = Trim(Left(S, Len(S) - 7))
If Right(S, 1) = "," Then S = Left(S, Len(S) - 1)
KelompokTgl = S
End Function

*2012/6/22 Kurei recca <yusajing_ehm@yahoo.com> *
>
> *Saya sedang mengerjakan macro UDF, akan tetapi saya kesulitan dalam
> mengelompokkan,*
> *Lebih jelasnya dapat dilihat di lampiran*
> *Mohon Pencerahannya,*
> *Best Regards*
>
>
>

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

4a.: Bls: [belajar-excel] help sepertinya ada yg salah dengan code ku

Posted by: "Harumi Wanasita" hwanasita@yahoo.com hwanasita

Fri Jun 22, 2012 2:26 am (PDT)

kl pake rumus yg embak / mas berikan ini artinya apa ?

pada rumus RowIdx = Sheets("bantuan").Range("D1").Value + 1
ini maksudnya bahasa manusianya apa ya mbak/ mas? maklum sy lg belajar dikit2
kl nalar sy bilang pada worksheet form untuk nilai cells baris 5 kolom 2 adalah nilai pada cell shbt dimana shbt adalah worksheet bantuan dengan
row idx kolom 1... nah row idx kolom 1 nih apa maksudnya mbak / mas?

________________________________
Dari: Markonah <markonatul@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 22 Juni 2012 12:48
Judul: Re: [belajar-excel] help sepertinya ada yg salah dengan code ku

yg pendek saja mbak, karena nilai dropdwon itu adalah Bilangan
(index baris range yg dirujuk), tidak seperti yg tampak di dropdownnya;
dan tabel juga punya index, jadi tinggal ambil berdasarkan alamat Cell(RowIdx,ColumnIdx) saja
tidak perlu membuat select case sebanyak data tabel yg ada
Kalau jml muridnya 1000, selec casenya tentu panjang sekali (1000 case)

Sub MengambilData()
Dim RowIdx As Long, ShBt As Worksheet
Set ShBt = Sheets("bantuan")
RowIdx = Sheets("bantuan").Range("D1").Value + 1
With Worksheets("Form")
.Cells(5, 2).Value = ShBt.Cells(RowIdx, 1)
.Cells(6, 2).Value = ShBt.Cells(RowIdx, 2)
.Cells(7, 2).Value = ShBt.Cells(RowIdx, 3)
End With
ShBt.Cells(1, 4).ClearContents
End Sub

2012/6/22 Harumi Wanasita <hwanasita@yahoo.com>

>help
>
>apakah ada yg salah dengan kode ku di vb yah?
>kenapa saat pilih nama di combo box nya kok gak otomatis tertulis di worksheet form?
>makasih...

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

5a.: Bagaiman merubah margin kanan

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 2:27 am (PDT)

Dear Para pakar Bexceller,
Mhn bantuannya dari para pakar, sy diminta mengeprint data spt attc, tp margin kanannya ternyata tidak bisa sy ubah, padahal bos minta hasil print hrs penuh. sy menggunakan ms excel 2007, sblmnya menggunakan excel 2003.
terimakasih atas bantuannya
salam hormat
arifin

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
5b.: Re: Bagaiman merubah margin kanan

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 2:59 am (PDT)

saya cek di print preview, semua halaman tidak ada yang terpotong, coba
pastikan lagi ukuran kertas di printer sama dengan ukuran kertas yang telah
disetting sebelumnya.

di komputer yang saya gunakan, margin kanan juga bisa diubah

-dwint-

Pada 22 Juni 2012 15:27, Ariefin Sp <ariefinsp@yahoo.com> menulis:

> **
>
>
> Dear Para pakar Bexceller,
> Mhn bantuannya dari para pakar, sy diminta mengeprint data spt attc, tp
> margin kanannya ternyata tidak bisa sy ubah, padahal bos minta hasil print
> hrs penuh. sy menggunakan ms excel 2007, sblmnya menggunakan excel 2003.
> terimakasih atas bantuannya
> salam hormat
> arifin
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
5c.: Bls: [belajar-excel] Bagaiman merubah margin kanan

Posted by: "Joe Dien" shimano02@ymail.com shimano02@ymail.com

Fri Jun 22, 2012 3:06 am (PDT)

Mas Arifin....

Coba buka Print Priview => klik Page setup =>klik page => klik scaling => contreng Fit to: 1 => ok

met mencoba

thx,
joedien

________________________________
Dari: Ariefin Sp <ariefinsp@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Jumat, 22 Juni 2012 15:27
Judul: [belajar-excel] Bagaiman merubah margin kanan

Dear Para pakar Bexceller,
Mhn bantuannya dari para pakar, sy diminta mengeprint data spt attc, tp margin kanannya ternyata tidak bisa sy ubah, padahal bos minta hasil print hrs penuh. sy menggunakan ms excel 2007, sblmnya menggunakan excel 2003.
terimakasih atas bantuannya
salam hormat
arifin

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
5d.: Re: Bls: [belajar-excel] Bagaiman merubah margin kanan

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 4:40 am (PDT)

terimakasih mbak sy coba dulu..

________________________________
From: Joe Dien <shimano02@ymail.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Friday, June 22, 2012 3:05 AM
Subject: Bls: [belajar-excel] Bagaiman merubah margin kanan

Mas Arifin....

Coba buka Print Priview => klik Page setup =>klik page => klik scaling => contreng Fit to: 1 => ok

met mencoba

thx,
joedien

________________________________
Dari: Ariefin Sp <ariefinsp@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Jumat, 22 Juni 2012 15:27
Judul: [belajar-excel] Bagaiman merubah margin kanan

Dear Para pakar Bexceller,
Mhn bantuannya dari para pakar, sy diminta mengeprint data spt attc, tp margin kanannya ternyata tidak bisa sy ubah, padahal bos minta hasil print hrs penuh. sy menggunakan ms excel 2007, sblmnya menggunakan excel 2003.
terimakasih atas bantuannya
salam hormat
arifin

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
5e.: Re: Bagaiman merubah margin kanan

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 4:41 am (PDT)

terimaksih mas, sy c0ba cek dulu..

________________________________
From: dwint ruswanto <dwint.ruswanto@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Friday, June 22, 2012 2:59 AM
Subject: Re: [belajar-excel] Bagaiman merubah margin kanan

saya cek di print preview, semua halaman tidak ada yang terpotong, coba pastikan lagi ukuran kertas di printer sama dengan ukuran kertas yang telah disetting sebelumnya.

di komputer yang saya gunakan, margin kanan juga bisa diubah

-dwint-

Pada 22 Juni 2012 15:27, Ariefin Sp <ariefinsp@yahoo.com> menulis:

>
>Dear Para pakar Bexceller,
>Mhn bantuannya dari para pakar, sy diminta mengeprint data spt attc, tp margin kanannya ternyata tidak bisa sy ubah, padahal bos minta hasil print hrs penuh. sy menggunakan ms excel 2007, sblmnya menggunakan excel 2003.
>terimakasih atas bantuannya
>salam hormat
>arifin
>

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

6a.: input ditexsbook pada userform diberi rumus penjumlahan

Posted by: "daniel_aho" daniel_aho@yahoo.co.id

Fri Jun 22, 2012 2:29 am (PDT)

Dear para master excel,

mohon pencerahan dan bantuannya, saya mengggunakan macro dengan userform
untuk penginputan data, pada textbox berisi nilai / angka dari
penjumlahan beberapa angka, selama ini saya kerepotan karena harus
menjumlahkan dulu angka2 tersebut, baru saya input di textbox. yang saya
mau tanyakan:

- apakah ada rumus di macro-nya pada textbox tsb atau di file excelnya
mesti ada yang disett gitu?
- jika ada rumus seperti apa? tolong dibantu....

untuk lebih jelasnya bisa dilihat pada lampiran berikut,

terima kasih sebelumnya atas perhatian dan bantuannya

daniel-aho

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
6b.: Re: input ditexsbook pada userform diberi rumus penjumlahan

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 2:46 am (PDT)

Biasanya, memasukkan nilai ke sebuah range adalah dengan :
range("a2").value = txtNilai.text

Jika textbox berisi tulisan berupa formula, seperti teks '=25+10+25'
coba masukkan ke range dengan properti formula, seperti :
range("a2").formula = txtnilai.text

Wassalam,
Kid.

2012/6/22 daniel_aho <daniel_aho@yahoo.co.id>

> **
>
>
> Dear para master excel,
>
> mohon pencerahan dan bantuannya, saya mengggunakan macro dengan userform
> untuk penginputan data, pada textbox berisi nilai / angka dari
> penjumlahan beberapa angka, selama ini saya kerepotan karena harus
> menjumlahkan dulu angka2 tersebut, baru saya input di textbox. yang saya
> mau tanyakan:
>
> - apakah ada rumus di macro-nya pada textbox tsb atau di file excelnya
> mesti ada yang disett gitu?
> - jika ada rumus seperti apa? tolong dibantu....
>
> untuk lebih jelasnya bisa dilihat pada lampiran berikut,
>
> terima kasih sebelumnya atas perhatian dan bantuannya
>
> daniel-aho
>
>
>

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

7a.: Membuat Rumus (lookup 2 kriteria -- Mods)

Posted by: "heru mulyono" hmulyono24@gmail.com

Fri Jun 22, 2012 8:44 am (PDT)

Yth, Pakar Excel

Saya ada kesulitan untuk membuat rumus. (file terlampir)
mohon bantuannya.
matur nuwun

>> begin Mods
Terdapat sebuah tabel referensi 2 dimensi kriteria, yaitu :
1. kriteria baris berisi daftar kemampuan (4 item) bertipe teks [D5:D8]
2. kriteria kolom berisi daftar nilai kualitatif (3 item) bertipe teks [E4:G4]
Setiap kombinasi kriteria baris dan kolom akan berupa teks keterangan tentang kemampuan tentang masing-masing kriteria baris. Jadi akan ada 12 item keterangan yang berupa matriks 4 baris x 3 kolom pada range E5:G8

Data inputan oleh user terdiri dari :
1. kolom kemampuan (kolom C mulai C14)
2. kolom nilai kualitatif (kolom D mulai D14)

Diinginkan pada kolom Keterangan (kolom E mulai E14) berisi formula yang mengambil teks keterangan pada tabel referensi berdasar inputan kemampuan (input kolom C) dan nilai kualitatif (input kolom D)
>> end Mods

--- Mods ---
Mohon posting berikutnya memberi subject (judul email) dengan kalimat yang mencerminkan kasus yang diutarakan.
Berikan penjelasan singkat tentang kasus yang diutarakan pada badan email, karena tidak semua member bisa men-download file lampiran.
------------

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
7b.: Bls: [belajar-excel] Membuat Rumus (lookup 2 kriteria -- Mods)

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

Fri Jun 22, 2012 9:34 am (PDT)

tulis di E14
=INDEX($E$5:$G$8;MATCH($C14;$D$5:$D$8;0);MATCH($D14;$E$4:$G$4;0))
copy ke bawah

wassalam

Ghozi Alkatiri

________________________________
Dari: heru mulyono <hmulyono24@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 22 Juni 2012 22:20
Judul: [belajar-excel] Membuat Rumus (lookup 2 kriteria -- Mods)

Yth, Pakar Excel

Saya ada kesulitan untuk membuat rumus. (file terlampir)
mohon bantuannya.
matur nuwun

>> begin Mods
Terdapat sebuah tabel referensi 2 dimensi kriteria, yaitu :
1. kriteria baris berisi daftar kemampuan (4 item) bertipe teks [D5:D8]
2. kriteria kolom berisi daftar nilai kualitatif (3 item) bertipe teks [E4:G4]
Setiap kombinasi kriteria baris dan kolom akan berupa teks keterangan tentang kemampuan tentang masing-masing kriteria baris. Jadi akan ada 12 item keterangan yang berupa matriks 4 baris x 3 kolom pada range E5:G8

Data inputan oleh user terdiri dari :
1. kolom kemampuan (kolom C mulai C14)
2. kolom nilai kualitatif (kolom D mulai D14)

Diinginkan pada kolom Keterangan (kolom E mulai E14) berisi formula yang mengambil teks keterangan pada tabel referensi berdasar inputan kemampuan (input kolom C) dan nilai kualitatif (input kolom D)
>> end Mods

--- Mods ---
Mohon posting berikutnya memberi subject (judul email) dengan kalimat yang mencerminkan kasus yang diutarakan.
Berikan penjelasan singkat tentang kasus yang diutarakan pada badan email, karena tidak semua member bisa men-download file lampiran.
------------

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
7c.: Re: Membuat Rumus (lookup 2 kriteria -- Mods)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 3:46 pm (PDT)

Coba vLookUp :
=vLookUp( c14 , $d$5:$g$8 , Match( d14 , $d$4:$g$4 , 0 ) , 0 )

Wassalam,
Kid.

2012/6/22 heru mulyono <hmulyono24@gmail.com>

> **
>
>
> Yth, Pakar Excel
>
> Saya ada kesulitan untuk membuat rumus. (file terlampir)
> mohon bantuannya.
> matur nuwun
>
> >> begin Mods
> Terdapat sebuah tabel referensi 2 dimensi kriteria, yaitu :
> 1. kriteria baris berisi daftar kemampuan (4 item) bertipe teks [D5:D8]
> 2. kriteria kolom berisi daftar nilai kualitatif (3 item) bertipe teks
> [E4:G4]
> Setiap kombinasi kriteria baris dan kolom akan berupa teks keterangan
> tentang kemampuan tentang masing-masing kriteria baris. Jadi akan ada 12
> item keterangan yang berupa matriks 4 baris x 3 kolom pada range E5:G8
>
> Data inputan oleh user terdiri dari :
> 1. kolom kemampuan (kolom C mulai C14)
> 2. kolom nilai kualitatif (kolom D mulai D14)
>
> Diinginkan pada kolom Keterangan (kolom E mulai E14) berisi formula yang
> mengambil teks keterangan pada tabel referensi berdasar inputan kemampuan
> (input kolom C) dan nilai kualitatif (input kolom D)
> >> end Mods
>
> --- Mods ---
> Mohon posting berikutnya memberi subject (judul email) dengan kalimat yang
> mencerminkan kasus yang diutarakan.
> Berikan penjelasan singkat tentang kasus yang diutarakan pada badan email,
> karena tidak semua member bisa men-download file lampiran.
> ------------
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
7d.: Re: Membuat Rumus (lookup 2 kriteria -- Mods)

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 6:47 pm (PDT)

karena mas ghozi sudah memberikan solusi dengan =Index ( Match () )
dan Mr Kid sudah memberikan solusi dengan =Vlookup ( Match ())
maka saya coba solusi alternatif lain memanfaatkan formula =OffSet ( Match
())

Kata orang, banyak jalan ke Roma, jadi juga banyak cara untuk menyelesaikan
suatu kasus

coba juga pelajari formula berikut

=OffSet($E$5:$G$5;Match(C14;$D$5:$D$8;0)-1;Match(D14;$E$4:$G$4;0)-1;1;1)

bahasa manusianya seperti ini:

OffSet( $E$5:$G$5; >>> posisi awal adalah kolom E baris 5 sampai kolom G
baris 5, posisi baris 0 (nol) dan posisi kolom 0 (nol

Match(C14;$D$5:$D$8;0)-1; >>> cari nilai di kolom D mulai baris ke 5 s/d
baris ke 8 yang sama dengan nilai di cell C14, tanda -1 digunakan untuk
mengurangi nilai baris karena nilai baris dihitung mulai dari 0 (nol)

Match(D14;$E$4:$G$4;0)-1; >>> cari nilai di baris 4 mulai kolom E s/d G
yang sama dengan nilai di cell D14, tanda -1 digunakan untuk mengurangi
nilai kolom karena nilai kolom dihitung mulai dari 0 (nol)

1;1) >>> menunjukkan lebar baris yang digunakan adalah 1 baris dan lebar
kolom yang digunakan adalah 1 kolom

Kenapa mas Ghozi, Mr Kid, dan saya sama-sama menggunakan Match? karena
Match digunakan untuk mencari letak suatu nilai atau posisi suatu nilai
dalam suatu range tertentu, posisi tersebut bisa berupa posisi baris atau
posisi kolom atau keduanya.

semoga bermanfaat

-dwint-

Pada 23 Juni 2012 05:46, Kid Mr. <mr.nmkid@gmail.com> menulis:

> **
>
>
> Coba vLookUp :
> =vLookUp( c14 , $d$5:$g$8 , Match( d14 , $d$4:$g$4 , 0 ) , 0 )
>
> Wassalam,
> Kid.
>
>
> 2012/6/22 heru mulyono <hmulyono24@gmail.com>
>
>> **
>>
>>
>> Yth, Pakar Excel
>>
>> Saya ada kesulitan untuk membuat rumus. (file terlampir)
>> mohon bantuannya.
>> matur nuwun
>>
>> >> begin Mods
>> Terdapat sebuah tabel referensi 2 dimensi kriteria, yaitu :
>> 1. kriteria baris berisi daftar kemampuan (4 item) bertipe teks [D5:D8]
>> 2. kriteria kolom berisi daftar nilai kualitatif (3 item) bertipe teks
>> [E4:G4]
>> Setiap kombinasi kriteria baris dan kolom akan berupa teks keterangan
>> tentang kemampuan tentang masing-masing kriteria baris. Jadi akan ada 12
>> item keterangan yang berupa matriks 4 baris x 3 kolom pada range E5:G8
>>
>> Data inputan oleh user terdiri dari :
>> 1. kolom kemampuan (kolom C mulai C14)
>> 2. kolom nilai kualitatif (kolom D mulai D14)
>>
>> Diinginkan pada kolom Keterangan (kolom E mulai E14) berisi formula yang
>> mengambil teks keterangan pada tabel referensi berdasar inputan kemampuan
>> (input kolom C) dan nilai kualitatif (input kolom D)
>> >> end Mods
>>
>> --- Mods ---
>> Mohon posting berikutnya memberi subject (judul email) dengan kalimat
>> yang mencerminkan kasus yang diutarakan.
>> Berikan penjelasan singkat tentang kasus yang diutarakan pada badan
>> email, karena tidak semua member bisa men-download file lampiran.
>> ------------
>>
>
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (5)
7e.: Re: Membuat Rumus (lookup 2 kriteria -- Mods)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 7:05 pm (PDT)

Formula Pak Dwint bisa juga diubah menjadi berbasis cell D4 (pertemuan
kriteria kolom dan kriteria baris) :
>> Regional setting :: Indonesia
=OffSet($D$4;Match(C14;$D$5:$D$8;0);Match(D14;$E$4:$G$4;0))

>> Regional setting :: English
=OffSet($D$4,Match(C14,$D$5:$D$8,0),Match(D14,$E$4:$G$4,0))

Sepertinya, karena ini data penilaian dan kolom kemampuan adalah materi
tes, pasti seluruh materi tes akan selalu ada tapi dengan nilai hasil tes
yang berbeda.
Jika akan mencoba dengan array blok formula :
>> blok 4 baris x 1 kolom cell hasil (E14:E17)
>> tulis formula :
=Index( $e$5:$g$8 , Match( c14:c17 , $d$5:$d$8 , 0 ) , Match(
d14:d17 , $e$4:$g$4 , 0 ) )
>> jangan tekan ENTER, tapi tekan CTRL SHIFT ENTER secara bersamaan
>> copy formula di E14:E17 ke peserta lainnya (selalu sebagai blok 4 baris
x 1 kolom supaya lengkap hasilnya)

Wassalam,
Kid.

2012/6/23 dwint ruswanto <dwint.ruswanto@gmail.com>

> **
>
>
> karena mas ghozi sudah memberikan solusi dengan =Index ( Match () )
> dan Mr Kid sudah memberikan solusi dengan =Vlookup ( Match ())
> maka saya coba solusi alternatif lain memanfaatkan formula =OffSet ( Match
> ())
>
> Kata orang, banyak jalan ke Roma, jadi juga banyak cara untuk
> menyelesaikan suatu kasus
>
> coba juga pelajari formula berikut
>
> =OffSet($E$5:$G$5;Match(C14;$D$5:$D$8;0)-1;Match(D14;$E$4:$G$4;0)-1;1;1)
>
> bahasa manusianya seperti ini:
>
> OffSet( $E$5:$G$5; >>> posisi awal adalah kolom E baris 5 sampai kolom G
> baris 5, posisi baris 0 (nol) dan posisi kolom 0 (nol
>
> Match(C14;$D$5:$D$8;0)-1; >>> cari nilai di kolom D mulai baris ke 5 s/d
> baris ke 8 yang sama dengan nilai di cell C14, tanda -1 digunakan untuk
> mengurangi nilai baris karena nilai baris dihitung mulai dari 0 (nol)
>
> Match(D14;$E$4:$G$4;0)-1; >>> cari nilai di baris 4 mulai kolom E s/d G
> yang sama dengan nilai di cell D14, tanda -1 digunakan untuk mengurangi
> nilai kolom karena nilai kolom dihitung mulai dari 0 (nol)
>
> 1;1) >>> menunjukkan lebar baris yang digunakan adalah 1 baris dan lebar
> kolom yang digunakan adalah 1 kolom
>
> Kenapa mas Ghozi, Mr Kid, dan saya sama-sama menggunakan Match? karena
> Match digunakan untuk mencari letak suatu nilai atau posisi suatu nilai
> dalam suatu range tertentu, posisi tersebut bisa berupa posisi baris atau
> posisi kolom atau keduanya.
>
> semoga bermanfaat
>
> -dwint-
>
>
>
> Pada 23 Juni 2012 05:46, Kid Mr. <mr.nmkid@gmail.com> menulis:
>
> **
>>
>>
>> Coba vLookUp :
>> =vLookUp( c14 , $d$5:$g$8 , Match( d14 , $d$4:$g$4 , 0 ) , 0 )
>>
>> Wassalam,
>> Kid.
>>
>>
>> 2012/6/22 heru mulyono <hmulyono24@gmail.com>
>>
>>> **
>>>
>>>
>>> Yth, Pakar Excel
>>>
>>> Saya ada kesulitan untuk membuat rumus. (file terlampir)
>>> mohon bantuannya.
>>> matur nuwun
>>>
>>> >> begin Mods
>>> Terdapat sebuah tabel referensi 2 dimensi kriteria, yaitu :
>>> 1. kriteria baris berisi daftar kemampuan (4 item) bertipe teks [D5:D8]
>>> 2. kriteria kolom berisi daftar nilai kualitatif (3 item) bertipe teks
>>> [E4:G4]
>>> Setiap kombinasi kriteria baris dan kolom akan berupa teks keterangan
>>> tentang kemampuan tentang masing-masing kriteria baris. Jadi akan ada 12
>>> item keterangan yang berupa matriks 4 baris x 3 kolom pada range E5:G8
>>>
>>> Data inputan oleh user terdiri dari :
>>> 1. kolom kemampuan (kolom C mulai C14)
>>> 2. kolom nilai kualitatif (kolom D mulai D14)
>>>
>>> Diinginkan pada kolom Keterangan (kolom E mulai E14) berisi formula yang
>>> mengambil teks keterangan pada tabel referensi berdasar inputan kemampuan
>>> (input kolom C) dan nilai kualitatif (input kolom D)
>>> >> end Mods
>>>
>>> --- Mods ---
>>> Mohon posting berikutnya memberi subject (judul email) dengan kalimat
>>> yang mencerminkan kasus yang diutarakan.
>>> Berikan penjelasan singkat tentang kasus yang diutarakan pada badan
>>> email, karena tidak semua member bisa men-download file lampiran.
>>> ------------
>>>
>>
>>
>
>

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

8a.: Belajar buat history waktu

Posted by: "lapendosol opik" lapendosol@yahoo.com lapendosol

Fri Jun 22, 2012 10:05 am (PDT)

Mohon bantuannya para master excel
Saya mau buat history waktu, ketika saya pencet tombol simpan, maka akan tercatat waktu saat pencet tombol kedalam sebuah cell. File terlampir untuk penjelasan dari pertanyaan saya. Trimakasih sebelumnya

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)
8b.: Re: Belajar buat history waktu

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 10:46 am (PDT)

Private Sub cmdSaveDatabase_Click()
'----------------------------------
' ModifiedBy: Markonah, Jun 23 2012
'----------------------------------
Dim lRowsDB As Long
If LenB(Me.Range("A2").Value) > 0 Then
' buat ngesave (saya belum tahu: *"nge"* itu "termasuk awalan Ya ?)
Me.Range("E2").Value = Now
Me.Range("E2").NumberFormat = "dd-mmm-yyyy hh:mm:ss"
lRowsDB = Sheet2.Range("a1").CurrentRegion.Rows.Count
Me.Range("A2:E2").Copy
Sheet2.Range("a1").Offset(lRowsDB).PasteSpecial 12
Me.Range("A2:E2").ClearContents
MsgBox "Sip sip sip", vbInformation
End If
End Sub
'----------------------

*2012/6/23 lapendosol opik <lapendosol@yahoo.com>
*
>
> * *
> *Mohon bantuannya para master excel*
> *Saya mau buat history waktu, ketika saya pencet tombol simpan, maka akan
> tercatat waktu saat pencet tombol kedalam sebuah cell. File terlampir untuk
> penjelasan dari pertanyaan saya. Trimakasih sebelumnya*
>
>
>

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

9a.: Re: sort data

Posted by: "Purnomo Sidi" pysa_2605@yahoo.com pysa_2605

Fri Jun 22, 2012 6:35 pm (PDT)

BeExcel mohon bantuannya nih

saya memiliki data yang data tersebut dapat bertambah. saya mohon bantuannya bagaimana caranya agar data yang saya entry tersebut dapat ter-Sort secara otomatis (berurutan sesuai dengan nomornya). untuk lebih jelasnya saya lampirkan data tersebut

terima kasih
PYSA_2605

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

Posted by: "Purnomo Sidi" pysa_2605@yahoo.com pysa_2605

Fri Jun 22, 2012 6:35 pm (PDT)

BeExcel mohon bantuannya nih

saya memiliki data yang data tersebut dapat bertambah. saya mohon bantuannya bagaimana caranya agar data yang saya entry tersebut dapat ter-Sort secara otomatis (berurutan sesuai dengan nomornya). untuk lebih jelasnya saya lampirkan data tersebut

terima kasih
PYSA_2605

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

Create New Topic | Visit Your Group on the Web

Messages

---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

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

Jumat, 22 Juni 2012

Messages In This Digest (25 Messages)

Messages

Posted by: "tuti andrayani" andrayani_lee@yahoo.co.id andrayani_lee

Fri Jun 22, 2012 12:44 am (PDT)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 12:50 am (PDT)

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 1:23 am (PDT)

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 12:55 am (PDT)

Posted by: "Harumi Wanasita" hwanasita@yahoo.com hwanasita

Fri Jun 22, 2012 2:28 am (PDT)

Posted by: "Kurei recca" yusajing_ehm@yahoo.com yusajing_ehm

Fri Jun 22, 2012 2:26 am (PDT)

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 7:21 am (PDT)

Posted by: "yusajing_ehm@yahoo.com" yusajing_ehm@yahoo.com yusajing_ehm

Fri Jun 22, 2012 5:41 pm (PDT)

Posted by: "Harumi Wanasita" hwanasita@yahoo.com hwanasita

Fri Jun 22, 2012 2:26 am (PDT)

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 2:27 am (PDT)

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 2:59 am (PDT)

Posted by: "Joe Dien" shimano02@ymail.com shimano02@ymail.com

Fri Jun 22, 2012 3:06 am (PDT)

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 4:40 am (PDT)

Posted by: "Ariefin Sp" ariefinsp@yahoo.com ariefinsp

Fri Jun 22, 2012 4:41 am (PDT)

Posted by: "daniel_aho" daniel_aho@yahoo.co.id

Fri Jun 22, 2012 2:29 am (PDT)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 2:46 am (PDT)

Posted by: "heru mulyono" hmulyono24@gmail.com

Fri Jun 22, 2012 8:44 am (PDT)

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

Fri Jun 22, 2012 9:34 am (PDT)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 3:46 pm (PDT)

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Fri Jun 22, 2012 6:47 pm (PDT)

Posted by: "Kid Mr." mr.nmkid@gmail.com nmkid.family@ymail.com

Fri Jun 22, 2012 7:05 pm (PDT)

Posted by: "lapendosol opik" lapendosol@yahoo.com lapendosol

Fri Jun 22, 2012 10:05 am (PDT)

Posted by: "Markonah" markonatul@gmail.com m_tulqiyem

Fri Jun 22, 2012 10:46 am (PDT)

Posted by: "Purnomo Sidi" pysa_2605@yahoo.com pysa_2605

Fri Jun 22, 2012 6:35 pm (PDT)

Posted by: "Purnomo Sidi" pysa_2605@yahoo.com pysa_2605

Fri Jun 22, 2012 6:35 pm (PDT)

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me