关闭时阻止保存更改对话框

时间:2015-08-10 09:11:04

标签: excel excel-vba vba

我的电子表格在打开时使用了事件,因此每当我尝试关闭文件时,都会出现保存更改对话框。

有没有办法阻止这种情况?

3 个答案:

答案 0 :(得分:1)

此处documentation用于删除工作表。

所以,你需要使用如下:

'Stopping Application Alerts
Application.DisplayAlerts=FALSE

'~~~~~~deleting sheet~~~~~

'Enabling Application alerts once we are done with our task
Application.DisplayAlerts=TRUE

答案 1 :(得分:1)

您可以在VBA中向ThisWorkbook添加一个功能,让Excel认为该文件已保存。这将阻止任何保存提示。

如果您不想保存工作簿:

[self compareStringWithRegex:@"Gmail" withRegexPattern:@".*g"];

-(BOOL) compareStringWithRegex:(NSString *) string withRegexPattern:(NSString *)expression
{
    NSError *error = NULL;
    NSRegularExpression *regex = [NSRegularExpression regularExpressionWithPattern:expression options:NSRegularExpressionCaseInsensitive error:&error];



 NSTextCheckingResult *match = [regex firstMatchInString:string options:0 range:NSMakeRange(0, [string length])];

    if (match){
        return YES;
    }else{
        return NO;
    }
}

如果要保存工作簿:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    Me.Saved = True

End Sub

答案 2 :(得分:0)

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 ThisWorkbook.Close SaveChanges:=False
End Sub