Hot Fox

terça-feira, 31 de agosto de 2010

Re: ]] XL-mania [[ Coding File Browser

di dalam file (wokbuk) yg pak Tomz lampirkan itu ada cell N2

Cell tsb harus diisi dengan Extensi FIle yg dikehendaki misalnya XLS

Maka...

setelah kita menentukan sebuah FOLDER melalui BrowseFolder,

daftar file yg ada di Folder terpilih tsb, khususnya yg berextensi *.XLS,

akan terdaftar di cell C6 ke bawah

PATH nya tidak perlu diulang tulis di setiap nama file (di C6 kebawah)

tetapi hanya ditulis di D2

kalo ndak salah begitulah maksud pembuatnya waktu itu

2010/8/31 Tommy <tomz.zlow@gmail.com>

Dear masters,

Tolong bantu saya buat coding untuk menampilkan window browser untuk memudahkan memilih file *.xls yang dikehendaki.

Setelah dipiliih, maka nama file akan masuk ke cell A4, dan file path masuk ke cell C4 misalnya.

Saya pernah melihat macro buatan Mbak Siti, tapi hanya bisa untuk browse folder, sudah coba modif codingan itu, cari bantuan dari excel help, tapi tetep aja i've got no idea :)

Terlampir project buatan Mbak Siti untuk pertanyaan Chusk Soepono bertajuk "]] XL-mania [[ bekerja/memanipulasi nama file melalui Excel"

blessings,

tomz

__._,_.___

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

Messages in this topic (2)

Recent Activity:

New Members 83

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| oooppsss... 216 e-mails di folder sp4m kepencet [delete] :(       |
| 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              |
+-------------------------------------------------------------------+

MARKETPLACE

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

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.

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

__,_._,___

]] XL-mania [[ Query Tdk Bisa diedit

Dear XL - Mania,

Saya punya masalah dengan data yang saya import dari external (dbf file) dan harus diedit querynya. Tetapi pada saat menjalankan perintah edit query muncul pesan :the query cannot be edited by query wizard. Ada yang bisa bantu ?

Thanks sebelumnya.

Regards

Ramses

__._,_.___

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

Messages in this topic (1)

Recent Activity:

New Members 83

Visit Your Group

MARKETPLACE

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

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

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

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

__,_._,___

Re: ]] XL-mania [[ Tanya: Cari cell yang bukan angka

Private Sub Hilite_BukanAngka(Rng As Range)
Dim Cel As Range
Rng.Interior.ColorIndex = xlNone
For Each Cel In Rng
If WorksheetFunction.IsText(Cel.Value) _
Then Cel.Interior.ColorIndex = 36
Next
End Sub

' pilihan 1
' range ditentukan secara hard-coded
Sub kerjakan()
Call Hilite_BukanAngka(Range("A12:E14"))
End Sub

' pilihan 2
' range ditentukan melalui selection by user di INPUTBOX
Sub kerjakan2()
Dim MyRng As Range
Set MyRng = Application.InputBox( _
prompt:="Tunjuk / Tentukan range yg mo diprosess", _
Title:="Range Selection", Default:=Selection.Address, Type:=8)
Hilite_BukanAngka MyRng
End Sub

2010/8/30 Daniel Erwin Hendrajaya <danieleh@centrin.net.id>:
> Rekan-rekan pakar XL,
>
> Saya mau tanya bagaimana cara mencari cell yang BUKAN angka, dengan VBA.
> Format cellnya bisa berbagai macam, namun jika yang diinput bukan angka,
> maka harus highlighted.
>
> Tidak dengan data validation, karena data sudah diinput sebelumnya tanpa
> data validation, sehingga yang dibutuhkan adalah mencari data BUKAN angka
> yang sudah terlanjur diinput sebelumnya.
>
> Terima kasih rekan-rekan semuanya.
>
> Regards,
> Daniel

__._,_.___

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

Messages in this topic (2)

Recent Activity:

New Members 83

Visit Your Group

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

__,_._,___

Bls: ]] XL-mania [[ input di satu cell, hasilnya dapat lebih dari satu cell

Ralat sampel : (momggo diliat attacment)
Macro :
Sub Button1_Click()
ActiveWorkbook.Sheets("Sampel").Activate
    Range("f4").Select
    Do
    If IsEmpty(ActiveCell) = False Then
        ActiveCell.Offset(1, 0).Select
    End If
    Loop Until IsEmpty(ActiveCell) = True
    ActiveCell.Value = Range("d4")
    ActiveCell.Offset(0, 0) = Range("d4")
    End Sub

Semoga membantu

Regards

Lokomotif

Dari: STDEV(i) <setiyowati.devi@gmail.com>
Kepada: XL-mania@yahoogroups.com
Terkirim: Sab, 28 Agustus, 2010 02:32:26
Judul: Re: ]] XL-mania [[ input di satu cell, hasilnya dapat lebih dari satu cell

jelas bahwa di C2 (dan Cells di bawahnya) pasti bukan FORMULA =C1

karena jika C1 di isi LAGI dengan data lain, C2 DILARANG merujuk seperti C1

padahal itulah BUNYI formulanya (kalau harus berisi Formula "=C1")

menurutku kerjaan seperti ini seperti memperlakukan C1 sebagai FORM INPUT DATA

truss... C2 dan cells dibawahnya : walaupun hanya satu kolom boleh dikatakan sebagai

TABEL penampung INPUT

so, biasanya "yg beginian" ini perlu dibantu makro kecil.. yg sebenarnya di milis

sudah banyak contohnya.

Private Sub Worksheet_Change(ByVal C1 As Range)

'siti Vi // 28 aug 2010 // for XL-mania

Dim R As Long

R = 2

If C1.Cells.Count = 1 Then

If C1.Address = Cells(1, 3).Address Then

If Len(C1) > 0 Then

Do While Len(Cells(R, 3).Value) > 0

R = R + 1

Loop

Else

Exit Sub

End If

Cells(R, 3) = C1

End If

End Sub

2010/8/28 Ary <ary_12282@yahoo.com>
>
> Dear master excel yg budiman
> saya mempunyai kendala di excel..mohon untuk pencerahannya
>
> kasus :
> misal di kita input data di cell A1, adalah angka 10, kemudian hasil dari inputan tsb akan muncul di cell C1 ( angka 10 ),

> tetapi saat kita input kembali di cell A1 angka 12 hasil inputan akan otomatis muncul di cell C2 ( angka 12 ),

> tetapi angka 10 di cell C1 tidak berubah. dan bila kita input lagi di cell A1 angka 14 akan muncul angka 14,

> dengan tidak merubah kondisi cell di atasnya.
>
> terima kasih atas bantuannya, dan mohon maaf atas kalimat yang membingungkan
>
> regards
> ary

__._,_.___

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

Messages in this topic (7)

Recent Activity:

New Members 73

Visit Your Group

MARKETPLACE

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

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.

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

__,_._,___

]] XL-mania [[ Menghitung dan membuat tabel untuk Vol Tabung Cylinder Rebah

Hallo para Suhu di XL-Mania...

Kali ini saya mau meminta bantuannya untuk membuatkan
tabel perhitungan atau tabel ukuran volume tangki cylinder
dengan posisi rebah.

Saya sudah coba mencari dari berbagai sumber dan sudah
mendapatkan cara menghitung tangki cylinder rebah dgn
rumus tertentu (terlampir filenya), namun saya mengalami
kesulitan saat menjabarkan atau membuatkan pada lembar
kerja Excel... maklum otak saya sdh buntu....

Sekali lagi saya mohon kesediaan dari para jagoan Excel,
khususnya para Suhu Excel di sini... Terima kasih atas
bantuannya... Semoga XL-Mania makin jaya...

Salam hormat,

Eddy

__._,_.___

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

Messages in this topic (1)

Recent Activity:

New Members 73

Visit Your Group

MARKETPLACE

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

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

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

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

__,_._,___

]] XL-mania [[ Coding File Browser

Dear masters,

Tolong bantu saya buat coding untuk menampilkan window browser untuk memudahkan memilih file *.xls yang dikehendaki.

Setelah dipiliih, maka nama file akan masuk ke cell A4, dan file path masuk ke cell C4 misalnya.

Saya pernah melihat macro buatan Mbak Siti, tapi hanya bisa untuk browse folder, sudah coba modif codingan itu, cari bantuan dari excel help, tapi tetep aja i've got no idea :)

Terlampir project buatan Mbak Siti untuk pertanyaan Chusk Soepono bertajuk "]] XL-mania [[ bekerja/memanipulasi nama file melalui Excel"

blessings,

tomz

__._,_.___

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

Messages in this topic (1)

Recent Activity:

New Members 73

Visit Your Group

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

__,_._,___

segunda-feira, 30 de agosto de 2010

Re: ]] XL-mania [[ cara mengurangi dan membagi keseluruhan cell

Biarkan macro menjadi palu-nya,, :)

Function Aritmatika(x As Range, Optional y As String = "") As Variant
'Anton Suryadi 30/Agt/2010
Dim a As Range, b As String
For Each a In x
    b = b & a.Text & y
Next
b = Left(b, Len(b) - 1)
Aritmatika = Evaluate(b)
End Function


File terlampir


>semoga  bermanfaat



From: Ega <gobang_cool@yahoo.co.id>
To: XL-mania@yahoogroups.com
Sent: Mon, August 30, 2010 6:28:39 AM
Subject: ]] XL-mania [[ cara mengurangi dan membagi keseluruhan cell

 gimana sih formula untuk mengurangi dan membagi secara keseluruhan. seperti formula sum. cuma tinggal ketik =sum(range) selanjutnya datanya langsung keluar. kalo dikurangi dan pembagian bisa ga ya? jadi formulanya bukan =(a1-b1-c1) atau =(a1/b1/c1)
 
 

__._,_.___

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 [[ Menjumlah transaksi dengan tanggal dan tempat yg berbeda-beda

kata mbak siti... walaupun tanggal berada di beberapa KOLOM
tapi masih ada keteraturan yaitu KOLOM di belakang Kolom Tanggal
selalu berisi Data Numbers yg mau dijumlah.

Jadi "Ceritaknya":
Jika data tanggal memenuhi syarat tertentu ( yaitu bulannya sama
dengan bulan kriteria) maka kolom di belakangnya dijumlah
atau dalam bahasa Array-Formula excel

=SUM(IF(MONTH(A16)=MONTH($D$8:$K$11),$C$8:$J$11))

dua buah array yg dilibatkan D8:K11 vs C8:J11

array kedua berkedudukan DIBELAKANG array pertama

A6 adalah cell berisi Tanggal dengan BULAN tertentu tetapi sebaiknya
diformat tampil "MMM" atau "MMMM" saja
(A6 aslinya hanya berisi TEXT "Mei" diubah menjadi data dat1 #1 May 2010#)

2010/8/28 Agusti Dartius <adartius@yahoo.com>
>
> Dear pakar XL semua,
> Aq ada mau memohon bantuan para pakar semua.
> Aku ada listing data pembayaran hutang, dalam kolom pembayaran itu terdiri dari
> pembayaran 1 sampai ke sekian.
> di dalam setiap pembayaran ada tanggal pembayaran dan jumlah pembayaran,
> dimana tanggal tersebut letaknya tidak beraturan.
>
> untuk lebih jelasnya, aku lampirkan contoh soalnya, mohon di cek ke TKP
>
> Thx
> adartius@yahoo.com

__._,_.___

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 [[ cara mengurangi dan membagi keseluruhan cell

Dear Ega,

Monday, August 30, 2010, 6:28:39 AM, you wrote:

E> gimana sih formula untuk mengurangi dan membagi secara
E> keseluruhan. seperti formula sum. cuma tinggal ketik =sum(range)
E> selanjutnya datanya langsung keluar. kalo dikurangi dan pembagian
E> bisa ga ya? jadi formulanya bukan =(a1-b1-c1) atau =(a1/b1/c1)

kalau dikurangi seperti contoh di atas: =A1-SUM(B1:C1)
kalau dibagi seperti contoh di atas: =A1/PRODUCT(B1:C1)

Moga membantu :D

--
Best regards,
Daniel

__._,_.___

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

Messages in this topic (2)

Recent Activity:

New Members 73

Visit Your Group

MARKETPLACE

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

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.

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

__,_._,___

terça-feira, 31 de agosto de 2010

segunda-feira, 30 de agosto de 2010

Arquivo do blog