下面图老师小编跟大家分享Excel把很多正数变成负数的快捷方法,一起来学习下过程究竟如何进行吧!喜欢就赶紧收藏起来哦~
【 tulaoshi.com - excel 】
如下表,A1:B3这个范围是正数,下面我们要把它们全部变成负数。注意哦,方法虽然简单,但是顺序反了就达不到效果了。
先在C1中输入一个-1,然后,如上图一样对C1进行复制。
紧接着,选中A1:B3这个范围,如下图。
执行菜单操作:编辑→选择性粘贴,弹出如上图,运算那里选择乘,最后点击确定即可。
看上图,是不是全部都变成负数了?这招使用的方法,实际上就是让A1:B3这个范围的数据同时乘以-1。
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/ejc/)知识拓展:其它方法
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/ejc/)加负号的方法,如下:
=-A1 =A1*-1 =A1/-1
使用VBA的方法,如下:
Range("B2").Select
ActiveCell.FormulaR1C1 = "=-RC[-1]"
Range("B2").Select
Selection.AutoFill Destination:=Range("B2:B65536")
Range("B2:B65536").Select
Range("A4:A65536").SpecialCells(4).EntireRow.Delete
如下图,找到文件→页面设置。
弹出如下的对话框。
上图中,切换到页面选项卡,然后,在缩放的下面,找到调整为1页宽 1页高,这样,就会自动缩小来打印了。
当然,使用该功能的前提是,超出的内容不能太多,如果太多了,缩小过来之后打印,看都看不清楚,密密麻麻的也就没有意思了。
首先看看Select Case的语法如下。
[Select Case语句的语法]
Select Case 测试表达式
Case 条件表达式1
语句块1
Case 条件表达式2
语句块2
Case 条件表达式3
语句块3
......
Case 条件表达式n
语句块n
Case Else
语句块Else
End Select.
注意哦,这种语句是在VBA代码当中使用的。下面提供例子,其功能用来评判成绩的等级的,分别为优秀、良好、及格、不及格等情况。
If [a1].Value = "" Then
MsgBox "A1单元格没有输入数字。"
Exit Sub ' 退出程序
End If
Select Case [a1].Value
Case Is 30
MsgBox "差"
Case Is 60
MsgBox "不及格"
Case Is 80
MsgBox "及格"
Case Is 90
MsgBox "良好"
Case Else
MsgBox "优秀"
End Select
在使用Excel的时候,我们可以将相同的一个工作薄文件,让很多人都能同时打开并保存相应的数据。
这叫做共享工作薄。这需要多方面的支持。
比如,首先,要设置工作薄为共享,其次要有局域网功能,最后还要能够访问网络。条件缺一不可。
然而,有的时候也会有意外情况的发生,就比如现在我们为大家讲解的。为什么工作薄已设置为共享,同时,也能通过局域网功能打开工作薄,但是,为什么只能有三个人能够正常打开工作薄,而第四个或更多的人却不能打开共享工作薄了呢?这是为什么呢?
首先说明,该问题不是工作薄的问题,该问题也不是局域网的问题。
而是,操作系统的问题,这如何理解呢?共享工作薄放在哪台计算机,就是那台计算机的操作系统的问题。
因为,在局域网正常的情况下,如果被访问的目标计算机的操作系统是xp,win7,win8等等这些常规的操作系统,那么,通过网络来访问共享工作薄,访问是有限制的,最多只能访问三个,更多的就不能正常打开了。这是操作系统的版本的限制。没法解决。
那要解决该问题,应用使用什么办法呢?
如果非要解决此问题,那只有安装服务器版的操作系统,问题自然就能解决了,因为服务器版的操作系统,支持很多用户同时访问,而不只是三个。
常见的服务器版操作系统有:Win2003 Server,Win2008 Server,Win2012 Server等等,您安装哪种都可以解决问题。
Dim wn$, shp As Shape, arr
Application.ScreenUpdating = False
Application.DisplayAlerts = False
wn = [a1]
arr = Range("o3:o" & Range("o65536").End(xlUp).Row)
Sheets("报表").Copy
With ActiveWorkbook
With .Sheets(1)
.Rows("1:2").Delete Shift:=xlUp
.Range("D:D,P:P").NumberFormatLocal = "@"
.[o1].Resize(UBound(arr)) = arr
With .UsedRange
.Value = .Value
End With
For Each shp In .Shapes
shp.Delete
Next
End With
.SaveAs ThisWorkbook.Path & "" & wn & ".xls", IIf(Application.Version = 11, xlNormal, xlExcel8)
.Close
End With
Application.DisplayAlerts = True
Application.ScreenUptuLaoShi.comdating = True
MsgBox "ok"
不需要编程、不需要复杂的操作,只图老师用 Excel Online app 就可以做出一个漂亮的在线调查问卷,并且能够自动汇总结果。
1、访问 Office Online 网站。 为了最大限度地正常访问,我的经验是从 Outlook.com 打开 Office Online比较保险。
2、打开 Excel app。
Excel app 拥有与 Excel 2013 类似的欢迎界面,可以用各种模板新建表格,也可以打开最近使用过的表格。
注:虽然与 2013 界面类似,但功能可相差太远了。不过基本的功能倒是挺全,有些功能,2013 还不一定有。
3、新建调查。
新建一个空白表格,可以看到在开始 选项卡--表 组,有个调查 按钮。单击按钮--新建调查 ,弹出编辑调查 向导窗口,我们可以开始准备调查问卷了。
4、设计、输入问卷。
输入调查标题,然后逐个输入问题。每个问题都由问题 、问题副标题 、响应类型 、必需 (是否必填)、默认回答 等项目组成,其中响应类型包括文本 、段落文字 、数字 、日期 、时间 、是/否 、选择 等多种,可以说基本上涵盖了在线调查问题类型的几乎全部需求。
注:在问卷设计完成后,Excel Online 自动生成了一个以问卷问题为标题栏的表格,等待问卷结果的传来。
5、发布调查链接。
单击问卷编写页面的共享调查 ,弹出创建调查共享链接的向导。调查链接创建完成后,复制该链接,通过网页、邮件、社交工具等进行发布,任何打开此链接的人均可提交答卷。也就是说,可以匿名答卷、无需登录,这样就给大范围的调查提供了便利。
6、匿名用户提交答卷。
本步骤用另一个浏览器,在不登录的情况下打开第 5 步骤中生成的调查共享链接,并答卷、提交,非常顺利。
7、Excel Online 自动汇总调查结果。
每当有一名用户提交了答卷,在第 4 步骤中生成的问卷表格就会自动增加一行,该行的内容正是用户刚刚提交的问卷内容。当调查结束,可以导出 xlsx 到本机,也可以继续保持在线,利用 Excel 强大的数据分析功能,对调查结果想怎么分析都行了。
注意事项:鉴于 Office Online 在国内访问的难易程度,使用 Excel app 开展正式调查是不现实的,只是希望国产软件能尽快提供类似功能。
你还在为Excel风险坐标图怎么做而苦恼吗,今天图老师小编教你Excel风险坐标图怎么做,让你告别Excel风险坐标图怎么做的烦恼。
1.选中数据区域点击插入推荐的图表。
2.所有图表散点图。
3.双击设置坐标轴格式单位(根据需要设置)。
4.双击设置数据系列格式标记(调整数据标记选项的大小)。
填充无填充。
边框实线。
5.右击添加数据标签。
6.双击设置数据标签格式标签选项通过数据标签区域(根据需要选择)。
标签位置居中。
7.使用PPT制作如图的表格,另存为图片。
8.双击绘图区设置绘图区格式图片或文理填充插入图片来自文件。
2.表格的美化
1.添加标题和数据来源
字体(衬线字体:线条粗细不同,适合小号字体使用,投影时清晰度不高,无衬线字体:粗细相同,更适合大号字体时使用,投影时美观)
中文字体:微软雅黑,黑体
英文字体:Arial
数字字体:impact,Arial
2.进行图表美化,添加背景色以淡色调为主。
以上就是Excel的风险坐标图怎么做的方法介绍,希望能对大家有所帮助!
来源:http://www.tulaoshi.com/n/20160331/2067976.html
看过《Excel把很多正数变成负数的快捷方法》的人还看了以下文章 更多>>