Jak automaticky uložit soubor Excel po zadání dat?

Někdy bude sešit aplikace Excel po aktualizaci nebo zadání více dat omylem havarován a nově zadaná data budou ztracena. To nás může udělat bláznivými, takže zde budu hovořit o automatickém ukládání souboru aplikace Excel po zadání dat, aby se zabránilo této nehodě.

Po uložení dat pomocí kódu VBA automaticky uložte soubor aplikace Excel

Po uložení dat pomocí kódu VBA automaticky uložte soubor aplikace Excel

Následující kód VBA vám pomůže automaticky uložit soubor aplikace Excel po zadání nebo aktualizaci dat v listu, postupujte takto:

1. Po zadání nových dat klikněte pravým tlačítkem na kartu listu, který chcete sešit automaticky uložit, a poté vyberte Zobrazit kód z kontextového menu v otevřeném Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte následující kód do prázdného modulu:

Kód VBA: Autosave soubor Excel po zadání dat:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("A1:AA1000")) Is Nothing Then
        ThisWorkbook.Save
    End If
End Sub

Pozor: Ve výše uvedeném kódu, A1: AA1000 je rozsah buněk, na který chcete použít tento kód.

2. A poté uložte a zavřete toto okno s kódem, nyní, když aktualizujete nebo zadáváte nová data do konkrétních buněk listu, bude sešit automaticky uložen bez kliknutí na tlačítko Uložit.