Soft
клуб заведен 12-08-2007
постоянные читатели [13]
AleXX, Anthrax, d-r Hogart, Ethereal, kolobo4ek, K_Altos, Martin Riggs, MMM, Paint It Black, Samum, x, Анна Болейн, Мирный герцог
хранители [1]
Martin Riggs
участники [8]
Anthrax, Artt, d-r Hogart, Ethereal, Zabriskie Rider, Мирный герцог, РЖУНИМАГУ, Хакер
закладки:
цитатник:
клуб:
06-12-2007 01:32 Martin Riggs
Веду в одном экселевском файле историю ежедневных расходов. Информация, то есть, на весь доллара. Сегодня этот файл хз как глюкнул, и изменения за два дня потерялись. Взбеленился бы, но это не поможет.

Есть ли у кого на примете виндовый тул, который бэкапит файл после каждого изменения?

В крайнем случае, какой SVN можно рассмотреть (чтобы попроще, совместная работа с файлами не предусматривается ни в коем случае) и где его найти? Одно время у меня была Tortoise SVN, но я посчитал, что никогда в жизни мне это не потребуется, и снёс
Комментарии:
06-12-2007 10:54
Камрад
а почему бы не вести учет в соответствующей программе типа "личные финансы" там и бэкапы предусмотрены
06-12-2007 11:00
Камрад
WinBlack
«Cash — Личные финансы»
«ДомФин — бухгалтерия для дома»
«Мои деньги»
Family 2006
«Учет личных финансов»
«Домашние финансы»
X-Cash
«Жадюга»
CashFly
ReadyCash
«Гобсек»
Home Budget
Home Station
06-12-2007 23:05
Потому, что
  1. перенести базу из одного приложения в другое иногда невозможно.

  2. работая с программой, сперва следует познать логику ее автора, а не просто взять и использовать.

  3. в случае, если что-то идет "не так", у меня нет возможности взять да и поправить. Тем более - мигрировать.

  4. у каждой программы свои особенности, даже если принципы ведения бухгалтерии одни для всех.

  5. я в Excel, по сути, написал собственную программу, которая полностью отвечает моим потребностям и выполняет нужные мне задачи.

  6. то, что я сделал, я могу контролировать и перекраивать по своим потребностям.

  7. я могу легко проверить правильность всех операций и вычислений (дебаггинг сумашедшей эффективности).

  8. мне не нужна огромная детализация истории расходов, которая нужна опытным бухгалтерам.
В общем, если не обращать внимания на финансовый аспект моего файла, вопрос остается открытым - мне нужна автоматизация бэкапа при каждом изменении рабочего файла.

Martin Riggs.
Incomprehensible damnit!
Решение проблемы: статья Создание резервных копий ценных файлов.

Этот макрос сохраняет текущую книгу в папку C:\TEMP, добавляя к имени книги текущее время и дату.

Sub Backup_Active_Workbook()
    Dim x As String
    strPath = "c:\TEMP"
    On Error Resume Next
    x = GetAttr(strPath) And 0
    If Err = 0 Then ' если путь существует - сохраняем копию книги
        strDate = Format(Now, "dd/mm/yy hh-mm")
        FileNameXls = strPath & "\" & Left(ActiveWorkbook.Name,  _
             Len(ActiveWorkbook.Name) - 4) & " " & strDate & ".xls"
        ActiveWorkbook.SaveCopyAs Filename:=FileNameXls
    Else 'если путь не существует - выводим сообщение
        MsgBox "Папка " & strPath & " недоступна или не существует!", vbCritical
    End If
End Sub


При желании можно заменить первую строку на:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

и поместить этот макрос не в Module1 как обычно, а в модуль ЭтаКнига (ThisWorkbook) - тогда автоматическое сохранение резервной копии будет происходить каждый раз перед закрытием файла.

Ваш комментарий:
Камрад:
Гость []
Комментарий:
[смайлики сайта]
Дополнительно:
Автоматическое распознавание URL
Не преобразовывать смайлики
Cкрыть комментарий (виден автору записи)
Закрыть