Hot Fox

quinta-feira, 30 de setembro de 2010

Re: ]] XL-mania [[ Create autonumber menggunakan makro excel

semoga sesuai yang diinginkan
tempatkan kursor dimana saja

assign tombol dengan makro berikut
Sub tes()
Dim n As Double
Dim r As Long
Dim c As Long

r = ActiveCell.Row
c = ActiveCell.Column
Cells(19, 4).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Clear

For n = 1 To Cells(11, 4).Value - Cells(9, 4).Value + 1
Cells(r + n - 1, c).Value = Cells(9, 4).Value - 1 + n
Next n
Cells(r, c).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.NumberFormat = Cells(14, 4).Value
End Sub

On 9/29/2010 6:32 PM, Emailnya 4L4M wrote:

Dear Rekans

Hai salam perdamaian...
Mohon batuannya nih, buat rekan rekan semua, membuat autonumber
seperti ilustrasi yang dilampirkan.
langkah pertama:
Input field [begin no] dan [end no] kemudian format field (format
field digit selalu berubah)
dan klik [button process] kemudian akan muncul hasil yang diinginkan (RESULT)

Terima kasih

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (5)

Recent Activity:

New Members 118

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| ooooOOooOooOooOooOoooOoo ngantuukkkkk... badday pasti berlalu... |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| 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.friendster.com/xlmania atau... |
| 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              |
+-------------------------------------------------------------------+

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

]] XL-mania [[ Mencari tanggal transaksi terakhir dengan batasan tertentu

Ikutan urun pndapat ih...kalo mnurut saya kita bsa pake rumus DMAX aja...

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (6)

Recent Activity:

New Members 73

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| oppsss... thr-nya kok cepet banget ya habisnya.... T_____T       |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| 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.friendster.com/xlmania atau... |
| 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              |
+-------------------------------------------------------------------+

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: ]] XL-mania [[ hapus spasi data dari file vba

Semoga sesuai yang diharapkan

=SUBSTITUTE(E5," ","")

untuk bagian yang diantarai dengan warna merah isi dengan karakter yang akan dihilangkan..
Pada masalah yang bapak hadapi adalah tidak bisa menghilangkan "spasi". Agar spasinya bisa hilang, Bapak copy "spasi" yang ada pada cell yang ingin bapak hilangkan spasinya kemudian, paste pada formula yang diantarai warna merah.. See attachment

Mungkin anggota milis yang lain tahu karakter apa yang ada pada setiap akhir isi sel yang ada pada soal yang ditanyakan

CMIIW

Zasli

boyok boyok wrote:

hi ..!

para pakar excel tolongin gue, problem gue hilangin spasi udah pakai +TRIM jugak bisa

trims

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (3)

Recent Activity:

New Members 73

Visit Your Group

MARKETPLACE

Hobbies & Activities Zone: Find others who share your passions! Explore new interests.

Get great advice about dogs and cats. Visit the Dog & Cat Answers Center.

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

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: ]] XL-mania [[ Mencari tanggal transaksi terakhir dengan batasan tertentu

semoga sesuai dengan yang diharapkan

contoh kriteria faktur di cell C2 maka

={MAX(IF($B$2:$B$6=C2,$A$2:$A$6))}

gunakan CSE (Ctrl+Shif+Enter)

CMIIW
Zasli
dwint ruswanto wrote:
> Guys,
> tanya dong gimana caranya mencari tanggal transaksi terakhir dengan
> batasan bahwa transaksi itu digunakan untuk nomer faktur tertentu
> cth:
> Tgl No Faktur
> 12-01-2010 F-01
> 09-02-2010 F-02
> 13-03-1010 F-02
> 10-04-2010 F-03
> 07-05-2010 F-01
> saya mencari tgl terakhir transaksi untuk faktur F-02
> makasih atas bantuannya.
>
>

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic ()

Recent Activity:

Visit Your Group

MARKETPLACE

Hobbies & Activities Zone: Find others who share your passions! Explore new interests.

Get great advice about dogs and cats. Visit the Dog & Cat Answers Center.

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

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: ]] XL-mania [[ menampilkan makanan hewan peliharaan

Semoga sesuai harapan

gunakan udf..hasil googling dan modifikasi

Function LASTNOTBLANK(rngInput As Range) As Variant
Dim WorkRange As Range
Dim i As Integer, CellCount As Integer
Application.Volatile
Set WorkRange = rngInput
CellCount = WorkRange.Count
For i = CellCount To 1 Step -1
If Not IsEmpty(WorkRange(i)) Then
LASTNOTBLANK = WorkRange(i).Value
Exit Function
End If
Next i
End Function

CMIIW

Zasli
lilik marhaendra wrote:
> Dear all,
> Saya pemula, saya mohon bantuannya, saya punya kasus :
> saya ingin menampilkan pada cell AG2 sd. AG4 data terakhir makanan apa
> yg dimakan oleh masing2 keempat hewan tersebut saya menggunakan Excel
> 2007, terima kasih sebelumnya.
>
>

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

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| oppsss... thr-nya kok cepet banget ya habisnya.... T_____T |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf |
+-------------------------------------------------------------------+
| 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.friendster.com/xlmania atau... |
| 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 |
+-------------------------------------------------------------------+Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/XL-mania/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/XL-mania/join
(Yahoo! ID required)

<*> To change settings via email:
XL-mania-digest@yahoogroups.com
XL-mania-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
XL-mania-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/

Re: ]] XL-mania [[ Create autonumber menggunakan makro excel

Private Sub CommandButton1_Click()

' siti Vi / 30 sept 2010

Dim i As Long, n As Long

For i = Range("D9") To Range("D11")

n = n + 1

Range("D19").Cells(n, 1) = i

Range("D19").Cells(n, 1).NumberFormat = Range("D14").Text

Next i

End Sub

perlu dibuat variable n diisi mulai dari 1 (n = n + 1) untuk mengantisipasi

kalau BEGIN numbernya (D9) = bukan 1

2010/9/29 Emailnya 4L4M <goelam8007@gmail.com>

Dear Rekans

Hai salam perdamaian...
Mohon batuannya nih, buat rekan rekan semua, membuat autonumber
seperti ilustrasi yang dilampirkan.
langkah pertama:
Input field [begin no] dan [end no] kemudian format field (format
field digit selalu berubah)
dan klik [button process] kemudian akan muncul hasil yang diinginkan (RESULT)

Terima kasih

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (3)

Recent Activity:

New Members 73

Visit Your Group

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: ]] XL-mania [[ Mencari tanggal transaksi terakhir dengan batasan tertentu

misalnya tabel tsb ada di C1:B6

rumus tgl terakhir (terbesar nilainya) khusus untuk faktur F-02

=MAX((C2:C6="F-02")*(B2:B6))

array formula

kemudian: cell tempat rumus dituliskan di format misalnya

number custom "dd-mmm-yyyy"

2010/9/30 dwint ruswanto <dwint.ruswanto@yahoo.co.id>
> Guys,
> tanya dong gimana caranya mencari tanggal transaksi terakhir dengan batasan bahwa transaksi itu digunakan untuk nomer faktur tertentu
> cth:
> Tgl            No Faktur
> 12-01-2010     F-01
> 09-02-2010     F-02
> 13-03-1010     F-02
> 10-04-2010     F-03
> 07-05-2010     F-01
>
> saya mencari tgl terakhir transaksi untuk faktur F-02
> makasih atas bantuannya.

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (4)

Recent Activity:

New Members 73

Visit Your Group

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: ]] XL-mania [[ Koding dari 2 digit depan.

=VLOOKUP(LEFT(B2,2),$A$15:$B$18,2,FALSE)

2010/9/30 Mody <mody@bni-life.co.id>

Dear Para Suhu.

mohon pencerahan..

bagiamana cara membuat angka 2 digit pertama sebagai koding dari suatu data lain/wilayah

contoh sheet nya seperti beriku..

saya ingin pada sheet wilayah otomatis terisi nama wilayah nya berdasarkan 2 digit pertama kode cabang

No

Kode Cabang

Wilayah

1

0126509

2

0126510

3

0126511

4

0200800

5

0200800

6

0314209

7

0314209

8

0314209

9

0314209

10

0400200

Note

01

Medan

02

Jakarta

03

Semarang

04

Denpasar

Mohon inpoh nya..

tks