Rabu, 12 September 2018

[belajar-excel] Digest Number 4594

5 Messages

Digest #4594

Messages

Wed Sep 12, 2018 11:50 am (PDT) . Posted by:

"Tio Adi Bayu Adjie"

Salam B-Exceller,
Mohon bimbingannya.
Ada file di server network yang kadang dibuka oleh seseorang. Saya ingin tahu pada hitungan 3 menit ke berapa file itu ditutup. Jadi ketika file itu sedang dibuka, tunggu sampai 3 detik. Kalau 3 detik pertama file masih terbuka, tunggu 3 detik ke dua, dst.

Ini code vba yang saya sudah tulis.

Sub Button3_Click()
Call cekfilenya
MsgBox "File ditutup"
End Sub

Sub cekfilenya()
Dim InUse
Dim CloudDbFile As String
Dim j As Byte

J=0
CloudDbFile = "Y:\1. Folder Dataku\CustData.xlsx"
InUse = IsWorkBookOpen(CloudDbFile)
Do Until InUse = False
Application.Wait (Now + TimeValue("0:00:03"))
MsgBox "Hitungan ke " & j
j = j + 1
Loop
If InUse = True Then
Exit Sub
End If
End Sub

Function IsWorkBookOpen(FileName As String)
Dim ff As Long, ErrNo As Long

On Error Resume Next
ff = FreeFile()
Open FileName For Input Lock Read As #ff
Close ff
ErrNo = Err
On Error GoTo 0

Select Case ErrNo
Case 0: IsWorkBookOpen = False
Case 70: IsWorkBookOpen = True
Case Else: Error ErrNo
End Select
End Function


Terima kasih atas bimbingannya.
Salam.


Wed Sep 12, 2018 5:16 pm (PDT) . Posted by:

"Tio Ali" tioali2011

Salam B-Exceller.Mohon bantuannya. Adakah link tulisan di blog Mr Kid tentang class module ?
Terima kasih....

Wed Sep 12, 2018 5:34 pm (PDT) . Posted by:

"Tio Ali" tioali2011

Salam B_-Exceller.Kalau pembuatan database dengan pakai macro (VBA) maka penggunaan memory dan ukuran file harus selalu diperhatikan..Pertanyaannya. Apakah kalau table dibuat dengan 'format as table" -yang ada warna warni selang-seling- itu membuat ukuran file besar atau memory jadi membengkak ?
Terima kasih bimbingannya.

Wed Sep 12, 2018 9:08 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Hai Tio,
Hasil percobaan saya, antara Range dgn Table ternyata lebih kecil tabel ukuran filenya, walaupun tampilan Table lebih menarik.File terlampir.
Salam,HK

Sent from Yahoo Mail on Android


On Thu, Sep 13, 2018 at 7:34, Tio Ali tioali2011@yahoo.co.id [belajar-excel]<belajar-excel@yahoogroups.com> wrote:  

Salam B_-Exceller.Kalau pembuatan database dengan pakai macro (VBA) maka penggunaan memory dan ukuran file harus selalu diperhatikan.Pertanyaannya. Apakah kalau table dibuat dengan 'format as table" -yang ada warna warni selang-seling- itu membuat ukuran file besar atau memory jadi membengkak ?
Terima kasih bimbingannya.

Wed Sep 12, 2018 10:05 pm (PDT) . Posted by:

"Tio Adi Bayu Adjie"

Maaf Pak Hendrik. Maksud saya dari sisi penampilan. Penampilan sebagai format as table , tampilannya bagus. Nah, apakah tampilan bagus seperti itu memperbesar memory atau file size jadi lebih besar ?
Kalau range tampilannya tidak bagus..

Thank you
Best Regards,
Tio

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 13 September 2018 11:07
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Format as table di file macro (VBA) [2 Attachments]


Hai Tio,

Hasil percobaan saya, antara Range dgn Table ternyata lebih kecil tabel ukuran filenya, walaupun tampilan Table lebih menarik.
File terlampir.

Salam,
HK
Sent from Yahoo Mail on Android<https://overview.mail.yahoo.com/mobile/?..src=Android>

On Thu, Sep 13, 2018 at 7:34, Tio Ali tioali2011@yahoo.co.id [belajar-excel]
<belajar-excel@yahoogroups.com> wrote:

Salam B_-Exceller.
Kalau pembuatan database dengan pakai macro (VBA) maka penggunaan memory dan ukuran file harus selalu diperhatikan.
Pertanyaannya. Apakah kalau table dibuat dengan 'format as table" -yang ada warna warni selang-seling- itu membuat ukuran file besar atau memory jadi membengkak ?

Terima kasih bimbingannya.

============================================================
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
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar