Когда я открываю Excel, он запускает макрос и меняет дату сохранения - PullRequest
Новая
       39

Когда я открываю Excel, он запускает макрос и меняет дату сохранения

0 голосов
/ 28 мая 2019

Я делаю макрос в флажке (Контроль формы), основная идея заключается в том, что, когда я отмечаю флажок в следующей ячейке, он сохраняет дату дня, когда я пометил флажок. Но вместо этого, если я сохраню флажок с отметкой, он будет обновляться при открытии документа, стирая сохраненную дату и обновляя сегодняшнюю дату.

Я пробовал 2 ifs и Errors GoTo Err и не работает

это код, который у меня есть: 

If ActiveSheet.Shapes("Check Box 2").ControlFormat.Value = 1 Then

cells(6, 5).Value = Date

Else

 Range("E6").ClearContents

End If

Мне нужно поставить код, который останавливает актуализацию. Или он сообщает макросу, что когда флажок помечен, обновлять дату не нужно.

1 Ответ

0 голосов
/ 29 мая 2019

Если вы хотите сохранить дату последнего пометки флажком, вы можете просто сделать копию значения, очень простой пример: 

Sub CheckBox1_Click()

'cell A1 = linked cell to check box
'Cell A2 contains formula today()
'cell A3 target cell overwritten on marking check box

Select Case Sheets("Sheet1").Range("A1")

Case True

Sheets("Sheet1").Range("A2").Copy
Sheets("Sheet1").Range("A3").PasteSpecial Paste:=xlPasteValues

End Select

End Sub
...