根据 VBA 2010 中的字符断开字符串

2023-12-01

在 Excel 2010 中,使用 VBA,如何在找到某个字符时拆分字符串?

Let say A1 = "This is a | test of | the | emergency broadcast signal"我将其分配给一个变量,例如

strColumnA = Range("A" & CStr(currRow)).Value

现在我想在工作表 2 的末尾追加 4 个新行。所有 A 列,例如:

A1 = "This is a"
A2 = "test of"
A3 = "the"
A4 = "emergency broadcast signal"

有任何想法吗?


使用它是因为不需要循环,而且离开也很重要Application.Trim() in:

Sub test()

    Dim r As Variant, s As String
    s = [a1].Value
    r = Split(Application.Trim(s), "|")

    [b1].Resize(UBound(r, 1) + 1) = Application.Transpose(r)

End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

根据 VBA 2010 中的字符断开字符串 的相关文章

  • 在python中读取.xlsx格式

    我必须在 python 中每 10 分钟读取一次 xlsx 文件 做到这一点最有效的方法是什么 我尝试过使用 xlrd 但它不读取 xlsx 根据他的文档 但我不能这样做 获取Unsupported format or corrupt fi
  • 从 VS2015 打开 TFS 查询到 MS Excel 时出错(TF80068)

    当我们尝试使用 VS2015 中的 在 Microsoft Excel 中打开 功能在 Excel 中打开 TFS 查询结果时 我们收到错误 TF80068 Team Foundation 在与服务器通信时遇到错误 请检查您的连接并重试 E
  • 使用 C# 中的互操作将宏插入并运行到 Word 中

    如何使用 C 中的 Interop 将宏插入并运行到 Word 文档中 using System Runtime InteropServices using Microsoft Vbe Interop using Word Microsof
  • 在 ApachePOI 中使用什么来代替已弃用的 CellRangeAddress.valueOf

    我想在该区域添加条件格式 但我在教程中看到的一种方法已被弃用 用什么来代替它 样本 ConditionalFormattingRule rule2 sheetCF createConditionalFormattingRule Compar
  • 使用 UNION 进行分组

    我的代码未正确分组 它仍然没有将 Reden uitstroom2 和 Reden uitstroom3 与 Reden uitstroom1 分组 计数工作正常 但在 Reden Uitstroom1 中显示重复项 例如 雷登 伊斯特鲁姆
  • Excel VBA 自动生成电子表格

    我和我的朋友目前有一个主电子表格 我需要定期将其分解为较小的电子表格 这曾经是一个手动过程 但我想将其自动化 我在 VBA 中创建了一个三步解决方案 它将帮助我完成以下任务 将相关过滤器应用于电子表格 将过滤后当前可见的数据导出到新电子表格
  • 尝试在 R 中创建直方图时 x 必须是数字

    我是 R 新手 我需要生成一些图表 我导入了一个 Excel 文件 需要在一列上创建直方图 我的导入代码是 file read xlsx femalecommentcount xlsx 1 header FALSE col file 2 上
  • 如何将查询结果放入文本字​​段?

    我正在创建一个会计数据库 对于财务结果 我的表 单有一个文本字段 Previous Solde 其中显示了前几个月的销售情况 确切的金额是通过以下查询计算出来的 SELECT sq Argenta Prep Vorig Saldo Acco
  • 在网站上以多种形式输入密钥

    我有一个有两种表格的网站 一个用于搜索 另一个用于登录 当我使用回车键提交时 搜索总是被调用 因为它是页面上的第一个表单 我想要做的是对回车键进行编程 以在某个文本框获得焦点时单击某个按钮 我使用 asp textbox 和 asp but
  • 如何通过VBA获取当前Excel实例的进程ID,而不使用标题?

    如何获取运行 VBA 代码的当前 Excel 实例的进程 ID 我不想通过标题中的名称来请求它 当我有两个或多个具有相同标题的 Excel 实例时 这会导致问题 您可以使用此方法来获取当前进程ID Declare Function GetC
  • 根据单元格位置将选择性字段从 Excel 批量插入到 SQL

    我有一个 SSIS 包 我必须从 Excel 工作表中选择一些值并将它们插入到 SQL Server 数据库表中 我是通过执行 sql 任务来完成的 这些是步骤 从映射表中选择所有记录 单元格位置是动态的 因此将其保留在 SQL 表中 大约
  • 将多个 Excel 工作表范围转换为 PDF VBA

    下面的代码是获取 Col E 的状态 如果它是 Include 那么其相应的工作表范围将被转换为 PDF 我已经尝试过了 但它无法正常工作并收到错误invalid procedure call or argument在线上 rng Expo
  • 如何在不锁定 Excel 文件的情况下打开它?

    我有一个构建 Excel 报告 然后为用户打开它的流程 问题是 如果有人让文件保持打开状态 则该文件将保持锁定状态 并且在第一个人退出 Excel 文件之前 其他人都无法生成报告 有没有办法打开 Excel 文件而不锁定它 使用Proces
  • Excel 单元格到文本框的超链接

    我正在尝试手动将超链接放入单元格中 指向文本框 网上搜索无果 在 添加超链接 对话框窗口中 我尝试在 单元格引用类型 窗口中写入文本框的名称 TextBox1 但得到 引用无效 在同一窗口的 定义名称 下也没有 TextBox1 我的两个问
  • 当传递 VBA 类的实时实例时,C# ITypeInfo.GetContainingTypeLib 失败

    所以我尝试过打电话ITypeInfo在 VBA 类实例上 虽然它看起来很有希望 但我想看看是否可以获得对其包含项目 类似于类型库 的引用 我想ITypeInfo GetContainingTypeLib可能有用 但它会抛出一个异常 表明 V
  • Excel VBA 中的 TypeName 返回什么?

    我想检查一下数据类型 Cells 2 1 Value即 这里有什么 以下 我尝试了名称 整数 长整型等 但似乎不接受 If TypeName Cells r 1 Value WHAT GOES HERE Then MsgBox Yes El
  • 在openxml中向Excel添加样式

    我想在打开的 Excel 文档中设置文本的前景色以写入文本 为此我尝试过 var stylesheet1 spreadSheet WorkbookPart WorkbookStylesPart Stylesheet Fills fills1
  • 使用vba分割和重命名pdf文件

    我收到了一份包含多张工资单的合并文件 每张工资单上的特定位置都有一个特定的数字 我希望使用这个确切的数字作为每个文件名 例如37224 pdf 我尝试使用下面的 VBA 代码将工资单拆分并命名为单独的工资单 Option Explicit
  • 何时在 VBA 中使用 TextFrame 或 TextFrame2

    例如 在 Powerpoint 中 文本框对象 http msdn microsoft com en us library office bb265592 28v office 12 29 aspx 表示 Shape 对象中的文本框架 包含
  • Excel 中的单元格“数字存储为文本”

    我有一个 C 程序 它获取旧报告的文本文件并映射到 Excel 工作表 但对于交易单元格 它输出为 数字存储为文本 这不允许 任何格式 我们想要显示 1 000 00 但它仅显示为 1000 有什么办法可以得到这种格式吗 这些列是余额和金额

