Tag: string

Excel VBAstring操作

我需要做一些string操作，它有点击败我真正的好。 我需要从string中提取一些子string。 这是string： "Modified by: Coanda Oana Amalia coanoa1 (coanoa1) on Mon Oct 14 08:53:11 EEST 2013 Modified Fields: Actual target date: 17.10.2013 GMT+02:00 Effects of change: ——————————— [ErrH] Regenerate error configuration. Effort: 2h Design: 1h ——————————— [Ist] Rename error. Effort: 1h Design: 1h ——————————— [RTE] Rename the runnable according to the change. Check internal […]

从单元格中提取文本将其移入另一个工作表上的单元格中

你好，StackOver Flow的人， 我对VBA语言和工作stream程相当陌生，但我有一些编码经验。 我的题目并没有真正帮助解释的问题是： 我每天都会收到包含需要从中提取出来并移入相应单元格的信息的电子邮件。 电子邮件的例子如下，我已经从Outlook中复制到我已命名为“RawData”的Excel工作表中。 我将标签列为A） **A)** Send Date 01/01/2014 Timestamp **B)** Subject ([Type]) word IndetifierOne IndetifierTwo word 100001 **C)** Body Item HYPERLINK (www.thistheexample.com/100001) Subitem Name HYPERLINK (www.thistheexample.com/name/99321)keyword **All this Information is irrelevant** Item Names HYPERLINK (www.thistheexample.com/name/99321)keyword HYPERLINK (www.thistheexample.com/name/99321)keyword HYPERLINK (www.thistheexample.com/name/99321)keyword 什么需要提取和放置在列中的顺序是 **A)** Date **B)** Identifier Two **C)** This has other information input into […]

在string文件中search'str'types的数组

我在non_int_ram_var中searchnon_int_ram_var中的trial.txt 。 non_int_ram_var从基本上unicode的excel表中获取数据。 因此，我将其types转换为str ，以使trial.txttypes与non_int_ram_var匹配。 但是，控制是不是进入if var in line: 。 我已经交叉validationvar是否出现在文本文件的一行中。 我可能会犯一些错误。 任何人都可以给我一个build议吗？ from xlrd import open_workbook import unicodedata work_book= open_workbook("C:\\Users\\E542639\\Desktop\\non_sram_mem\\SEU_MBU_FINAL_VARIABLE_LIST.xls"); # reading xls file for non_int sram………….. non_int_ram_var = [] * 376 row=1 for sheet in work_book.sheets(): if "Data" == sheet.name : print sheet.nrows, sheet.ncols while row < sheet.nrows: if "int_sram" != sheet.cell(row,5).value: if […]

当颜色取决于单词时，改变部分function答案的颜色

颜色取决于单词的颜色取决于单词，例如：今天你赢了100 $，所以“赢得100 $”（或赢得58 $ – 取决于计算）的部分必须是绿色的，如果string是：today you loosed 39 $“松动39 $”必须是红色我已经find了一个单一的颜色解决scheme ，但不回答我的问题，也许你们可以帮我吗？ 提前致谢

ArrayFormula超过255个字符。replace不工作

我有一大堆数组公式的大工作表。 我想用VBA来更新这些公式来包含一个if语句。 基本上我想要新的公式是如果（年> max_year，If_True_Formula，If_False_Formula）。 通过连接三个string并设置ActiveCell.ArrayFormula =三个string的结果，这是一个相当简单的任务。 但是，如果结果string超过了255个字符，情况开始变得复杂。 在一些情况下，我需要的公式超过了255个字符，所以我添加了If_True_Formula的占位符“X_X”和If_False_Formula的“Y_Y”，并使用这个方法创build了完整的公式： With ActiveCell .FormulaArray = If_Statement .Replace "X_X", If_True .Replace "Y_Y", If_False End With 这工作得很好，但是我的几个数组公式很长，If_True部分和If_False部分每个都超过了255个字符。 为了克服这个问题，我想我可以把每个string分成三部分（我不会超过750个字符的string），然后使用修改的方法在最后创build完整的string： True_1 = "" If len(If_True) > 255 Then True_1 = Left(If_True, len(If_True)/3) & "X2_X2" True_2 = Mid(If_True, len(If_True)/3, len(If_True)/3) & "X3_X3" True_3 = Mid(If_True, len(True_1) + len(True_2) – 10, len(If_True)) End If […]

