Я хочу создать код, который будет активироваться при нажатии пользователем Ctrl + S на VBA. Я создал книгу, в которой используются макросы, поэтому мне нужно перезаписать функцию Ctrl + S, чтобы, когда пользователь сохраняет файл, он не перезаписывал предыдущую книгу, поскольку данные в ней будут потеряны.
поэтому далеко у меня есть:
Sub Save()
dim path as string
dim time as string
dim fname as string
time = format(Now(), "yyyymmdd\_hhmm")
path = application.thisworkbook.path
fname = path & "\Title" & time
thisworkbook.saveas filename:= fname, _
fileformat:=xlopenxmlworkbookmacroenabled
end sub
Как мне сделать так, чтобы этот код заменял Ctrl + S, чтобы люди случайно не запускали макросы, а затем сохраняли и перезаписывали потенциально важные данные? Возможно ли, чтобы этот Ctrl + S применялся только к книге, в которой написан код?
Приношу извинения, если это уже было задано.