打印最左边的字符

时间:2018-09-10 16:15:31

标签: excel vba excel-vba

我在下面有此代码,但是我不想打印A1的内容(即CELL(“” contents“”,A1)),而是想要A1的最左边字符在第一个空格之前。请告知。

With Workbooks("Book1").Worksheets("Sheet2").Range("C1:C" & i)
.Formula = "=IF((IF((CONCATENATE(IF(LEFT(TRIM(A1),1)=""R"",""TRUE"",""FALSE""), ISNUMBER(VALUE(MID(A1,2,1)))))=""TRUETRUE"",1,2))=1,**CELL(""contents"", A1)**,CELL(""contents"", B1))"
.Value = .Value
End With

0 个答案:

没有答案