Tag: 文本

WORKDAY公式在Excel中显示正确的值，但在XML中不显示

我将公式=TEXT(WORKDAY(TODAY(),1),"YYYYMMDD")从Excel传递到使用此最终date（下一工作日）创build贸易的XML。 如果周末之间没有周末，这可以正常工作; 但如果明天是星期六/周末 – 那么在Excel上显示正确的值（星期一），但是XML显示最终值为“Today-3”，由于反向date导致交易失败。 有人可以build议如何解决这个问题？

如何parsing包含xxx的单元格的一部分，并将数据复制到另一个单元格？

我有一个Excel文件，我想parsingD列中的每个单元格的开始，并复制和粘贴在单元格（相同的行，列B）的数字我如何parsing数字0到9和“。 并将该值xxxx复制到列B？ D列的单元格起始处没有多less个数字和句点的标准格式，可以是1.3.4或1.3.4。 或1.3 ect … ===================================================================== 'DIMENSIONING VARS AND PATHS Dim Level As Range Dim i, j, q(1 To 50) As Long Dim numofchar As Long Dim filepath As String Dim filename As String Dim PN As String Dim HEADERrowcallout As Long Dim LASTREQrowcallout As Long Dim REQTEXTcolumncallout As String Dim x As Long […]

如何构build一个IF语句来仅匹配特定的文本

我想弄清楚如何创build一个IF语句只返回一个单元格包含特定的子string。 例如，假设我正在search子stringHVS0544-1两个单元格。 第一个电池包含： WBS HVS0544-1 第二个单元格包含： HVS0544-154 我想为第一个单元格返回yes，但是对于第二个单元格不返回，因为它与子stringHVS0544-1不完全匹配。 我试着用这个公式=ISNUMBER(SEARCH(M91964,N1365)) 。 但是，当子串HVS0544-1存在时，它总是返回yes。 所以它被类似的值HVS0544-154欺骗。 任何提示如何我可以提高我的公式？

如何selectTextBox或ListBox中的数据，然后通过基于该数据的Outlook发送电子邮件

我有一个简单的VBA表单和一个Excel工作表。 我希望能够select列表框或文本框中的数据，然后select一个条目后，然后单击命令button，将允许我打开Outlook并发送电子邮件给我从ListBox或TextBox中select的人。 任何帮助将非常感激。 这里有一个截图： 截图 码 'Dim mySheet As Worksheet 'Dim myUser As Range Private Sub cmbRestDay_Change() 'Set mySheet = Sheets("Dashboard") 'Set myUser = mySheet.Range("D:D").Find(cmbRestDay.Value, , , xlWhole) ' 'If Not myUser Is Nothing Then ' 'ListBox1.Value = myUser.Offset(0, -3) 'Else 'ListBox1.Value = "No Match" ' 'End If Dim mySheet As Worksheet 'declaring mySheet as […]

Excel和VBA在macros观中间崩溃

我是VBA新手，希望能帮助实现一个用户定义的函数。 我真的很感激任何帮助！ 上下文 ：我试图将一批固定宽度的文本文件导入到单独的Excel工作簿中。 文本文件都具有相同的字段和格式。 我知道每个领域的长度。 目前，我正试图让我的VBA代码工作的单个文本文件。 问题 ：由于我是VBA新手，我查找了现有的代码。 我发现Chip Pearson的ImportFixedWidth函数 ， 编辑了另一个StackOverflow用户发现的一个错误 ，并一直试图实现我的TestImport函数（见下文）。 （*请注意，这只是为了简洁 – 实际上并未包含在代码中。） Sub TestImport() Dim L As Long L = ImportFixedWidth("/Users/gitanjali/Desktop/CAC06075test.txt", _ Range("A1"), _ False, _ vbNullString, _ "1,5|2,45|3,3|4,45|5,45|6,45|7,60|8,15|9,11|10,60| _ 11,60|12,10|13,5|14,5|15,3|16,3|17,3|18,3|19,11|20,10| …190,250|191,250") End Sub 请参阅本帖末尾的ImportFixedWidth函数。 然后我试图在工作簿中运行macros，但每次都会使VBA和Excel崩溃。 第一个字段是导入（不是另一个190）到打开的工作簿，但程序停止响应，必须退出。 debugging ：代码编译。 当我通过TestImport或ImportFixedWidth代码时，我没有得到任何错误。 我已经尝试在Mac和Windows PC上运行macros（它们都崩溃了）。 在程序崩溃之前，第一个字段是正确导入的，所以我不确定问题是什么。 问题 ：我在debugging方面的后续步骤中处于亏损状态。 在我的实现中是否有任何明显的错误？ 我的下一个逻辑debugging步骤是什么？ Function ImportFixedWidth(FileName As […]

VBA文本以圆括号作为分隔符

这可能有点基本，但我基本上想分割我的数据从一个文本string到单独的单元格。 下面是我正在寻找拆分的string。 input：1）VITOL-GUNVORSA，$ 286.5 / mt，2kt，FOB Rdam，FE输出： 所以从D列开始的第一行是我想要的 这是我现在的代码，它允许我分开一切，但从名字，即Vitol 。 现在我的问题是，如何可以添加另一个OtherChar所以我也可以拆分) ？ 谢谢。 Private Sub CommandButton1_Click() Dim myRng As Range Dim LastRow As Long LastRow = Sheets("Sheet1").UsedRange.Rows.Count With Sheets("Sheet1") Set myRng = Sheets("Sheet1").Range("A2:A" & LastRow) End With myRng.TextToColumns _ Destination:=Range("D2:E2:F2:G2:H2"), _ DataType:=xlDelimited, _ Tab:=False, _ Semicolon:=False, _ Comma:=False, _ Space:=True, _ Other:=True, _ OtherChar:="-" End […]

