excel vba 编程方面的问题，变量赋值的问题

显示全部楼层 · 2012-7-17 14:58:31

邮件地址最后都是以逗号分开的是吧？如果是这样的话。这样写代码dim add as stringdim c as rangefor eachc in sheets("sheet1").range(“C2:C21”)
add=add & “," & c.valuenext...

千问 · 2012-7-17 14:58:31

dim add as stringdim c as rangefor eachc in sheets("sheet1").range(“C2:C21”)
add=add & “;" & c.value
Range("C"&c).Select
Selection.Hyperlinks(1).Follow NewW...

千问 · 2012-7-17 14:58:31

sheets("sheet1").selectadd= ""for i=2 to 21
add= add & cells(i,3) & ";"
'用分号隔离一下next i cells(22,3)=add
'存到C22单元格...

千问 · 2012-7-17 14:58:31

add= ""for i=1 to 21
add= add & cells(i,3) next i...