从单元格中删除.pdf

时间:2018-05-15 01:29:09

标签: excel vba excel-vba

这是问题所在,我已经完成了代码,但它似乎没有工作..试过这两种方法也不可能$('.entry-content').find(p > br).hide()

任何人都可以帮忙吗?在此先感谢=)

str = Replace(str, ".pdf", Left(str, Len(str) - 4))
 str = Replace(str, ".pdf", Left(str, Len(str) - 4))

1 个答案:

答案 0 :(得分:0)

@PatricK已经告诉你Replace()功能使用

出了什么问题

但您也缺少明确引用范围对象中的Sheet1工作表,然后默认为当前活动工作表(可能不是您需要的工作表)

最后你可以避免循环并调用Replace()对象的Range方法一次性完成:

With Sheet1 ' reference your sheet
    .Range("A1", .Cells(.Rows.Count, 1).End(xlUp)).Replace what:=".pdf", replacement:="", lookat:=xlPart ' call 'Replace()' method on referenced sheet column A cells from row 1 down to last not empty one
End With