excel 中VB关于if的用法 excel中用if语句的话如何实现，用vb的话又如何编程，要...
excel vb \u5173\u4e8eIF \u548c msgbox \u7ed3\u5408\u7684\u7528\u6cd5if not worksheets("sheet2").range("g:g").find("\u5230\u671f\u9879") is nothing then
msgbox "\u6709\u5230\u671f", vbokonly, "\u63d0\u793a"
end if
\u770b\u89c1\u4f60\u7684\u95ee\u9898\u81f3\u4eca\u65e0\u4eba\u89e3\u7b54\uff0c\u4eca\u7279\u6765\u4e00\u8bd5\u3002\u4ee5Office2007\u4e3a\u4f8b\uff0c\u6253\u5f00Excel\u7a0b\u5e8f\uff0c\u70b9\u51fb\u201c\u5f00\u53d1\u5de5\u5177\u201d--\u201c\u5f55\u5236\u5b8f\u201d\uff0c\u51fa\u73b0\u4e00\u4e2a\u65b0\u7684\u7a97\u4f53\uff0c\u70b9\u51fb\u201c\u786e\u5b9a\u201d\u540e\u7a97\u4f53\u4e0d\u89c1\u4e86\u3002\u4f60\u5728\u8868\u683c\u91cc\u80e1\u4e71\u6dfb\u4e0a\u4e00\u4e2a\u5b57\u6bcd\u6216\u8005\u6570\u5b57\u540e\uff0c\u70b9\u51fb\u83dc\u5355\u4e2d\u7684\u201c\u505c\u6b62\u5f55\u5236\u201d\uff0c\u518d\u70b9\u51fb\u201c\u5b8f\u201d\uff0c\u91cd\u53c8\u51fa\u73b0\u4e00\u4e2a\u7a97\u4f53\uff0c\u70b9\u51fb\u65b0\u7a97\u4f53\u4e2d\u7684\u201c\u7f16\u8f91\u201d\u6309\u94ae\uff0c\u51fa\u73b0\u4e86\u4e00\u4e2a\u548cVB\u5e73\u53f0\u5b8c\u5168\u4e00\u6837\u7684\u4ee3\u7801\u7a97\u4f53\uff0c\u91cc\u9762\u7684\u4ee3\u7801\u4f60\u5e94\u8be5\u8ba4\u8bc6\u7684\uff0c\u8fd9\u4e9b\u4ee3\u7801\u8bb0\u5f55\u4e86\u4f60\u521a\u624d\u7684\u52a8\u4f5c\u3002\u8bb0\u4f4f\u4e86\u8fd9\u4e2a\u65b9\u6cd5\uff0c\u4f60\u53ef\u4ee5\u628a\u52a8\u4f5c\u505a\u5f97\u66f4\u52a0\u590d\u6742\u4e00\u4e9b\uff0c\u518d\u53bb\u89c2\u5bdf\u4ee3\u7801\uff0c\u8bd5\u7740\u53bb\u7f16\u5199\u3001\u66f4\u6539\u4ee3\u7801\u3002\u4e45\u800c\u4e45\u4e4b\u4f60\u4f1a\u6210\u4e3a\u201c\u5b8f\u201d\u9ad8\u624b\u7684\u3002
\u53e6\u5916\u8bf4\u4e00\u4e2a\u89c1\u89e3\uff0c\u4e0d\u4e00\u5b9a\u5b8c\u5168\u6b63\u786e\uff0c\u4ec5\u4f9b\u4f60\u53c2\u8003\u3002\u4ece\u4f60\u5199\u7684\u4ee3\u7801\u4e2d\u770b\u51fa\u559c\u6b22\u7528\u201c$\u3001%\u201d\u7b49\u7b26\u53f7\u6765\u58f0\u660e\u53d8\u91cf\u3002\u8fd9\u79cd\u65b9\u6cd5\u5f0a\u75c5\u591a\uff01\u5bf9\u4e8e\u6bcf\u4e00\u4e2a\u76f8\u540c\u7684\u53d8\u91cf\u6bcf\u6b21\u4f7f\u7528\u7684\u65f6\u5019\u90fd\u8981\u5e26\u4e0a\u81ea\u5df1\u7684\u7b26\u53f7\uff0c\u592a\u9ebb\u70e6\u4e86\u3002\u7528\u8fd9\u79cd\u65b9\u6cd5\u5931\u53bb\u4e86VB\u7279\u6709\u7684\u4e00\u4e2a\u529f\u80fd\u3002\u7528Dim\u6765\u5b9a\u4e49\uff0c\u53ca\u53d8\u91cf\u540d\u4e2d\u67d0\u4e2a\u5927\u5199\u7684\u5b57\u6bcd\u58f0\u660e\u7684\u53d8\u91cf\uff0c\u5728\u6bcf\u6b21\u4f7f\u7528\u4e66\u5199\u65f6\uff0c\u5199\u6b63\u786e\u4e86\uff0c\u53d8\u91cf\u540d\u4e2d\u5bf9\u5e94\u7684\u5c0f\u5199\u5b57\u6bcd\u81ea\u52a8\u53d8\u6210\u5927\u5199\uff1b\u5199\u9519\u4e86\u5219\u4e0d\u53d8\u3002\u987a\u4fbf\u68c0\u9a8c\u4e86\u4f60\u4e66\u5199\u7684\u53d8\u91cf\u540d\u662f\u5426\u6b63\u786e\u3002\u52aa\u529b\u5427\uff01
excel 中VB关于if的用法如下：
if语句的含义
if语句字面意思就是如果的意思，如果条件为真，那么就执行if语句里面的程序，这个程序，一般指then后面的，一个if语句可以没有end if ，但绝对不能没有then，这一点是要注意的，
if……then……结构
该结构一般用于比较简单的判断语句执行，下面以一段实例程序来讲解
实例：如果第一个单元格不为空，那么就弹出一个提示框”单元格不为空“
程序：
Sub 判断语句()
If Cells(1, 1) <> "" Then MsgBox "单元格不为空"
End Sub
if……then……end if结构
该结构用于单选择判断语句执行，具体用法看下面实例
实例：对于第一列的第一行到第十行单元格，作如下判断，如果单元格为空值了那么在相应的第二列单元格输出”VBA教研室“
程序：
Sub 判断语句()
Dim i As Integer
For i = 1 To 100
If Cells(i, 1) = "" Then
Cells(i, 2) = "VBA教研室"
Exit For
End If
Next
End Sub
if ……then……else……end if结构
该结构用于事件只有两个可能的情况先选择的判断语句，具体见下面实例分析
实例：对于第一列的第1,2行两个单元格做判断，如果单元格值为空，则在相应的第二列单元格输出false，否则输出Ture
程序：
Sub 判断语句()
Dim i As Integer
For i = 1 To 2
If Cells(i, 1) = "" Then
Cells(i, 2) = "false"
Else
Cells(i, 2) = "True"
End If
Next
End Sub
=if(c1="cd","光盘",if(c1="mp3","数码",if(c1=12,"one","")))
ksks呵呵，看错了，不过删不了就留着吧，教育下一位。
打开EXCEL表
按ALT+F11
从左边栏双击你要操作的表比如SHEET
复制以下代码
Sub yx()
For i = 1 To 100
If Cells(i, 3) = "mp3" Then Cells(i, 4) = "数码"
If Cells(i, 3) = "cd" Then Cells(i, 4) = "光盘"
If Cells(i, 3) = "12" Then Cells(i, 4) = "one"
Next
End Sub
运行就是。工具栏有个倒三角，点一下就行了
在D1输入：
=IF(C1="","",IF(C1="cd","光盘",IF(C1="mp3","数码",IF(C1="12","one",""))))
向下拖到D100
Sub aa()
For i = 1 To 100
If Cells(i, 4) = "cd" Then Cells(i, 5) = "光盘"
If Cells(i, 4) = "mp3" Then Cells(i, 5) = "数码"
If Cells(i, 4) = "12" Then Cells(i, 5) = "one"
Next
End Sub
扩展阅读：excle vlookup用法 ... excel vba编程教程完整版 ... vlookup怎么嵌入if函数 ... vlookup if多条件查询 ... if+vlookup跨表提取数据 ... excel中如何打开vba编辑器 ... excel if和and一起用 ... vb中if的三种写法 ... excel怎么进入vba编辑模式 ...
