xlAbort
适用于:Excel 2013 | Office 2013 | Visual Studio
将处理器生成到系统中的其他任务,并检查用户是否按 ESC 取消宏。 如果用户在工作簿重新计算期间按了 ESC ,也可以通过调用此函数从工作表函数内检测到它。
Excel12(xlAbort, LPXLOPER12 pxRes, 1, LPXLOPER12 pxRetain);
参数
pxRetain (xltypeBool)
(可选) 。 如果 为 FALSE,则此函数检查中断条件并清除任何挂起的中断。 这使用户能够在中断条件的情况下继续操作。 如果省略此参数或为 TRUE,则函数会检查用户是否中止而不清除它。
属性值/返回值
如果用户按下 ESC,则返回 true (xltypeBool) 。
可能需要频繁调用
可能需要很长时间的函数和命令应经常调用此函数,以便将处理器生成给系统中的其他任务。
避免敏感语言
避免在用户界面中使用术语“中止”。 请考虑改用“取消”、“停止”、“中断”或“停止”。
示例
以下代码重复移动工作表上的活动单元格,直到经过一分钟或用户按 ESC。 它偶尔调用函数 xlAbort 。 这会生成处理器,从而简化协作多任务处理。
\SAMPLES\GENERIC\GENERIC.C
int WINAPI fDance(void)
{
DWORD dtickStart;
XLOPER12 xAbort, xConfirm;
int boolSheet;
int col=0;
XCHAR rgch[32];
//
// Check what kind of sheet is active. If it is a worksheet or macro
// sheet, this function will move the selection in a loop to show
// activity. In any case, it will update the status bar with a countdown.
//
// Call xlSheetId; if that fails the current sheet is not a macro sheet or
// worksheet. Next, get the time at which to start. Then start a while
// loop that will run for one minute. During the while loop, check if the
// user has pressed ESC. If true, confirm the abort. If the abort is
// confirmed, clear the message bar and return; if the abort is not
// confirmed, clear the abort state and continue. After checking for an
// abort, move the active cell if on a worksheet or macro. Then
// update the status bar with the time remaining.
//
// This block uses TempActiveCell12(), which creates a temporary XLOPER12.
// The XLOPER12 contains a reference to a single cell on the active sheet.
// This function is part of the framework library.
//
boolSheet = (Excel12f(xlSheetId, 0, 0) == xlretSuccess);
dtickStart = GetTickCount();
while (GetTickCount() < dtickStart + 60000L)
{
Excel12f(xlAbort, &xAbort, 0);
if (xAbort.val.xbool)
{
Excel12f(xlcAlert, &xConfirm, 2,
TempStr12(L"Are you sure you want to cancel this operation?"),
TempNum12(1));
if (xConfirm.val.xbool)
{
Excel12f(xlcMessage, 0, 1, TempBool12(0));
return 1;
}
else
{
Excel12f(xlAbort, 0, 1, TempBool12(0));
}
}
if (boolSheet)
{
Excel12f(xlcSelect, 0, 1,
TempActiveCell12(0,(BYTE)col));
col = (col + 1) & 3;
}
wsprintfW(rgch,L"0:%lu",
(60000 + dtickStart - GetTickCount()) / 1000L);
Excel12f(xlcMessage, 0, 2, TempBool12(1), TempStr12(rgch));
}
Excel12f(xlcMessage, 0, 1, TempBool12(0));
return 1;
}