RUMUS VBA UNTUK MENYISIPKAN GAMBAR SECARA OTOMATIS DI EXCEL
Buka file yang akan di edit klik developer, insert image (active X control) klik properties, di kolom picture ganti dengan bitmap, close klik view code Rumus VBA yang berlaku : Option Explicit Private Sub Image1_BeforeDragOver(ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As MSForms.fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer) End Sub Private Sub Worksheet_Change(ByVal Target As Range) Dim sFile As String, sPath As String If Target.Count = 1 Then If InStr(Target.Address & "|", "$L$5|") <> 0 Then ActiveSheet.Calculate 'ganti rujukan path seperti contoh 'drive:\folder\subfolder\ 'contoh : E:\myData\mySubData\ ...