excel中怎么引用一个单元格的一部分内容以A列数据为文件名,B列数据为内容,批量生成txt?

Excel1.“1”如何变为“001”方法:选中-右键-设置单元格格式-数字-自定义-类型-填写“000”2.如果在第二列找第一列的值,如果找到就写包含,如果没有就写不包含方法:=IF(SUMPRODUCT(COUNTIF(B2,A$2:A$100)),“包含”,“不包含”)3.复制筛选出的数据,而不是全部方法:筛选-Control+G-定位条件-可见单元格-选中范围-复制4.生成字母列A,B,C,……AA,AB,AC,……方法:=SUBSTITUTE(ADDRESS(1,ROW(),4),1,“”)5.输入拼接的公式后,显示为公式而不是结果方法:查找-“=”替换为“=”6.表格空白单元格全部填充为0方法:选中-Control+G-定位条件-空值-输入“0”-按住Control不放-点击Enter7.在A列中查找C的位置,并输出对应B列的值方法:=VLOOKUP(C2,A2:B100,2,FALSE)8.http://blog.sina.com.cn/s/blog_556c9fa00102wv9k.htmlhttps://zhidao.baidu.com/question/355551600.html9.多个EXCEL文件合并为一个EXCEL文件(1)新建一个excel,将新建的Sheet1命名为汇总;(2)在汇总的标签上点击右键,点击查看代码;(3)在编辑器内输入以下代码:Sub 工作薄间工作表合并()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xlsx),*.xlsx", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub
(4)关闭编辑器和VBA窗口;(5)选择视图中的宏,点击查看宏,并执行;(6)选择需要合并的多个EXCEL文件,打开即可。10.一个EXCEL文件中多个Sheet合并为一个Sheet(1)在这个excel文件中,新建一个Sheet命名为汇总;(2)在汇总的标签上点击右键,点击查看代码;(3)在编辑器内输入以下代码:Sub WorkSheetsMerge()
Application.ScreenUpdating = False
Cells.ClearContents '清空当前表格数据
Cells.Clear '清空当前表格格式
Range("A3") = "来源工作表名称"
Range("B2") = " " '占位
Tempelete = "WorkSheets Merge Tool"
nTitleRow = Val(InputBox("请输入标题的行数,默认标题行数为1" & vbCrLf & "如无标题行则行数填写 0", Tempelete, 1))
If nTitleRow < 0 Then MsgBox "标题行数不能为负数。", 64, "警告": Exit Sub
For i = 1 To Sheets.Count
If Sheets(i).Name <> ActiveSheet.Name Then
rowused = Cells(Rows.Count, 2).End(xlUp).Row + 1
nShtCount = nShtCount + 1 '汇总工作表的数量
nStartRow = IIf(nTitleRow = 1, 1, 0) '判断遍历数据源是否应该扣掉标题行
lastrow = rowused
If nShtCount = 1 Then
Sheets(i).UsedRange.Offset(0).Copy Cells(rowused, 2)
rowused = Cells(Rows.Count, 2).End(xlUp).Row
ActiveSheet.Range(Cells(lastrow + 1, 1), Cells(rowused, 1)) = Sheets(i).Name
Else
Sheets(i).UsedRange.Offset(nStartRow).Copy Cells(rowused, 2)
rowused = Cells(Rows.Count, 2).End(xlUp).Row
ActiveSheet.Range(Cells(lastrow, 1), Cells(rowused, 1)) = Sheets(i).Name
End If
End If
Next
Cells.Select
Cells.EntireColumn.AutoFit
Application.ScreenUpdating = True
Range("A3").Select
MsgBox "当前工作簿下的全部工作表已经合并完毕!" & vbCrLf & "一共汇总完成 " & nShtCount & "个工作表!", vbInformation, Tempelete
End Sub
(4)点击运行中的运行子过程/用户窗体;(5)在新打开的窗口中,默认1,点击确定即可。11.在单元格中进行Excel换行的两种方法和取消换行符的方法https://baijiahao.baidu.com/s?id=1614216926502987426&wfr=spider&for=pc12.统计一个单元格(A2)中某一字符或符号(?)出现的次数方法:=LEN(A2)-LEN(SUBSTITUTE(A2,“?”,))<特别注意符号的中英文切换>意思是,先将所查找的符号(?)替换成没有,然后算新的总字符长度,再用旧的总字符长度减去新的,则为少掉的字符数,即所替换掉的符号(?)数。13.在EXCEL表格中定位空值,批量输入同一个数方法:control+G,然后空值,之后在第一个格输入一个数,按住control+enter,则全部填充这同一个数Windows1.批量读取文件名①新建一个txt格式的记事本文件。②在记事本文件中输入:DIR . /B >LIST.TXT③将此记事本文件后辍名,由txt改为bat。会弹出重命名对话框,单击“是”。④双击文件“新建文本文档.bat”即可生成list.txt文件。打开txt文件就可以看到当前文件夹内的所有文件名列表。2.批量修改文件名①用xls打开c:\pic文件夹中的rename.xls,你会发现文件名以全部罗列在A列中(你也可以用鼠标来调整文件名的顺序),你可以在B1列中输入1.jpg作为第一个文件文件名。②鼠标选中C1单元格,并在编辑框中输入公式="ren “&A1&” "&B1。③继续用鼠标拖动C1单元格右下方的句柄,使剩余的C2-C7单元格填充。④然后,鼠标选中C列,鼠标右键复制,在记事本中,粘贴刚才的命令行,鼠标点击菜单“文件”——“另存为”,输入文件名ren.bat,要注意下图所示红圈中的路径及扩展名选项3.远程链接(1)被链接的计算机设置:我的电脑——属性——远程设置——远程协助中勾选允许远程协助连接这台计算机——远程桌面中勾选允许远程连接到此计算机——勾选下方建议的那个——确定(2)链接的计算机设置:运行——输入mstsc——输入被链接计算机的IP和用户名——选择连接选项——输入凭据即可注意:①计算机的IP查询:运行——输入cmd——输入ipconfig/all——按下Enter键,出现信息中的IPv4地址,即为本地电脑上IP地址②计算机的用户名:开始——设置——关于,出现的设备名称即为计算机名,但用户名的构成是:设备名称\用户名,该用户名为你登陆计算机的用户名③凭据是登陆密码R1.read.table读入的数据类型变成list,mode(data1)是list方法:data2<-as.matrix(data1)2.错误提示下标出界:即赋值的左边和右边不等,可能的原因是:①左右集合的大小设定错误;②左右集合的指定错误;③赋值的集合(一般为右)中存在na,null,inf或者直接为空。方法:一个一个带进去查看,少量少量跑进去验证。3.将矩阵中的NA值换成0值/将矩阵中的0值换成NA值,假设矩阵的名字是a方法:a[is.na(a)]<-0,反过来是a[a==0]<-na4.一些详细说明的网址(1)绘制饼图单个说明:https://zhuanlan.zhihu.com/p/25234546多个说明:http://blog.csdn.net/u013421629/article/details/73162217(2)一页多图http://www.cnblogs.com/nxld/p/6065237.html(3)绘制散点图http://blog.csdn.net/zx403413599/article/details/46866977(4)绘制条形图和折线图http://blog.csdn.net/zx403413599/article/details/46866977(5)排序http://blog.sina.com.cn/s/blog_6caea8bf0100spe9.html(6)绘制气泡图可以有四维,很好看:https://mp.weixin.qq.com/s?__biz=MzA3Njc0NzA0MA==&mid=2653191632&idx=1&sn=0ed0fed5478c1f22e16ed7553a0e5634&chksm=848c459fb3fbcc89ac994c7bc1a70832b164ba6b36d2104f4c22baf11c559dc0cca00bfee1e1&mpshare=1&scene=1&srcid=0915bZAM4OrluDr1WCm1pILH&pass_ticket=mBD0ABxEIlsb9HlghhGD5Z956UQ3krOgO8F2%2FCP21iI%3D#rd(7)ggplot2中图例的修改http://blog.sina.com.cn/s/blog_670445240102v250.htmlhttp://blog.sina.com.cn/s/blog_79f2c16f0102uzyv.html(8)图片的导出https://www.shengxin.ren/article/73(9)从图片中提取文字的包http://blog.csdn.net/sinat_26917383/article/details/54487359(10)卷积神经网络MXNet包的使用:http://blog.csdn.net/xxzhangx/article/details/54729055http://www.dataguru.cn/article-10669-1.html5.下载https://blog.csdn.net/wzgl__wh/article/details/778614146.提取包含某字符串的行变量http://127.0.0.1:26178/library/base/html/grep.html7.a是list,a按照b的形式,变成一个只有b内容的类似向量的listca <- list(“价格”=c(“价格”,“价格”,“价格”,“产地”,“口碑”),“产地”=c(“价格”,“口碑”),“口碑”=c(“价格”,“价格”,“价格”,“产地”,“口碑”,“价格”,“价格”,“价格”,“产地”,“口碑”))b <- c(“价格”,“产地”,“口碑”)c <- list()for (i in 1:length(a)){c[[i]] <- table(factor(a[[i]],b))}8.读取table结果names(table(a)) #用来读取table结果的名字as.numeric(table(a)) #用来读取table结果的统计数量}

我要回帖

更多关于 怎么引用一个单元格的一部分内容 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信