随笔分类 -  excel

摘要:=xlookup(b7,indirect(d7&"!b:b"),indirect(d7&"!g:g"),0) 假设B7==80031 d7=cy11 则公式在当前工作簿的cy11的B列查找80031,如果找到则将返回对应的G列单元格的内容 阅读全文
posted @ 2025-02-24 20:19 myrj 阅读(5) 评论(0) 推荐(0)
摘要:自定义排序--选择指定列--选择 字体颜色 --相应颜色--在顶端以集中显示 结果如下图: 阅读全文
posted @ 2025-02-10 12:42 myrj 阅读(41) 评论(0) 推荐(0)
摘要:excel 全角数字转半角:利用函数asc() 删除空白行列宏实现 Sub 检查所有工作表删除空白行列() For icount = 1 To Sheets.Count maxrow = Sheets(icount).UsedRange.Rows.Count maxcol = Sheets(icou 阅读全文
posted @ 2023-09-20 20:33 myrj 阅读(165) 评论(0) 推荐(0)
摘要:EXCEL快速打开VBA代码: 右击任意工作表:查看代码 阅读全文
posted @ 2023-09-12 21:01 myrj 阅读(167) 评论(0) 推荐(0)
摘要:stata导出到EXCEL: 报错: . export excel using "D:\te\安徽.xlsx", > firstrow(variables)observations must be between 1 and 1048576r(198); 是因为XLSX最大行数限制 将文件分成多个导 阅读全文
posted @ 2023-08-24 09:45 myrj 阅读(996) 评论(0) 推荐(0)
摘要:懒人EXCEL 阅读全文
posted @ 2023-07-09 20:49 myrj 阅读(10) 评论(0) 推荐(0)
摘要:EXCEL 单元格一串数字,显示科学计数法,选择相应单元格列,选择数值,小数位数为0 阅读全文
posted @ 2023-05-01 07:55 myrj 阅读(501) 评论(0) 推荐(0)
摘要:EXCEL快速删除所有空行:1.全选所有单元格,包括空行2.筛选3.点“向下箭头”,去掉全选,只选择“空行”选项4.删除即可将所有相关空行删除 阅读全文
posted @ 2023-04-28 07:08 myrj 阅读(499) 评论(0) 推荐(0)
摘要: 阅读全文
posted @ 2023-04-28 06:49 myrj 阅读(11) 评论(0) 推荐(0)
摘要:import re import pymysql import requests from bs4 import BeautifulSoup import lxml import sys, io import openpyxl # 数据库信息 host = '192.168.56.101' user 阅读全文
posted @ 2023-04-24 14:25 myrj 阅读(19) 评论(0) 推荐(0)
摘要: 阅读全文
posted @ 2023-04-23 21:27 myrj 阅读(66) 评论(0) 推荐(0)
摘要:EXCEL分成多个独立窗口,分屏显示在两个窗口,可以相互参照1.用EXCEL打开一文件2.右击“任务栏”中EXCEL图标,如图显示 点击"Microsoft Excel 2010",即可打开新窗口 阅读全文
posted @ 2023-04-08 19:54 myrj 阅读(817) 评论(0) 推荐(0)
摘要:import pandas as pd df=pd.read_excel('bb.xlsx') column = list(df.columns) for i in range(0, len(df)): print(df.iloc[i][column[0]],df.iloc[i][column[1] 阅读全文
posted @ 2023-03-19 14:57 myrj 阅读(890) 评论(0) 推荐(0)
摘要:import pandas as pd file=pd.read_excel('bb.xlsx') column = list(file.columns) for i in range(len(file)): x = [file.iloc[i][x] for x in range(len(colum 阅读全文
posted @ 2023-03-19 14:45 myrj 阅读(171) 评论(0) 推荐(0)
摘要:Sub CheckTableCells() Application.DisplayAlerts = False Dim sht As Worksheet Dim i, j As Integer For i = 1 To 284 If (Range("e" & i).Value = "") Then 阅读全文
posted @ 2023-02-18 08:08 myrj 阅读(52) 评论(0) 推荐(0)
摘要:Sub CheckTableCells() Application.DisplayAlerts = False Dim sht As Worksheet Dim i, j As Integer For i = 1 To 284 If (Range("e" & i).Value = "") Then 阅读全文
posted @ 2023-02-17 22:12 myrj 阅读(252) 评论(0) 推荐(0)
摘要:=IF(ISNUMBER(FIND("经济学",M1)),1,0) 判断单元格m1中是否包含“经济学”,如果包含值为1,不包含值为0=IF(ISNUMBER(FIND("党员",N1)),1,0)判断单元格n1中是否包含“党员”,如果包含值为1,不包含值为0=IF(AND(S1=1,T1=0),1, 阅读全文
posted @ 2023-02-16 19:49 myrj 阅读(71) 评论(0) 推荐(0)
摘要:Sub cha() Dim result As String, str1 As String Dim hang As String Dim hha As Integer hha = 0 Dim c As Range, rng As Range result = "航空" result = Appli 阅读全文
posted @ 2022-11-17 15:22 myrj 阅读(610) 评论(0) 推荐(0)
摘要:Sub fenlie() Dim dict1 As Object Set dict1 = CreateObject("scripting.dictionary") maxr1 = Range("d65536").End(xlUp).Row arr1 = Range("a1:a" & maxr1) F 阅读全文
posted @ 2022-11-17 13:04 myrj 阅读(301) 评论(0) 推荐(0)
摘要:求:多个表格内容相加 公式:=PHONETIC(A2:A7) 说明:Phonetic函数只能对字符型内容合并,数字不可以。 求:前三位 公式:=LEFT(A2,LEN(A2)-8) 说明:LEN计算出总长度,LEFT从左边截总长度-8个 操作 示例 求:-前边的文字 公式:=LEFT(A2,FIND 阅读全文
posted @ 2022-11-17 07:02 myrj 阅读(140) 评论(0) 推荐(0)