VBA拆分前与逗号后

我有生产场地为市，州...的报告，即美国马里兰州巴尔的摩VBA拆分前与逗号后

我目前使用下面拉满弦的位置在：

n = ActiveWorkbook.Sheets.Count 
For i = 2 To n 
Z = Sheets(i).Range("C6").Value 
Cells(39, i) = Z 
Next i

我知道我可以写一个字段的公式来完成这项工作，但是VBA代码会更快。

Excel公式为前逗号将是： = LEFT（B39，FIND（ “”，B39）-1）

为逗号（它是一个状态缩写）后： = RIGHT（B39 2）

这不起作用：

n = ActiveWorkbook.Sheets.Count 
For i = 2 To n 
Z = Sheets(i).Range(left(("C6"), find(",","C6"))-1).Value 
Cells(39, i) = Z 
Next i

关于如何将左侧功能到这个代码的任何建议？

来源

2017-05-31 AdMac

你是什么意思嘀“*这不起作用*”是什么呢？ – RBarryYoung

这工作完美......它在逗号前放弃了城市。我是否操纵最后一个整数来得到逗号后面的字符？ – AdMac

是的，是的，我愿意。谢谢！ – AdMac

采用分体式：

n = ActiveWorkbook.Sheets.Count 
For i = 2 To n 
    Z = Split(Sheets(i).Range("C6").Value,",")(0) '(0) returns the first and (1) the second. 
    Cells(39, i) = Z 
Next i

来源

2017-05-31 20:33:38

VBA拆分前与逗号后

回答

相关问题