作者:hacker 日期:2022-07-14 分类:网络教程
这需要使用VBA编程excel填指定位置的文字,程序代码如下图excel填指定位置的文字:
测试excel填指定位置的文字的表如下图excel填指定位置的文字:
能够做到点哪行就填内容的功能,程序代码的文本如下(可以复制粘贴,但是一定贴到对应表中):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(Target.Row, "D") = "文字"
End Sub
方法/步骤:
1.在需要修改表格列的后方,插入一列,输入公式=""坐标,引号里面填写需要添加的文字,...
2.输入后,按回车并下拉表格,即可在内容前添加固定文字。
3.选中添加后的表格,右键点击选择复制。
4.选择原有的表格,点击右键,选择选择性粘贴。
5.点击文本的选项,选择确定。
第一种是从固定位置插入特定字符串(例子里面假设是从第三位开始excel填指定位置的文字,所以公式里面excel填指定位置的文字的数字是3)【公式为红色字体部分)
第二种是从字符串里面指定excel填指定位置的文字的字符后面插入字符串(公式在编辑栏里面)
PSexcel填指定位置的文字:例子里面C列是需要插入的特定字符串
EXCEL表中怎么使一串数字在固定地方加点可以使用TEXT函数来完成这个操作,可以在指定的位置输入“=TEXT(A1,"0!.000!.00000")”。
具体方法及具体操作步骤如下,以wps中的Excel表格为例做演示。
1、在电脑的wps中打开需要操作的Excel表格,如下图所示。
2、点中空白位置,进入到编辑状态,如下图所示,进入下一步。
3、在编辑栏中输入=TEXT(A1,"0!.000!.00000")公式,如下图所示,点击回车,进入下一页面。
4、就可以看到空白单元格中已经将固定位置加上点了,如下图所示。
使用VBA轻松搞定,你要做的就是把代码中箭头指向的工作表名改为你的表名,后成的1-000中的1改为你想要的序号前的符号。
要编写VBA代码,请在excel中按住alt+F11(alt按住不要放的情况下按F11),会打开VBA编辑窗口,双击左边跟你工作表同名的对象,在新出现的窗口中粘贴以下的代码,然后将"Sheet2"改为你要自动填充标签的工作表名,并将鼠标置于代码中,按F5运行即可。
注:for i=1 to 2,表示你的行数,如果你有5行,就将2改为5,j是代表列数
'填充序号
Sub FillIndex()
Dim i As Long '填充行数
Dim j As Long '填充列数
Dim SN As Long '序号
SN = 1
For i = 1 To 2
For j = 1 To 3
Sheets("Sheet2").Cells((i - 1) * 5 + 2, (j - 1) * 3 + 2) = Format(SN, "1-000")
SN = SN + 1
Next
Next
End Sub
已有5位网友发表了看法:
访客 评论于 [2022-07-14 19:25:29] 回复
演示。1、在电脑的wps中打开需要操作的Excel表格,如下图所示。2、点中空白位置,进入到编辑状态,如下图所示,进入下一步。3、在编辑栏中输入=TEXT(A1,"0!.000!.0000
访客 评论于 [2022-07-15 04:25:24] 回复
eet_SelectionChange(ByVal Target As Range) Cells(Target.Row, "D") = "文字"End Subexcel表格怎么在前面填上固定内容方法/步骤:1.在需要修改表格列的后方,插入一列,输入公式=""坐标,引号里面填写需要添加的文字,.
访客 评论于 [2022-07-14 21:38:39] 回复
容前添加固定文字。3.选中添加后的表格,右键点击选择复制。4.选择原有的表格,点击右键,选择选择性粘贴。5.点击文本的选项,选择确定。EXCEL中如何在指定字符串的指定位置中加入特定字符串?第一种是从固定位置插入特定字符串(例子里面假
访客 评论于 [2022-07-15 02:49:36] 回复
() Dim i As Long '填充行数 Dim j As Long '填充列数 Dim SN As Long '序号 SN = 1 For i = 1 To 2 For j = 1
访客 评论于 [2022-07-15 05:41:10] 回复
),会打开VBA编辑窗口,双击左边跟你工作表同名的对象,在新出现的窗口中粘贴以下的代码,然后将"Sheet2"改为你要自动填充标签的工作表名,并将鼠标置于代码中,按F5运行即可。注:for i=1 to 2,表示你的行数,如果你有5行,就将2改为5