推荐阅读
史上最强大的 Win 10 操作指南
目录： 一、1秒关机大法毫无存在感的开机登录——Windows Hello“Windows Hello”允许你使用面部、虹膜或指纹代替输入密码来进入桌面。不但更加炫酷流畅，官方也宣称它比传统的密码功能更安全。不过，这么厉害的功能，自然对硬件也有一些小要求啦~ 配有 RealSense 3D 摄像头的设备可以通过面部或虹膜识别使用 Windows Hello。以及大部分搭载指纹识别的设备，也都可以使用 Windows Hello 中的指纹登录功能。具体操作：以指纹识别为例，面部和虹膜识别方法类似。①开始按钮 > 设置 > 帐户 > 登录选项 > 添加 PIN 码（没有帐户密码的也一并设置好）
excel 图表数据归一化［擒贼擒王］
Excel图表仅支持使用两个数值坐标，当面对的数据是典型的工程技术类数据时，往往需要多个坐标系，故如何扩充坐标个数就是一个非常有价值的问题。图8.6-1所示的案例即是一个典型例子。图8.6-1 数据归一化图8.6-1所示案例描述了发酵工程研究所关注的：pH、残糖量、酶活、生物量、溶氧5个指标同发酵时间的关系，该图的最大特点是这5个指标分别使用完全不同的数量单位，每一个指标对应一个独立的数值纵轴。该图更多的作用是发现不同指标数据的交集点，以找到最佳方案。学习思考关于图8.6-1案例：1）这个图表案例属工程技术类图表，工程技术类图表的使用范围有局限性，其只限于在所应用的行业内进行交流。切勿照猫画虎，生搬硬套到非工程技术类的应用中，此类不恰当的应用屡见不鲜。2）学习该案例的普遍意义在于如何进行图表的坐标模拟。由于Excel的限制，图8.6-1案例的实现关键在于如何使具有不同数值大小和单位的数值，在同一个参考基准下进行数值转换，使所有数据变为同一类坐标下的数据，然后模拟这些进行了数据变换的对应坐标即可，该方法在数学中被称为“归一化”。
如何使用Project 2016在项目中插入备注?
一、打开Project 2016软件，先新建一个项目文档。二、在文档信息框中右击，找到里面的任务备注。三、直接点击任务备注，就可以插入你想要输入的任何信息了，包括添加编号、符号、图片等。
如何去掉Word2013中的浮动工具栏
在Word 2013文档中，当进行选中文本操作时会在被选中文字的右侧显示浮动工具栏。浮动工具栏中包含有常用的设置文字格式的命令，。 。 第2步，在打开的“Word选项”对话框中，取消“常规”选项卡中的“选择时显示浮动工具栏”复选框，并单击“确定”按钮即可，。 更多相关阅读Word 2010的浮动工具栏 快速完成字体格式化Excel 2010的浮动工具栏功能详解2步设置教你关闭Word 2010文档窗口中显示浮动工具栏
最新发布
word怎么利用邮件合并填写表格
在办公过程中可能遇到大量的表格或者类似的文件需要填写，这时就可以利用WORD的信函工具来批量填写。那么下面就由小编为大家分享下word利用邮件合并填写表格的技巧，希望能帮助您。 word利用邮件合并填写表格的步骤如下： 步骤一：打开WORD表格，观察需要录入的数据。 步骤二：然后打开Excel表格，把需要填写的内容录入进去(表格的表头，对应着WORD表格里需要填写的部分，例如：WORD里有姓名，EXCEL表头就填姓名)，然后保存。 步骤三：打开WORD，工具-自定义-工具栏-选择邮件合并。 步骤四：在邮件工具栏里选择打开数据源。 步骤五：找到刚保存的Excel表格，打开。 步骤六：然后选择Sheet1$，确定。 步骤七：在WORD表格需要录入的地方选择插入域(邮件合并工具栏)。 步骤八：在WORD表格需要录入的地方插入相应的域(比如姓名处插入姓名域)
word中怎么做流程图
我们在制作word文档的时候，往往需要添加流程图，将一个业务流程在word中展示，那么下面就由小编给大家分享下word中做流程图的技巧，希望能帮助到您。 的步骤如下： 步骤一：打开word文档，然后选择插入-形状，然后就可以选择流程图。 步骤二：在word中画出流程图的图形，然后调整其位置。 步骤三：接下来在插入形状中选择需要的线条。 步骤四：使用线条连接好图形形成基本流程图。 步骤五：右键单击形状点击添加文字。 步骤六：为每个图形添加好文字，word流程图就画好了。看了“word中怎么做流程图”此文的人还看了：.1.如何用Word制作流程图
word中调大字体的两种方法
在Word使用中，有时候需要放大字体，但是Word本身提供的字体最大就是初号字体，无法满足需求怎么办?那么下面就由小编给大家分享下word中调大字体的技巧，希望能帮助到您。 word中调大字体方法一 步骤一：选择要放大或缩小的内容，右键字体。word中调大字体方法图1 步骤二：全选字体号word中调大字体方法图2 步骤三：输入自己想要的字体号word中调大字体方法图3 word中调大字体方法二 步骤一：光标选中需要进行调整的字体，在上方字体栏，往设置字体尺寸的选项框中填入自己想要设置的尺寸大小，然后回车确定。word中调大字体方法图4
EXCEL VBA 跨表合并多个文件
‘选择一个目录，将目录中的所有EXCEL文件导入当前工作表‘这些EXCEL文件最好格式能一样，这里是每个文件是同一个格式Sub 批量()Dim FD, str$, arrSet FD = Application.FileDialog(msoFileDialogFolderPicker)If FD.Show = -1 Then t = FD.SelectedItems(1) Else Exit Sub ‘如果没选择文件夹则退出Application.ScreenUpdating = FalseCells.NumberFormatLocal = "@"str = Dir(t & "\*.xl*") ‘查找格式为EXCEL的文件While Len(str) > 0 ‘文件名不为空时Workbooks.Open (t & IIf(Right(t, 1) = "", "", "") & str) ‘打开工作簿With ActiveWorkbook.ActiveSheet.Range(.Cells(2, "l"), .Cells(.[a65536].End(3).Row, "l")) = "’" & Left(str, Len(str) – IIf(Right(str, 1) = "x", 5, 4))arr = .UsedRangeWorkbooks(str).Close False ‘关闭工作薄Kill (t & IIf(Right(t, 1) = "", "", "") & str) ’删除工作薄（如果不删除，省去这一步）End WithWith ActiveSheetrw = .[a65536].End(3).Row + 1.Cells(rw, 1).Resize(UBound(arr, 1), UBound(arr, 2)) = arr ‘将数据写入当前工作表End Withstr = Dir() ‘查找下一个文件WendIf [a1] = "" Then Rows(1).Delete ‘如果A1为空，删除第一行Application.ScreenUpdating = TrueEnd Sub
利用VBA实现Excel表格计算
利用Excel制作电子表格时，有时需要用到计算填充功能，比如某列每种元件的价格合计，就是由E列元件单价乘以D列元件数量得来的。通过分析，发现利用Excel提供的VBA(VisualBasicforApplication)功能，写几行Basic代码即可方便地达到自动填充F列数据的目的，且计算结果为纯数据值，可以自由进行处理。具体实现步骤如下： 1. 建立Excel工作表，分别填入其它相应的数据，包括E列元件的单价和D列元件数量。 2. 点击“视图”→“工具栏”→“VisualBasic”→VB控件工具箱。 3. 在整个工作表的底部或适当的位置放置控制按钮“CommandButton1”。 4. 双击控制按钮，加入语句：PrivateSubCommandButton1_Click()DimiAsInteger’自动填充的行号DimrandAsString’工作表D列的范围参数DimraneAsString’工作表E列的范围参数DimranfAsString’工作表F列的范围参数 Fori=2To12’12为本例中给出的填充结果行号，可由使用者自己设定’该循环主要完成工作表F列计算表格的自动填充rand=″D″＋CStr(i)rane=″E″＋CStr(i)ranf=″F″＋CStr(i)Worksheets(″Sheet1″).Range(ranf)=Worksheets(″Sheet1″).Range(rand)＊Worksheets(″Sheet1″).Range(rane)NextiEndSub 5. 按执行键，就可达到设计要求的计算表格项的自动填充，且填充结果为纯数据。 Excel提供了VBA功能，使我们可以根据需要对其进行适当的二次开发，仔细研究其用法，会使制作电子表格的工作更加轻松。
excel中利用VBA将指定的单元格定位于屏幕*
如果工作表中的单元格都具有相同的行高和列宽，我们可以用VBA的方法将给定的单元格和区域定位于屏幕*，下面是VBA代码：Sub CenterOnCell(OnCell As Range)Dim VisRows As IntegerDim VisCols As Integer‘关闭屏幕更新Application.ScreenUpdating = False‘激活区域所在的工作簿和工作表OnCell.Parent.Parent.ActivateOnCell.Parent.Activate‘获取活动窗口的可视行数和列数With ActiveWindow.VisibleRangeVisRows = .Rows.CountVisCols = .Columns.CountEnd With‘ 确定参考单元格并用GOTO方法将该单元格定位到屏幕左上角。‘ 该参考单元格用给定的单元格的行数和列数分别减去可视行数和可视列数除以2来确定。‘ 用MAX函数确保参考单元格的最小行数和列数为1。With Application.Goto reference:=OnCell.Parent.Cells( _.WorksheetFunction.Max(1, OnCell.Row + _(OnCell.Rows.Count / 2) – (VisRows / 2)), _.WorksheetFunction.Max(1, OnCell.Column + _(OnCell.Columns.Count / 2) – _.WorksheetFunction.RoundDown((VisCols / 2), 0))), _scroll:=TrueEnd With‘选择给定的单元格OnCell.Select‘启用屏幕更新Application.ScreenUpdating = TrueEnd Sub假如给定的区域为M50：N51，可以在VBA中用下面的方法调用上述代码：CenterOnCell Range("m50:n51")
EXCEL 公式 多列转成一行图解教程
EXCEL 公式 2列多行转成1行=OFFSET($A1,ROUNDUP(COLUMN(A1)/2,0)-1,MOD(COLUMN(B1),2))EXCEL 公式 多列转成一行图解教程3列多行转成1行 =OFFSET($A1,ROUNDUP(COLUMN(A1)/3,0)-1,MOD(COLUMN(C1),3))以此类推，4列以上的呢？大家可以自己试试
EXCEL如何使用VBA一次罗列表中三省的员工姓名？
请罗列“四川省”、“湖南省”、“湖北省”三个省份员工的资料。VBA代码如下：Sub test()‘定义变量Dim rng As Range, RngTemp As Range, firstAddress As StringDim i As Byte, findCell As Range, sh As Worksheet, shtname As String‘将查找的目标设置为C2单元格到C列最后一个非空单元格赋予变量为rngSet rng = Range([C2], Cells(Rows.Count, "C").End(xlUp))‘循环赋予查找数组的每一个元素For i = 0 To UBound(Array("四川省", "湖南省", "湖北省"))‘开始查找数据，按值精确查找，不区分大小写Set RngTemp = rng.Find(What:=Array("四川省", "湖南省", "湖北省")(i), LookIn:=xlValues, lookat:=xlWhole, MatchCase:=False)‘ 如果找到目标，则赋予该目标的单元格地址给firstAddressIf Not RngTemp Is Nothing ThenfirstAddress = RngTemp.AddressDo‘变量findCell没有初始化，则需要初始化，否则合并查找到的数值If findCell Is Nothing ThenSet findCell = RngTempElseSet findCell = Union(findCell, RngTemp)End If‘查找下一个Set RngTemp = rng.FindNext(RngTemp)‘循环到不为第一个找到的目标地址为止Loop While RngTemp.Address <> firstAddressEnd IfNext i‘如果查找的内容不为空，则选择查找到内容所在行，否则显示提醒If Not findCell Is Nothing ThenfindCell.EntireRow.SelectElseMsgBox "没有找到符合条件的数据!"Exit SubEnd If‘防止错误On Error Resume Next‘把当前工作表的名称赋予shtnameshtname = ActiveSheet.NameSet sht = Sheets("查询结果")‘如果不存在查询结果表，则添加一个“查询结果”工作表If Err.Number <> 0 ThenSheets.Add after:=Sheets(Sheets.Count)Sheets(Sheets.Count).Name = "查询结果"ElseSheets(Sheets.Count).Cells.ClearEnd IfSheets(shtname).SelectSelection.Copy Sheets(Sheets.Count).[A1]End Sub
如何利用VBA生成一列不重复的随机整数
如果我们要用VBA生成一列不重复的随机整数，可以用下面的VBA代码。本例可以在A1:A100中产生1-100的不重复随机整数。Sub RndNumberNoRepeat()Dim TempArr1(99) As Integer, TempArr2(0 To 99, 1 To 1) As IntegerDim RndNumber As Integer, i As IntegerRandomize (Timer) ‘初始化随机数生成器For i = 0 To 99 ‘产生包含1－100的不重复的随机数列TempArr1(i) = iNext iFor i = 99 To 0 Step -1RndNumber = Int(i * Rnd)TempArr2(99 – i, 1) = TempArr1(RndNumber) + 1TempArr1(RndNumber) = TempArr1(i)Next i‘在A1:A100中输入这些数字Range("a1:a100").Value = TempArr2End Sub
利用VBA批量添加邮件链接
如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接，用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接，假设该区域为F2:F18。Sub ConvertToEmail()Dim convertRng As RangeSet convertRng = Range("F2:F18")Dim rng As RangeFor Each rng In convertRngIf rng.Value <> "" ThenActiveSheet.Hyperlinks.Add rng, "mailto:" & rng.ValueEnd IfNext rngEnd Sub