Tag: string

Excel VBA – string填充不起作用: 我有一个VBA函数，它返回有关它正在运行的计算机的大量信息。我想整齐地格式化输出，标题左alignment，结果全部标签在右边。以下是我认为可以工作的内容，这是我咨询过的许多网站上的解决scheme： AllInfo = _ "Date/Time Opened:" & Space(33 – Len("Date/Time Opened:")) & Now() & vbCrLf & _ "Filename:" & Space(33 – Len("Filename:")) & Application.ActiveWorkbook.Name & vbCrLf & _ "Name in Cell B2:" & Space(33 – Len("Name in Cell B2:")) & Cells(2, 2).Value & vbCrLf & _ 但是，在消息框和电子邮件正文中的输出都是锯齿状的。当然，这些标题都排在了左边，但结果并不是很好。任何人都可以看到我做错了什么？

删除单元格中的string，保持该单元格中的数字: 所以我有一个从单词导入的报告，保持单位的数字。我可以使用查找/replace，但我需要经常导入类似的报告，并希望删除所有单位的实例，同时保持在单元格中的数字。 import的单位是200平方呎。和100英寸。数字每次都改变，但单位之间的单位是相同的。 Sub DeleteChar() Dim lastrow as integer Dim myCell as Range lastrow = Cells(Rows.Count, 2).End(xlUp).Row For y= 3 to 10 For x = lastrow to 2 step -10 If Right(Len(myCell.Value),7) = " sq.ft." then myCell.Value = Left(myCell.Value, len(myCell.Value-7)) end if Next x Next y End Sub 需要工作。试图设置它find右边前7个字符的实例是“sq.ft.” 然后用相同的值replace该单元格 – 最后7个字符。

Excel比较两个string列表来返回匹配: 我已经通过谷歌，发现了许多类似的问题，但没有build议的公式真的为我工作。我试图做一些非常简单的事情：我基本上比较了两个列表（列表A和列表B）的string（即基因）和第三个列表（列表C），从列表A返回匹配列表B.事实上很多都不是，所以我需要列表C来返回具有从列表A到列表B的部分或完全匹配的string（例如列表A的“EGF”与列表B的“EGFR”匹配），并返回列表C中的“EGF”）。请帮忙，我试过了：if（iserror（search（列表A的第一个string，整个列表b），列出a的第一个string，“”）但是不起作用请指教，谢谢!!!!!!!!! ！例： List A = HDGF PKNOX1 AGO1 ZFP64 WRNIP1 ARID4B SIN3A FEZF1 SIX2 List B = WNT5A RGS4 TUBA1A CLDN11 HDGFRP3 MSRB3 AKT3 SIX2 我想比较名单A的“HDGF”每个string，即“WNT5A”，“RGS4”…等逐一find一个匹配（比赛不一定是确切的）所以“HDGF”将会与“HGDFRP3”匹配，因为它是它的一个子string，所以List C将返回匹配 List C = HDGF SIX2 希望这可以帮助！

在Excel VBA中从string中删除HTML标记: 我想从Excel VBA中的string中删除所有HTML标记。例如： before_text = "text1 <br> text2 <a href = 'www.data.com' id = 'data'>text3</a> text4" after_text = RemoveTags(before_text) 结果： after_text = "text1 text2 text3 text4"

剪切并粘贴stringVBA的最后8个字符: 您好我想能够使用VBA采取string的最后8个字符，并将其剪切并粘贴到另一张表中的表中，然后返回到string并采取下一个8个字符，并将其剪切并粘贴到另一列在我的表中等等，直到string中没有任何内容，因为它是一个非常长的电子表格，所以我希望能够遍历每一行。任何想法如何？

在字符长度大于256的多个标准上进行Excel匹配: 我试图build立这个答案，并将其纳入多个比赛。我有一个这样的公式： =MATCH(TRUE,INDEX(G:G=A2&E:E=B2,0),0) =MATCH(TRUE,AND(INDEX(G:G=A2,0),INDEX(E:E=B2,0)),0) 但它不工作。我如何扩展这个来包含两个或更多的匹配标准，这些标准将会捕捉到我有> 256个字符的值。

Excel VBA从文件名提取date: 我正在使用以下，获取文件名。 Dim wbName As String wbName = Left(ActiveWorkbook.Name, (InStrRev(ActiveWorkbook.Name, ".", -1, vbTextCompare) – 1)) 一些文件名可能如下所示： “CM CC跟踪日志FY 17-18-08.07.17” “跟踪日志10-23-17” “跟踪日志17-18美国汽车俱乐部 – 8-7-17” 我想弄清楚如何提取datestring，模式匹配使用正则expression式。 17年7月8日 17年10月23日 17年8月7日

如何在Excel中只复制特定颜色的文本？: 我有一个包含大量文本的大量单元格的工作表。在任何特定的单元格中，可能会有一些文字显示为红色。我想删除该文本并将其复制到不同的列。我有一个VBA函数，通过逐个字符地检查单元格内容来完成这个工作，但是电子表格是相当大的，这个过程变慢了。有没有更有效的方法来做到这一点？

如何在Excel中做一个子stringselect和连接？: 我有一个excel文件与field1和field2 我想把field1中的第一个字母连接到field2，并把结果放在field3中例如：Field1 =“John” Field2 =“Doe” 我想通过一些等式来设置字段3 Field3 =“JDoe”