电脑使用上面的一些小技巧、源码备忘录、分享

以下说明的疑问或建议可发邮件咨询交流 dragonballcn@qq.com
 
一.自动备份文件
 1.创建一个文本文档,后缀改成.bat,编辑内容:
 
@echo off
copy "D:\源目录\源文件.xxx(后缀)" "D:\存放目录\新文件名-%Date:~0,4%%Date:~5,2%%Date:~8,2%-%Time:~0,2%%Time:~3,2%-%Time:~6,2%%Time:~9,2%.xxx后缀"
 
 代码说明:日期-时间-秒毫秒,参考示例:新文件名-20220101-0800-3097.xxx(后缀)
 上面是直接备份(复制)文件,压缩率大的大文件也可使用压缩包:(调用7zip)
 
@echo off
"C:\Program Files\7-Zip\7z.exe" a "D:\存放目录\新文件名%Date:~0,4%%Date:~5,2%%Date:~8,2%%Time:~0,2%%Time:~3,2%%Time:~6,2%%Time:~9,2%.zip" "D:\源目录\源文件.xxx(后缀)"
 
 
 2.创建一个任务计划,管理面板或开始菜单,搜索“计划任务”或“任务计划”,或计算机管理里面。
 触发器,可设置每次登录时(自用电脑)或凌晨固定时间(服务器),也可根据自己的情况设置,文件打开状态下也是能够备份的;
 操作,设置启动程序,浏览加载上面创建的.bat文件。
 
 3.也可随时进行手动备份:把文件创建快捷方式拖到开始菜单或桌面、或其他自己经常接触到的界面。
 
 
 
 
 
二.win7开机启动卡在win窗口加载页面(开机启动速度慢)
 1.设备管理器,查看-显示隐藏设备,禁用或卸装那些带有感叹号的设备。
 2.拔掉一些USB设备,打印机等。
 
 
 
 
 
三.mysql导入导出
 1.导出
cmd
cd C:\MySQL目录\bin
mysqldump -u root -p 表名 > 导出自定义文件名.sql
输入密码

如果有报错的话试一下“.\mysqldump”

(若mysql在D盘的话,先进入D盘)
cmd
d:
cd D:\MySQL目录\bin

 2.导入
cmd
cd C:\MySQL目录\bin
mysql -u root -p --default-character-set=utf8(字符编码) 表名 < 源文件.sql
输入密码
 
 
 
 
 
四. 复制粘贴成文本格式
 为了实现:从文档外部复制数据粘贴成文本格式,从excel内部复制数据粘贴成原格式。
新方法:添加顶部快捷方式,用alt+1,alt+2来实现,excel内部的是“值[粘贴值]”,外部的是“只保留文本[粘贴并只保留文本]”,在所有命令中找下(首字拼音排序)。(自定义快速访问工具栏-其他命令-从下列位置中选择命令-所有命令-最下面找“只”“值”字开头的)
 
-------以下过期------
 录制宏,编辑宏,设置快捷方式V或其他
 宏内容:
Sub 粘贴纯文本()
  On Error GoTo paste
  ActiveSheet.PasteSpecial Format:="HTML", NoHTMLFormatting:=True
  Exit Sub
paste:
  ActiveSheet.Paste
End Sub
------------------
代码说明:
Sub 粘贴纯文本() '宏名称,可自定义,默认是“宏1、宏2等”
On Error GoTo paste '如果出现错误跳转到“paste”语句,名称可自定义,与下面的保持一致。
Format:="HTML", NoHTMLFormatting:=True '没有格式的文本,直接用Format:="文本"的话有时候出现的空行会多一些。只有该语句的话,从excel内部复制的内容粘贴会报错,粘贴的语句不一样。
Exit Sub '如果上面不报错的话直接结束语句,否则会继续执行下面的语句。
ActiveSheet.Paste '直接粘贴原格式,如果需要也粘贴成文本格式的话,用下面另一行代码,也可自行录制宏来查看代码:
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
 
 
 
 
五、excel宏 不同表格自动排序
 录制的宏里面带有工作表名称ActiveWorkbook.Worksheets("Sheet1"),不一定适用其他工作表。
 宏内容:

Sub 排序()
  Dim paixu As Range
  Set paixu = Range("A2:P999")
  paixu.Sort Key1:=Range("A1"), Order1:=xlAscending, _
       Key2:=Range("B1"), Order2:=xlAscending, _
       Header:=xlNo, SortMethod:=xlPinYin
End Sub

---------
代码说明:
Range("A2:P999"):要排序的范围。
Range("A1"):以“A1”为第1排序字段升序排序,若第一排序里面相同的地方以“B1”为第2排序字段升序排序,若需降序改为:xlDescending。
Header:=xlNo:是否包含标题。
 
 
 
 
六.新版H5表格边框宽度设置
 2022新版淘宝详情页编辑,以前设置的 border="0" 没用了,表格出现了1px的宽度,需要用 style="border-width: 0.0px;",而且table、td里面都要定义一遍。居中也在style里面定义:td style="text-align: center;border-width: 0.0px;"
 
 
 
 
 
七、Windows 11 + Office 365,打开第二个excel时比较慢,要4-5秒
参考来源:https://blog.csdn.net/anjiongyi/article/details/127890454
注册表:
计算机\HKEY_CLASSES_ROOT\Excel.Sheet.12\shell\Open\ddeexec
计算机\HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\Open\ddeexec
更改值为:[open("%1" /ou "%u")]
具体说明可参考上面的链接。