如何检查FirstName是否为空，然后在Excel文件中填写全名？

我有一个excel文件，需要检查firstname是否为空或空白，然后从全名列中提取第一个名字，例如： 全名是：拉姆辛格然后我想拉姆在名字列。 我已经尝试了下面的公式，但它作为名字的值总是返回给我。 =IF(ISBLANK(F3), F3, C3) 名字是在F3和全名是C3。 第二件事我想同样的事情全名：如果全名是空的，那么它连接的名字和姓氏 请帮助我，我怎样才能实现我的目标。

将链接两个表单的文本string转换为工作公式

我试图将文本string转换为公式，但是我的文本string有点不寻常，因为它描述了两个工作表之间的链接。 这是起始公式： +TEXT("+'X:\Deals\ONE-PAGERS\_One-pagers (vM)\["&TRIM(LEFT(SUBSTITUTE($B9," ",REPT(" ",30)),64))&" vM.xlsx]Metrics'!$D$8",1) 我创build了这个公式，以避免手动链接大量的电子表格。 它捕获单元格的前两个单词，并将其放置到可build立链接的文本string中（如果是公式）。 这样，我可以简单地将公司名称input到单元格B9中，并且此公式将生成一个描述我想要的链接的文本string。 这里是公式输出： +'X:\Deals\ONE-PAGERS\_One-pagers (vM)\[xxx vM.xlsx]Metrics'!$D$8 正如你所看到的，如果这是一个公式，它会生成一个链接，它将返回xxx工作表的Cell D8中的值。 我已经尝试了评估解决方法（见下面）以及间接function，似乎都没有工作。 让我知道如果这没有任何意义，并提前感谢您的帮助！ Function EvalCell(RefCell As String) Application.Volatile EvalCell = Evaluate(RefCell) End Function

隐藏或掩码连接string

希望有人能帮忙。 我有一个连接到oracle数据库的excel文件，在连接string中显示用户名和密码。 有没有人知道这种方式不以任何方式显示或掩盖？ 我一直在点击excel，在过去的一个小时里查找方法，但是找不到任何可行的东西。

VBA中的string处理

我有单列需要拆分为多个，如在Excel中的文本到列。 但是有一个小小的挑战。 常规分隔符不起作用。 考虑下面的string Original: Domain\Domain Admins Domain2\User Group Domain3\Developers …..(And so on) Required: Domain\Domain Admins | Domain2\User Group | Domain3\Developers …..(And so on) 需要的string中的pipe道意味着它需要在这里拆分，并根据string的长度复制到下一列。 列A中有506行的列表。 我使用下面的公式来检查“\”我列B的发生，计数范围从0-66 =LEN(A2)-LEN(SUBSTITUTE(A2,"\","")) 我需要帮助来编写以下逻辑 在string中查找“\” 在“\”之前find空格并分割 我使用下面的代码，但它没有达到目的 Range("A1:A506").Select Selection.TextToColumns 请帮助保持点1和2的代码。

考虑空间字符作为数据透视表的空场

我正在使用VBAdynamic创build数据透视表。 我想从我的源数据中计算非零条目的数量，但不是空白单元格，我的源数据具有空格字符（“”）。 我认为会发生什么是数据透视表将这些空间识别为非空白单元格，将它们计为非零条目。 结果是计数返回了我的源数据中的条目总数。 有谁知道如何避免这种情况？ 我的解决scheme是创build一个虚拟列，其中1行对应于非零条目， 0行对应于具有空格字符的条目。 然后，我可以总结我的虚拟列来获得非零条目的计数。 问题是我的源数据集很大，所以计算时间太长。 我希望也许有办法告诉数据透视表将空间字符视为空白字段。 我希望我可以将空格更改为空string，但这需要花费很长时间才能完成，而我无法以另一种格式获取数据集（空格将始终存在，除非我费力地等待查找/replace全部replace）。 任何人都可以想出解决scheme吗？