Tecnologia, programação e muito Visual FoxPro.

terça-feira, 31 de maio de 2011

Re: ]] XL-mania [[ Cara lookup 1 kode semua itemlist terwakili

 

lha ini yang namanya Filter

( = sebuah list dipilah hanya data yg memenuhi kditeria tertentu )

memFilter list dapat dikerjaken dengan FilterBawaan Excel, dengan Makroh , 
dengan Formula, dengan Pivot Tabel, dan mungin masih ada cara lain lagi

coba deh baca-baca di milis ini juga ( HomePage di webnya / atau mungkin anda
menyimpan semua posting di inbox pada Gmail anda) : cari lampiran file fle 
Filtering dengan formla (banyak sekaleee, karena memang sudah sering
ditanyakan dan dijawab di mils ini)

sayang sekali contoh data yg anda ajukan dibuat terlalu sederhana dengan 
kesan tergesa gesa, sehingga tidak cukup menarik (tidak ada seru-seru-nya)
untuk dibuatkan formula / makro filteringnya.



2011/5/30 jimmy sihombing <jhe.jimmy@gmail.com>

Dear All Master xlmania,

Biasanya dalam rumus excel, V atau H LOOKUP dipakai dalam menarik data yang hanya terwakili oleh satu baris kode saja (syarat: 1 kode 1 baris keterangan). Bagaimana jika saya hendak menarik semua baris item list, namun hanya diwakili oleh 1 baris kode saja (file terlampir). Yakni, hanya dengan memasukkan 1 kode saja, maka secara otomatis kita dapat me lookup semua item list masing-masing seluruh baris tsb.

Trims,
JHE

__._,_.___
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| maaf baru moderate sekarang... momods kurang tidur berhari-hari   |
| jadi budak kantoooOOooorrr...                                     |
| 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.


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

.

__,_._,___

Re: ]] XL-mania [[ print sekaligus

 

mkro untuk tombol yg sudah disiapkan

tombol di klik-kanan > Assign Macro > New >  tulis coding sbb

Sub Button3_Click()
   ' membuat variable
   Dim PrintKe As Integer

   ' membuat perulangan (Loop)
   ' perulangan di cacah (dengan PrintKe) dari 
   ' bilangan ke AX1 ke BA1
   For PrintKe = Range("AX1") To Range("BA1")
      ' di tiap langkah perulangan
      ' nilai cell A1 diisi dengan nilai PrintKe
      Range("A1") = PrintKe
      ' sambil mengcetak area (yg sudah anda set) ke printer
      ActiveWindow.SelectedSheets.PrintOut
   Next
End Sub


2011/5/30 Septi Yunita <septi.yunita@smoe.com>

 

Dear XL mania, mohon bantuannya untuk membuat rumus/ coding agar dapat ngeprint sekaligus

Contoh file terlampir

Trims sebelumnya

 

SY

__._,_.___
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| maaf baru moderate sekarang... momods kurang tidur berhari-hari   |
| jadi budak kantoooOOooorrr...                                     |
| 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              |
+-------------------------------------------------------------------+
.

__,_._,___

Re: ]] XL-mania [[ goto ke cell tertentu

 

(1)
MAKRO UNTUK MENUJU CELL DI KOLOM A DI BARIS KE SEKIAN
DIMANA SEKIAN ITU TERTULIS DI CELL A12

CARA MENJALANKAN MAKRO
Berhubung tidak anda rincikan, maka penanggap tentukan sendiri semauk-mauknya 
(mumpung diberi kebebasan) yaitu dengan menDouble Click Cell A12

Private Sub Worksheet_BeforeDoubleClick( _
   ByVal Target As Range, Cancel As Boolean)
   Application.EnableEvents = False
   If Target.Count = 1 Then
      If Target.Address = "$A$12" Then
         If Target.Value > 0 Then
            Cells(Target.Value, 1).Activate
         End If
      End If
   End If
   Application.EnableEvents = True
End Sub


(2)
MAKRO KEMBALI KE CELL A12

Sebenarnya untuk keperluan seperti ini Excel sudah menyediakan tombol F5 , 
anda tinggal ketik A12 dan OK
Tetapi bila ingin menulis sendiri makronya, mungkin hanya seperti ini

Sub KembaliKeCellA12()
'  Keyboard Shortcut: Ctrl+k
'----------------------------
   Application.Goto Reference:="R12C1"
End Sub

atau inti makro-nya dapat diganti dengan
   Range("A12").Activate

di workboook terlampir makro kedua tsb telah di set short cut nyA = Ctrl + k



2011/5/30 warujuanda <warujuanda@yahoo.com.sg>
tuk excelmania salam kenal dan Mohon bantuannya.. saya mempunyai masalah seperti ini:

di cell A12 tertulis angka 5 saja terus kursor saya arahkan ke cell A12 terus saya run macronya yg nantinya kursor akan lari ke cell A5... setelah input macem2 saya lgsg pingin kembali lagi ke cell A12, dmn kembalinya kursor ngeklik macro jg....

dmn di cell A12 tidak selalu tertulis angka 5 ... bisa 345, 32, 1234 dst
dan tidak selalu di cell A12, bisa.. A123, A546 dll

jadi yg perlu dibuat macro ke1 untuk menuju cell tertentu, macro ke2 kembali lagi ke cell data sebelumnya dlm hal ini cell A12

terima kasih atas bantuannya

Haryanto

__._,_.___
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| maaf baru moderate sekarang... momods kurang tidur berhari-hari   |
| jadi budak kantoooOOooorrr...                                     |
| 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.


Find useful articles and helpful tips on living with Fibromyalgia. Visit the Fibromyalgia Zone today!

.

__,_._,___

Arquivo do blog