VBA excel粘贴为文本

我需要粘贴数字作为文本。 这是有问题的，因为前面有很多零（但是我需要它们）。 第一个片段，不起作用（我在互联网上find它）。 Worksheets("B").Range("k7:k7").PasteSpecial Format:=”Text”, Link:=False, DisplayAsIcon:=False 另一个我logging，但它并不总是工作。 PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone, SkipBlanks:=False, Transpose:=False 有人可以build议我一个更好的解决scheme吗？

Pythonpandasdf.Unique显示/打印内容

我是非常新的python，并遇到一个问题，当我试图显示我的excel列中的唯一值的数据框。 所以发生了什么是我试图写“aa”我得到 [u'a' u'b' u'c' u'd' u'e' u'f'] 当我想要的是 a, b, c, d, e, f 甚至 [a,b,c,d,e,f] 以较直接的为准。 我的想法是，因为我正在使用str()它正在采取数据框架，但是，如果我没有包括str()时，我写 ∞* p!`!@‹!@˛ 作为输出… 这是我的代码： df = pd.read_excel(open('/Users/keatonmaclean/Desktop/abcc.xlsx','rb'), sheetname='Sheet1') # Set ipython's max row display pd.set_option('display.max_row', 1000) # Set iPython's max column width to 50 pd.set_option('display.max_columns', 50) df.columns = df.iloc[0] df = df[1:] aa = str(df.loc[:,"Supplier"].unique()) #bb […]

修复来自PDF信用额度的粘贴文本

我有从信用卡帐单复制的这个文本文件 示例行1： August 18 August 18 Balance Conversion :02/06 4,671.30 采样线2： August 1 August 2 *Php-Anytiefit-Ezypay Kuala Lumpur 2,300.00 我从PDF文件复制到MS Excel文件。 我会得到下面的文字双空格，每行只是粘贴到一个像下面的单元格。 我尝试使用文本函数=RIGHT(B73,LEN(B73)-E73+2)和array =MIN(SEARCH({0,1,2,3,4,5,6,7,8,9},B73&"0123456789"))等等。我从研究中得到的数组，但我仍然会调整公式，因为月份字符数字每个月都在变化，而单一或两位数的日子。 数量是固定的两位小数，使用逗号和点分隔符。 除非有一个分期付款额度，例如01/24，那么这个“二十四”中的一个就会比0 1 / 2 4 2 , 9 1 6 . 2 5 2，9 0 1 / 2 4 2 , 9 1 6 . 2 5更早出现在2,916.25之前0 1 / 2 […]

强制特定的文本vba

有什么办法强制用户只使用单元格中的特定文本？ 例如，我想用户只能使用以下单词或符号在单元格A1中写入文本：“价格”，“因子”，“加法器”，“主要”，“+”，“ – ”，“ （“，”）“，以便用户可以写下如下内容：（（Main-Price）+ Adder），但不包含任何与上述字母，单词或符号不同的文字