word中，如何删除不包含多个指定字符的行？

直接用“查找”不行吗？
Ctrl+F——出现《查找和替换》对话框——查找内容：
([a-zA-Z0-9]@)\@hotmail.com^13
勾选“突出显示所有在该范围查找到的项目”
点“高级”——搜索选项：使用通配符（勾选）——查找全部——关闭
Ctrl+X——新Word文档：Ctrl+V
（这就把所有带“@hotmail.com”后缀的Email地址剪切出来了）
其他如“@pinnaclemagazine.com”、“@sulanet.com”分次查找后剪切出来了，原文档就删除掉吧。

补充回答了：
http://zhidao.baidu.com/question/391769748.html
文档收到，真乱！关键词没有任何规律，有的在@前，有的在@后，有的紧挨@，有的不挨着@
另！建议用Excel操作，2003版本的65536行、2007版本的100000行，60多万行就分10次左右而已：
1、复制-粘贴的Excel（就在A列）
B1输入
=IF(COUNT(FIND({"casting","fitting","valve","forging","stainless"},A2)),"是","")
回车后，双击B1填充柄一次到底
3、最上面插入一行
4、菜单栏——数据——筛选——自动筛选——下拉选“是”
5、复制显示行到Word——删除B列
（有多少关键词一次搞定）

运行宏：
If InStr(a, "@") Then a.Range.Delete
首先，你必须保证原来的语句能正确运行，
即能删除包含“@”的行。

那么，
If Not InStr(a, "@") Then a.Range.Delete
应该能删除不包含“@”的行。

另外，可以试试：
If InStr(a, "@")=0 Then a.Range.Delete