在VB.net中从字符串中删除字符时遇到问题
在VB.net中从字符串中删除字符时遇到问题
提问于 2019-04-25 01:56:25
我在VB.net中使用Excel Interop。我的问题是使用string.Remove。我正在尝试从始终包含11个字符的字符串的单元格中删除最后3个字符。
我已经编写了一些代码来更改区域中单元格的值。
Dim lastrow5 As Integer
lastrow5 = xlWsheet2.UsedRange.Rows.Count
Dim myRange5, z As Excel.Range
myRange5 = xlWsheet2.Range("E1:E" & lastrow5)
For Each z In myRange5
z.Value = z.Value.remove(8, 3)
Next但是当我尝试使用Remove时，我得到了错误：Object Reference not set to an instance of an Object。
有没有人能把我引向正确的方向？
回答 1
Stack Overflow用户
发布于 2019-04-25 02:14:21
我认为"the_lotus“是正确的。这样做可以修复错误吗？
Dim lastrow5 As Integer
lastrow5 = xlWsheet2.UsedRange.Rows.Count
Dim myRange5, z As Excel.Range
myRange5 = xlWsheet2.Range("E1:E" & lastrow5)
For Each z In myRange5
If cell.Value Is Not Nothing Then z.Value = z.Value.remove(8, 3)
Next编辑:Ed的解决方案(带格式)是：
Dim lastrow5 As Integer lastrow5 = xlWsheet2.UsedRange.Rows.Count
Dim myRange5, z As Excel.Range myRange5 = xlWsheet2.Range("E1:E" & lastrow5)
For Each z In myRange5
If (z.Value Is Nothing) Then
ElseIf z.Value.ToString = "null" Then
Else z.Value = z.Value.ToString.Remove(8, 3)
End If
Next页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/55835950
复制相关文章
相似问题