Tag: 拆分

excel vba拆分文本

请注意,我正在使用一系列〜1000行的医疗信息数据库。 由于数据库的大小,手动操作数据太耗时。 因此,我曾试图学习VBA并使用VBA编写Excel 2010macros,以帮助我完成分析某些数据的工作。 所需的输出是从数据库的每一行提供的string中拆分某些字符,如下所示: 99204 – 办公室/门诊访问,新的 将需要分成 Active Row Active Column = 99204 ActiveRow Active Column + 3 = OFFICE / OUTPATIENT VISIT,NEW 我已经使用Walkenbach的“Excel 2013:使用VBA进行电源编程”和相当数量的networking资源(包括这个很棒的站点)研究了这个主题,但是一直没能在Excel中使用VBA开发一个完全可行的解决scheme。 我当前macros的代码是: Sub EasySplit() Dim text As String Dim a As Integer Dim name As Variant text = ActiveCell.Value name = Split(text, "-", 2) For a = 0 To […]

如何返回数组中的array()函数在单元格中使用数组公式(matricial公式):用于在多单元格中分割texte

我正在写一个函数在VBA中在Excel公式中使用,没关系,如果我的函数返回一个单一的值: =MYVALUE(A1) 现在我写了另一个函数返回一个数组(1,2,3,4,…),我用数组公式replace我的Excel公式: {=MYARRAY(A1)} 但是当我拉伸公式时,所有的单元格显示我的数组的第一个值 。 为什么? 这是我的VBA源代码(complement.xlam): Function MYVALUE(x as integer) MYVALUE = 123 End Eunction Function MYARRAY(x as integer) MYARRAY = Array(10,20,30) End Eunction

如何在Excel中分隔/parsing第一个数字的string

我在A列中有一个字母和数字混合的string。 在第一个数字出现之前,我想将string分成两半,使得“abc123”在列B中变为“abc”,在列C中变为“123”。

VBA按空格拆分string

我想要一个可以调用并传入单元格的excel函数。 input: Firstname Lastname email@mail.com Firstname midname Lastname email@mail.com 中间的空格是随机的。 输出应该只是一个数组。 数组可以有任何长度,因为我不知道string是什么样的。 输出应该是: Firstname, Lastname, email@mail.com Firstname, midname, Lastname, email@mail.com 我将从一个单元格中调用该函数,如=MySplitFunction(A1) ,并且应该将A1中的Firstname,B1中的Firstname和C1中的email@mail.com。 我创build了一个新模块并尝试了下面的代码: Function MySplitFunction(s As String) As String() MySplitFunction = Split(s, " ") End Function 这给了我输出 Firstname 我如何得到它返回整个数组? 甚至有可能在一个单元格中写入一个函数,这个函数会把东西放在靠近它的单元格中? 编辑:

在VBA中的子string

我有不同的单元格中的多个string CO20: 20 YR CONVENTIONAL FH30: 30 YR FHLMC FHA31 我需要从1的子string到':'的索引,或者如果这是不可用的,直到结束(string3的情况下)。 我需要帮助写在VBA中。