Tag: 分隔
Excel-VBA – 将列中的数据格式化为分隔符
需要帮助将Col D“Delimited”从单元格D2转换为Col D中最后一个非空格的单元格。 我用loggingmacros试图窃取代码，但似乎并没有工作。 任何人都可以解释如何编辑这个代码，以便它可以工作或提供一个新的代码，做我所问。 Sub Delimit () Selection.TextToColumns Destination:=Columns("D"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _ :=Array(1, 1), TrailingMinusNumbers:=True End Sub
Excel VBA保存为不带分隔符的文本文件
我想使用macros将输出表格从excel转换为文本文件，但有可能转换文件没有分隔符？ 我现有的代码只能保存为制表符分隔，但我上传文本文件的系统检测到标签空间为多余的字符。 这里是我现有的VBA代码： Sub SaveAsTXT() Dim parts As Variant parts = Split(ActiveWorkbook.Name, ".") parts(UBound(parts)) = ".txt" ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" & _ Join(parts, "."), FileFormat:=xlTextWindows, CreateBackup:=False End Sub
如何根据两列逗号分隔值插入多个logging
我试图创build基于逗号分隔值的多个单元格的logging。 拿着它： Handle | Title | Color | Size | Price | | | | (0-04/06-08) ————————————————————————— Jovani-JVN86957 | Jovani | Black, | 0, 02, | $199 (if size > 06 then +15) JVN86957 | Red, White | 04, 06, 08 | 我想要做的是颜色和大小列生成新的logging，同时包括处理和价格（也可能，但不是必须有价格变化的基础上，尺寸值，即：大小0-4 = $ 199和大小6-8 = $ 219） 转到这个： Handle Title Color Size Price(0 […]
将逗号分隔到列中
Soo发现了很多类似的问题，但没有什么真正适合我想要做的事情，而且有点卡住了。 基本上我想要做的是有一个单元格（在这种情况下，A1），有多个值用逗号分隔（总是4个值），然后把它拆分成沿着列的单独的行。 例 A1[10,9,8,6] 需要成为 a10[10], b10[9], c10[8], d10[6] 我正在使用的当前代码是： Dim X As Variant X = Split(Range("A1").Value, ",") Range("a10").Resize(UBound(X) – LBound(X) + 1).Value = Application.Transpose(X) 这将输出垂直向下的数据列，当我需要它输出，如上所示
用逗号将文本文件导入到Excel中
我有大量需要导入到Excel中的文件。 我发现，并部分修改了这个代码（我不记得在哪里，所以我不能信用），这工作90＆％+的时间。 Sub Extractions() Application.ScreenUpdating = False Application.DisplayAlerts = False Application.DisplayStatusBar = False Dim FilesToOpen Dim x As Integer On Error GoTo ErrHandler FilesToOpen = Application.GetOpenFilename _ (fileFilter:="Microsoft Excel Files (*.*?), *.*?", MultiSelect:=True, Title:="Files to Import") If TypeName(FilesToOpen) = "Boolean" Then MsgBox "No Files were selected" GoTo ExitHandler End If x = 1 While x […]
Excel 2010 VBA – 按逗号分割string，跳过空白结果
我正在使用下面的代码砍掉一列逗号分隔的列表，并返回一个新行中的每个条目： Sub SliceNDice() ' ' Splits the locations cells according to commas and pushes to new rows ' Code courtesy of brettdj (http://stackoverflow.com/questions/8560718/split-comma-separated-entries-to-new-rows) ' Dim objRegex As Object Dim x Dim Y Dim lngRow As Long Dim lngCnt As Long Dim tempArr() As String Dim strArr Set objRegex = CreateObject("vbscript.regexp") objRegex.Pattern = "^\s+(.+?)$" 'Define the […]
如何在Microsoft Excel中打开空格分隔的文件？
当我尝试在Excel中打开空格分隔的文件时，整个内容打开在一个列中。 有没有办法在Excel中打开空格分隔的文件，以便分隔的内容正确格式化到不同的列？ 我的情况是，我有一个文件，需要分隔符是一些东西像'“'（反转的命令后面跟一个空格），因为我的文件格式是这样的： "First Name" "Gender" "Phone" "Tom Jones" "M" "123-123-1234"
