Selasa, 29 Oktober 2019

Mempercepat Aplikasi VBA Excel


Dengan senangnya ketika aplikasi vba ini selesai dikerjakan. Itulah seninya berkarya tetapi sering kali kendala terjadi aplikasi yang kita buat itu terlihat lebih lambat dalam beroperasi dan menjalankan prosesnya. Terutama saat menjalankan module reporting yang memerlukan Looping Rekursif karena data memang dijalankan secara looping one by one dan itu normal secara logika.


Keterlambatan ini bisa jadi karena pengaruh refresh display yang terjadi realtime yang tidak terlihat oleh kasat mata ditambah memang data sangatlah banyak, 

Pekerjaan yang seharusnya dapat diselesaikan dengan cepat namun selesai diluar jadwal seharusnya lebih cepat dan tentunya Setiap pengguna aplikasi sangat menginginkan aplikasi yang dipakainya merupakan aplikasi yang bekerja secara cepat.

Ini disebabkan oleh berapa filtur yang bekerja otomatis saat Excel membuat perlambatan kinerja.

Cara Mencari Nilai di Cell Menggunakan VBA fungsi Find


Kali ini Jasa Pembuatan Aplikasi VBA Macro akan menjelaskan bagaimana cara pencarian data di kolom dengan menggunakan fungsi Find, yang berada dikolom B.
Script Kodenya sebagai berikut :

Dim Cell As Range
Columns("B:B").Select
Set cell = Selection.Find(What:="123", _After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False)

If cell Is Nothing Then
    'jika tidak ketemu lakukan sesuatu disini

Else
    'jika ketemu lakukan sesuatu disini
End If
Mudah mudahan bermanfaat, jika ada pertanyaan silahkan tanyakan di kolom komentar.

Social