Api Whatsapp Terbaik untuk Mengotomatiskan Bisnismu

API Whatsapp Business memang menjadi salah satu hal yang sangat dibutuhkan di jaman sekarang. Hal tersebut disebabkan karena makin banyaknya orang yang mulai menjalankan bisnis secara online.

Dengan makin maraknya bisnis online, maka mau tidak mau pemilik bisnis dan juga konsumen harus mulai berkomunikasi secara online juga. Untuk berkomunikasi secara online, kebanyakan orang lebih memilih menggunakan aplikasi Whatsapp dibandingkan dengan aplikasi messenger lainnya.

On Error Resume Next
If Me.ListView1.SelectedItem = "" Then
	MsgBox "No select data", vbCritical, "Filebas.com"
Exit Sub
End If
Dim i As Integer
i = MsgBox("Hapus data no. " & Me.ListView1.SelectedItem & " ?", vbQuestion + vbYesNo, "filebas.com")
If i = vbYes Then
  Sheet1.Activate
  With ActiveSheet
    .AutoFilterMode = False
    .Range("A:H").AutoFilter
    .Range("A1").AutoFilter field:=1, Criteria1:=Me.ListView1.SelectedItem
    .Range("A1").CurrentRegion.Offset(1, 0).SpecialCells(xlCellTypeVisible).EntireRow.Delete
    .AutoFilterMode = False
    List.list1
  End With
Else
End If