excel编程循环语句

A. Excel vba循环语句

既然两个FOR之间没有联系，为何不直接做两个循环呢
FOR X=1 TO 20
IF X>15 THEN EXIT FOR
NEXT
FOR Y=1 TO 20
IF Y>x THEN EXIT FOR
NEXT

B. excel循环语句

把一个范围中的数据一个个列到一起（中间用、隔开），忽略空单元格，两两相同的只取一个值。
不叫“忽略空单元格”，而是遇到 空单元格 就中止。

将代码改为：

Function MyMacro1(Mydate As Range) As String
Dim tt As String, isFirst As Boolean
isFirst = True
For Each m In Mydate
If isFirst Then
isFirst = False
tt = m.Value
MyMacro1 = tt
Else
If m.Value = "" Then
Exit Function
ElseIf m.Value <> tt Then
MyMacro1 = MyMacro1 & "、" & m.Value
End If
tt = m.Value
End If
Next m
End Function

只需要在一个单元格中输入：
=MyMacro1(B2:B11)
或 =MyMacro1(B:B)

GoodLuck!

C. Excel vba中怎样实现类似continue，break等跳出循环的语句

Sub 提前退出循环()
Dim i As Integer
Dim sum As Integer
For i = 1 To 10
sum = sum + i
If sum > 20 Then
Exit For '满足条件提前结束for循环
End If
Next i
MsgBox "i=" & i & " sum= " & sum
End Sub

Sub 提前进行下一次循环()
Dim i As Integer
Dim arr
Dim str As String
arr = Array("我", "爱", "你", "中", "国")
For i = 0 To 4
If i = 2 Then
GoTo 忽略后面语句提前下一个 '提前进行后面的循环
End If
str = str & arr(i)
sum = sum + i

忽略后面语句提前下一个: Next i
MsgBox str '“我爱你中国”变成了“我爱中国”
End Sub

D. 如何运用excel公式循环

1.在使用Excel过程中，可能会出现一种情况，就是单元格有时会对本身进行引用，即形如在B2单元格中输入“=B2+1”之类的公式即为一种循环引用自身的行为。为了避免死循环的产生，就出现了迭代策略。

其实完成可以利用该迭代功能实现想要的效果。

例如想实现“1到10的和累加运算”。可通过以下方法实现。点击“Office按钮”->“Excel选项”按钮。