这是第一次使用Excel与VBA一起工作。我正在练习使用公式并使用Excel单元格和MsgBoxes显示值。使用Excel的每行的MsgBox循环Visual Basic
我目前的问题很可能是一个简单的修复,但还没有弄清楚。
我要让我MSGBOX显示每行被填充后如下:
味精弹出
Socks Gross Sale is 56.37
味精弹出
Lotion Gross Sale is 59.12
..etc
然而,当我第一次尝试运行我注释掉的代码行MsgBox Range("A14:A21").Value & " Gross Sale is " & Range("F14:F21").Value
它给出了一个错误Run-time error '13': Type mismatch
,所以它不起作用。
因此,到目前为止,我正在使用我的代码行MsgBox Range("A14:A21").Value & " Gross Sale is " & Range("F14:F21").Value
,它只通过循环连续填充Sock行。有什么建议么 ?
For Each Cell In Worksheets("Sheet1").Range("B14:E21").Cells
Range("F14:F21").Formula = "=SUM((B14*D14)-((B14*D14)*E14))"
'MsgBox Range("A14:A21").Value & " Gross Sale is " & Range("F14:F21").Value
'Gives me first line only and makes pop up show twice as many times as (all)total rows
MsgBox Range("A14").Value & " Gross Sale is " & Range("F14").Value
Next
这真的很接近我希望如何做到这一点(简而言之)这个工作顺利!对此,我真的非常感激。我想一个单独的循环是最好的方法。 – narue1992
是的,这是基础知识,显然是硬编码的“14”和“21”,如果你想要/需要一个更动态的范围,你将必须使用;) – Ditto
没错。慢慢地,但我确定我希望得到这种新的编码语言。刚刚昨天才知道Excel使用了VBA O.o。再次感谢!我必须继续练习 – narue1992