Can you help. Why data is not saving when you use PlayerRemoving?

When I'm using event PlayerRemoving Data is not saving.

local DataStore_Service = game:GetService("DataStoreService")
local DS = DataStore_Service:GetDataStore("Hidden")

game.Players.PlayerAdded:Connect(function(Player)
    local newFolder = Instance.new("Folder",game.ServerStorage)
    newFolder.Name = Player.Name
    local Money = Instance.new("IntValue",newFolder)
    Money.Name = "Money"
    Money.Value = DS:GetAsync("Key_"..Player.UserId)
    print("Data Loaded")
end)

game.Players.PlayerRemoving:Connect(function(Player)
    local getFolder = game.ServerStorage:FindFirstChild(Player.Name)
        DS:SetAsync("Key_"..Player.UserId,getFolder.Money.Value)
    print("Data Saved")
end)