Cara export data menggunakan excel macro - Export data merupakan proses pemindahan data dari workbook aktif ke workbook baru proses selanjutnya workbook baru ini akan disimpan di dalam drive sesuai keinginan pengguna. Cara kerjanya kebalikan dari proses import yang telah admin terangkan pada artikel sebelumnya

Baca : Cara input data kedlam excel menggunakan macro

Baa : Cara import data menggunakan excel macro

Cara export data menggunakan excel macro

Istilah lain dari export adalah dalam bahasa pemrograman adalah backup, jad tujuanya tidak lain adalah membuat data cadangan yang bertujuan untuk berjaga jaga apabila terjadi kerusakan data pada database utama atau terjadi kerusakan yang tdak diinginkan sehingga data pada database utama hilang, langkah langkah Cara export data menggunakan excel macro sebagai berikut ini

Buka aplikasi excel anda, buatlah tombol dengan command button lalu masukan kode macro dibawah ini kedalam kode area tombol command button

Private Sub Ekspor_Click()
Dim direktori As String, inputnamafile As String, namafile As String, wsSheet As Worksheet, wrkBaru As Object
direktori = ActiveWorkbook.Path
If Right(direktori, 1) <> "\" Then
direktori = direktori & "\"
End If
inputnamafile = Application.Sheets("Sheet1").Range("B1").Value
namafile = direktori & inputnamafile & ".xls"

If inputnamafile <> "" Then
'Menyalin Data
Sheets("Sheet1").Range("A3", Baris_dan_Kolom_Akhir(Sheets("Sheet1"))).Copy
Set wrkBaru = CreateObject("Excel.Application")
wrkBaru.Visible = True
wrkBaru.Workbooks.Add
wrkBaru.ActiveSheet.Paste
Application.CutCopyMode = False
wrkBaru.ActiveWorkbook.SaveAs Filename:=namafile, FileFormat:=xlExcel8, CreateBackup:=False
wrkBaru.ActiveWorkbook.Save
wrkBaru.ActiveWorkbook.Close
MsgBox "Data disimpan di " & vbCrLf & vbCrLf & namafile & vbCrLf & vbCrLf & "Sefolder dengan aplikasi ini", vbInformation, "Excel asis10.com tempat belajar rumus exel dan macro..."
Else
MsgBox "Nama file harus diisi", vbInformation, "Excel asis10.com tempat belajar rumus exel dan macro..."
End If
End Sub

Hasil file export akan disimpan satu drive dengan aplikasi aktif, jika aplikasi aktif disimpan pada drive D, maka hasil expot juga akan ditempatkan dalam drvie D

Silahkan dikembangkan dan dipelajari sendiri , demikianlah Cara export data menggunakan excel macro, semoga bermnafaat
No comments