如何用VBA写这个程序

如何用ExcelVBA写幸运7:找出100以内所有满足包含、整除7的数程序

保存在哪里呢?

Sub test()

Dim i As Integer

For i = 1 To 100
    If i Mod 7 = 0 Or Left(Str(i), 1) = "7" Or Right(Str(i), 1) = "7" Then
        MsgBox (i)
    End If
Next i

End Sub

img

用VBA for和dowhile循环语句写找出100以内所有满足包含、整除7的数程序

您好,我是有问必答小助手,您的问题已经有小伙伴帮您解答,感谢您对有问必答的支持与关注!
PS:问答VIP年卡 【限时加赠:IT技术图书免费领】,了解详情>>> https://vip.csdn.net/askvip?utm_source=1146287632