如何在有符号的Excel 2007 VBA中修剪单元格中的数据

Question

我想整理单元格中的数据，以便在连字符之前进行整理

例如，如果一个单元格包含：

'Net Operating Loss - All Pre-1990 Carryforwards'

我想以一种只有我的方式修剪它：

'Net Operating Loss'

有关如何执行此操作的任何建议

Answer 1

像这样？

Option Explicit

Sub Sample()
    Dim strSample As String

    strSample = "Net Operating Loss - All Pre-1990 Carryforwards"

    Debug.Print Split(strSample, "-")(0)
End Sub

顺便说一句，您是否需要在VBA中执行此操作。 以上也可以使用Excel公式来实现。

假设您在单元格A1中有“ 净运营亏损-所有1990年以前的结转额 ”，然后将其放入单元格B1中

2003年度

=IF(ISERROR(MID(A1,1,FIND("-",A1,1)-1)),"",MID(A1,1,FIND("-",A1,1)-1))

EXCEL 2007起

=IFERROR(MID(A1,1,FIND("-",A1,1)-1),"")

Answer 2

HY，

您可以使用InStr搜索连字符，并将结果位置用作Right Command的长度。

dim p as integer
p = InStr(YourStr, '-');
Trim(Right(YourStr, p - 1))

这里有一些参考资料http://www.techonthenet.com/access/functions/index.php