爱笔记

CAD中动态输入的开启和关闭设置

Sat, 07 Oct 2023 09:58:50 +0800

CAD中动态输入非常实用，最简单的办法，就是按F12进行切换。

CAD（或天正）打开出现输入要打开的文件名怎么办

Sat, 07 Oct 2023 09:52:51 +0800

从【开始】里要打开cad文件时，画板上出现“输入要打开的图形文件名”，很恼人！

这是由命令Filedia控制，在命令行输入“　filedia　”　把其值改为原始值“1”即可

Excel2010如何在方框里打勾

Wed, 29 Jun 2022 14:53:02 +0800

excel2010设置打勾方格的教程:

设置打勾方格步骤1:打开EXCEL表单

设置打勾方格步骤2:在功能区，点开始，点击右键--自定义功能区

设置打勾方格步骤3:主选项卡里面--对应右边栏勾选开发工具，点确定按钮。

设置打勾方格步骤4:点击开发工具--插入选择相应的按钮，将光标点在任一单元格即可。

设置打勾方格步曝5:点击该复选框进行文字编辑，将文字删除或加需要的文字内容即可。反复点

击该小方框，即会呈现打勾与不打勾显示，可以随意移动，也可以按需求复制多个粘贴。

一打开笔记本的盖子，就自动开机怎么办？

Wed, 29 Jun 2022 14:50:06 +0800

1、右键开始菜单,点击“电源选项”。

2、弹出“设置”对话框,选择“电源和睡眠”,下拉右侧滚动条,找到“相关设置其他电源设置”,点击进入。

3、点击“选择关闭盖子的功能”,点击“更改当前不可用的设置”。

4、这时会看到有一项“启用快速启动(推荐)”,去掉前面的“对勾”,点击“保存修改”。关机合盖,再次开盖会发现自动开机现象已消除。

Excel怎么把多个文件合并到1个文件

Thu, 12 May 2022 16:47:19 +0800

1、新建一个文件夹、将要合并的表格放到里面、新建一个表格、用excel打开、右击Sheet1
2、选择查看代码（PS：Excel有着一项，WPS没有）

3、将下列代码复制到文本框中：

Sub 合并当前目录下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"

End Sub

4、点击运行、一段时间（取决于表格的大小和多少）后，合并完成了，点击保存即可。

以不变应万变

Sat, 07 May 2022 22:16:38 +0800

不知道情况怎么样的时候，可以以不变应万变，就是常说的让子弹飞一会儿。日久见人心，慢慢看清事情的真相。再就是，要学会“熬”，也就是坚持，坚忍，不以物喜、不以己悲。熬着熬着，本来艰难的事也会变容易了。喜欢的人会走，不喜欢的人也会走。喜欢的人可能会变不喜欢，不喜欢的人也可能会变喜欢。世界就是这么奇妙。做好自己，遵守规则，做到极致。

Excel同一行两列对比，用最大值除以最小值，求取比例

Thu, 28 Apr 2022 00:33:04 +0800

比如A列第一行和B列第一行对比，用大的数除以小的数，可在C列第一行输入 =MAX(A1:B1)/MIN(A1:B1)

再次启航

Wed, 27 Apr 2022 20:58:41 +0800

多年老网虫，博客断断续续，大部分因为换服务器不好搬迁停止了。而今，兴致再来，再次写起来！