scrip vb menyimpan

  1. 8 tahun lalu

    saya mempunyai data di sel A1 berisi dataku
    bagaimana srip vb nya jika saya ingin menyimpan dengan nama otomatis nama file nya pake data di sel A1
    minta tolong bantuannya
    trima kasih

  2. COBA INI MAS
    Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
    If Not Target.HasFormula Then
    If Not Target.Value = vbNullString Then
    On Error GoTo ErrHandler
    ActiveSheet.Name = Target.Value
    End If
    End If
    End If
    Exit Sub

    ErrHandler:
    MsgBox "Error " & Err & ":" & Error(Err)
    On Error GoTo 0
    End Sub

  3. Book1.xlsx

 

atau Mendaftar untuk ikut berdiskusi!