随机推荐

  • 简单的 Javascript for 循环在第一次迭代后停止

    我读过很多其他有类似问题的帖子 但仍然不明白为什么这个很奇怪 我尝试执行 try catch 并没有报告错误 数组实际上有 100 多个 但为了示例缩小了范围 它在搜索数组中的第一项时有效 但在一次迭代尝试后它会失败 我打印出数组长度 发现
  • 如何使用不同的参数重新运行黄瓜场景大纲?

    我有一个用于测试 Web 服务的 Cucumber 场景大纲 类似于 Scenario Outline Check the limit functionality When I GET api activity schedule items
  • Google 在 Xamarin.Forms 中放置自动完成功能

    有人使用 Xamarin Forms 集成了 Google Place Autocomplete 吗 我将在地图上使用它来获取位置建议 我只看到了 Xamarin Android 和 Xamarin iOS 的资源 但在实现 AutoCom
  • 如何使用 T-SQL 暂时禁用外键约束?

    SQL Server 是否支持禁用和启用外键约束 或者是我唯一的选择drop进而re create限制因素 如果您想禁用数据库中的所有约束 只需运行以下代码 disable all constraints EXEC sp MSforeach
  • 如何在 PHP 中包含外部文件?

    我需要包含另一个网址上的外部文件 例如 google com 我已经使用本地文件测试了包含 所以这很有效 但是如果我尝试使用 127 0 0 1 filetoinclude txt 什么也不会发生 我没有收到错误 我只是收到一个空白页 那么
  • 删除Notepad++中的空行

    如何替换 Notepad 中的空行 我尝试查找并替换查找中的空行 替换中没有任何内容 但它不起作用 它可能需要正则表达式 从版本 6 5 2 开始 现在有一种内置方法可以执行此操作 Edit gt Line Operations gt Re
  • 是否可以更改 RPi4 上的蓝牙配置文件?

    我有一个连接到 RPi4 的摄像头 我想通过蓝牙传输其信号 BLE 最大速度为 2 Mbps 有点太慢了 我想切换到经典蓝牙 以达到 24 Mbps 是否可以 有关如何在 BlueZ 中切换配置文件的示例代码 请访问 https git k
  • React:如何执行handleChange和handleSubmit来动态添加输入文本框?

    我正在显示一个列表 列表中的每个项目都有一个文本框 文本框显示显示顺序 请找到沙箱 https codesandbox io s solitary butterfly 4tg2w0 在 Post API 调用中 如何将更改的文本框值与相应的
  • 错误:套接字使用节点 v0.12.0 挂起

    我正在尝试使用 Node 执行一个非常简单的 HTTP POST var querystring require querystring var http require http var postData querystring stri
  • Phonegap:带有背景图像的相机视图

    我使用 Phonegap 和 Sencha Touch 来获得相机功能 但我希望将具有透明背景的图片叠加在实时相机视图上 而不是默认的相机视图 类似于下面的示例 其中恐龙图像已叠加在相机视图图像上 你能告诉我这个功能是否可以通过Phoneg
  • google-services.json 适用于不同的productFlavors

    Update GCM已弃用 请使用FCM 我正在按照 Google Developers 页面的指南实施新的 Google Cloud Messaginghere 我已经成功运行并测试了它 但我现在的问题是我有不同的产品风格 具有不同的 a
  • Microsoft Dynamics NAV Web 服务中的日期筛选器

    当在 php 中向 Web 服务发送过滤器时 一切正常 但是当我们需要对日期进行排序时 我们遇到了问题 我们需要获取在特定日期之后修改的所有对象 在页面中我们有一个日期元素 如下所示
  • 从 Outlook webaddin 打开 url 时弹出窗口被阻止错误

    当用户单击插件视图中的按钮时 我尝试打开网址 但网络插件抛出错误 我的打开网址的代码 let a document createElement a a setAttribute target blank a setAttribute sty
  • 访问共享文件?

    我试图通过 UNC 路径从 Windows 共享文件夹中读取文件正文 并收到此异常 The process cannot access the file
  • 禁用 matplotlib pyplot 的输出

    我有一个数组A形状 1000 2000 我使用 matplotlib pyplot 来绘制数组 这意味着 1000 条曲线 使用 import matplotlib pyplot as plt plt plot A 该图很好 但有一千行
  • 将 Cloud Functions 执行隐藏在 Cloud Endpoints 后面

    我想知道是否可以限制 隐藏使用云端点对我的云功能的直接访问 我跟着this来自谷歌的教程 在链接上它说 通过此设置 ESP 会拦截对您的函数的所有请求 并在调用该函数之前执行任何必要的检查 例如身份验证 我成功完成了本教程 在端点上添加了
  • Android 中的 EditText 视图中允许多行吗?

    如何在Android中允许多行EditText view 默认情况下所有EditTextAndroid 中的小部件是多行的 这是一些示例代码
  • 在 Windows 命令行中使用双引号提取密码存档

    我想从 PHP 中提取存档文件 zip rar z7 gz 等 因为密码可以包含特殊字符 例如 并且 PHP exec 不支持 unicode 字符 出于某种原因 我最终使用了一个批处理文件 如此处所述php exec 在 unicode
  • 无法打开包含文件:“io.h”:没有这样的文件或目录

    我试图使用 Cython 编译一个简单的 pyx 文件 print hello 这是我的 setup py from distutils core import setup from Cython Build import cythoniz
  • 根据 VBA 2010 中的字符断开字符串

    在 Excel 2010 中 使用 VBA 如何在找到某个字符时拆分字符串 Let say A1 This is a test of the emergency broadcast signal 我将其分配给一个变量 例如 strColum