根据 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 中的字符断开字符串 的相关文章

  • 获取当前 VBA 函数的名称

    对于错误处理代码 我想获取发生错误的当前 VBA 函数 或子函数 的名称 有谁知道如何做到这一点 编辑 谢谢大家 我曾希望存在一个未记录的技巧来自行确定函数 但这显然不存在 我想我会保留当前的代码 Option Compare Databa
  • 使用 FindElementbyXpath() 获取 Selenium Basic 中可填充框的行和列名称

    我正在使用 Selenium Basic 将电子表格中的文本填充到网站中 网站的html代码是这样的 div table cellspacing 0 border 1 style width 99 tr th style font weig
  • Android Excel CSV 的 MIME 数据类型是什么?

    我尝试了 text csv 甚至 application vnd ms excel 但 Excel 不会显示在选择列表中 很多其他应用程序也可以 void shareCsv Uri uri Context context Intent in
  • 使用 ADODB 连接从关闭的工作簿中检索数据。某些数据被跳过?

    我目前正在编写一些代码 可以通过 ADODB 连接访问单独的工作簿 由于速度的原因 我选择了这种方法而不是其他方法 下面是我的代码 Sub GetWorksheetData strSourceFile As String strSQL As
  • 如何将 .xlsx 文件上传到 jenkins 作业

    如何将 xlsx 文件作为构建参数上传到 jenkins 作业 我尝试使用文件参数 但我发现该文件正在丢失其扩展名或原始格式 有什么方法可以从 jenkins UI 将 excel 文件上传到 jenkins 作业吗 In the file
  • 数据透视表错误 |无效的调用或过程

    我需要一些帮助来解决这个问题 我正在尝试创建一个数据透视表 从第一季度开始 在同一张表中包含一系列数据 第一个 if 语句在那里是因为最后一列并不总是包含标题 所以我将其包含在那里 我希望范围是动态的 因为所制作的表格的大小将根据工作表中数
  • 在Excel VBA中将图像(jpg)转换为base64?

    我需要在 Excel 中转换图像 或通过VBA 转为base64 最后我将进行XML输出 我怎样才能做到这一点 我需要引用 DOM 吗 我一直在读书这个问题 https stackoverflow com questions 169907
  • 比较 EXCEL 中的列本身以检查其是否有重复值

    假设我有一个名为项目代码的列 如下所示 row code 1 A123 2 B123 n A123 代码列中的值可能出现多次 如何使用Excel公式或Excel中的任何方法检查列中的重复记录 Thanks 根据您使用的 Excel 版本 您
  • Excel 2007 从 C# get_Value 始终返回 -2146826265

    我有一个引用 Microsoft Excel 12 0 对象库的小型 C 应用程序 除此之外 它还从 Excel 单元格读取值 它从一些较旧的 Excel xls 文件和一些 2007 文件 xlsx 中读取此值 所有 xls 文件的值都会
  • 生成Excel文件错误

    我在经典 ASP 中使用以下代码生成 Excel 文件 代码很简单并且有效 我在 Windows Vista x86 上的 IIS 7 0 下运行代码 两个问题 有一个奇怪的警告框 这是屏幕快照 http i27 tinypic com 2
  • 调试VBA、定位问题及排查方法[关闭]

    Closed 这个问题需要多问focused help closed questions 目前不接受答案 有哪些方法调试VBA代码 具体来说 单步执行代码 断点和停止命令 TheDebug command 当地人和观察窗 调用栈 调试 VB
  • 使用 Excel VBA 循环工作簿文件夹并将所有工作表导出为制表符分隔文本

    我拼凑了一个 Excel VBA 脚本 该脚本将打开的工作簿中的所有工作表写入单独的制表符分隔文件 这仍然是 宏 吗 我正在 Excel 真空中学习这一点 它一次只处理一本工作簿 效果很好 这里是 Sub exportSheetsToTex
  • 字符串在换行符处拆分

    我在 MS Access 表单上有一个文本框 用户将从 Excel 电子表格中复制一列数字到其中 我需要获取此输入并将其用作参数来构建查询 我的代码看起来像这样 Dim data as variant Dim input as String
  • VB6/VBA 中对象清除/数组释放真的有必要吗(优点/缺点?)[重复]

    这个问题在这里已经有答案了 我从使用静态代码分析 特别是 Aivosto 的项目分析器 中学到了很多关于 VB 的知识 它检查的一件事是您是否清除了所有对象和数组 我以前只是盲目地这样做 因为PA这么说 但现在我对 VB 释放资源的方式有了
  • 将数据从 R 导出到 Excel

    我试图将从 R 获得的一些结果导出到 Excel 中 但未成功 我尝试过以下代码 write table ALBERTA1 D ALBERTA1 txt sep t write csv ALBERTA1 ALBERTA1 csv your
  • 从 X、Y、Z 数据、Excel 或其他工具进行 3D 绘图

    我的数据看起来像这样 1000 13 75 2 1000 21 79 21 1000 29 80 02 5000 29 87 9 5000 37 88 54 5000 45 88 56 10000 29 90 11 10000 37 90
  • 有没有一种方法可以将这些列转换为数据格式?

    有没有办法将这些列转换为数据格式 gg mm aaaa 时 分 秒 日期 20220601 gt gt gt gt 2022 06 01 小时 3047 gt gt gt gt gt 00 30 47 时 分 秒 我对 B 列有严重问题 我
  • Excel VSTO 工作簿新活动

    在 Excel 2007 的一个 Excel 插件项目中 我需要检查创建新工作簿的事件 我还需要捕捉 Workbook Open 事件 我很容易做到这一点 在我在互联网上的研究中 我发现了以下内容 打开任何工作簿时都会引发 Applicat
  • 在 Excel 中查找结果将行复制到另一张工作表

    我需要一些帮助将数据从一个 Excel 工作表复制到另一个 例如 样本数据 A B C 1 aaa bbb ddd 2 bbb ccc eee 2 bbb ccc eee 3 ccc fff rrr 4 ccc fff ttt 5 ddd
  • 行编号选择自动填充直到最后[关闭]

    Closed 这个问题不符合堆栈溢出指南 help closed questions 目前不接受答案 我有一个包含数千行的表 我想通过在第一行旁边添加 1 2 3 来对行进行编号 然后选择这些行并拖动到最后以使用递增的数字进行填充 如何自动

随机推荐

  • 简单的 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