元件
利用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中自动填充计算表格项
利用Excel制作电子表格时，有时需要用到计算填充功能，F列每种元件的价格合计，就是由E列元件单价乘以D列元件数量得来的。通过分析，发现利用Excel97提供的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中制作电路图图纸
你是不是还停留在用excel做表格的那个技术阶段，那就赶紧学习excel吧，有人用excel都可以制作电路图图纸了，看看下面的教程在excel中制作电路图图纸你也会。 1、制作元件 此方法中惟一比较麻烦的就是绘制各种元件，因为Excel 2003没有这些专业的图形，需要自己用自选图形绘制，至于那些不常用的元件大可在需要时再绘制添加。 用各种自选图形组合出元件图，绘制时要注意元件出线的直线不要画，中间有空白的要画一个无边线色、填充白色的矩形放在下面，以挡住后面的表格线。选中组合好的图形，在名称框中你会看到图形的名称（通常是：组合 XX），把它删除，输入实际的名字，如“线圈”，回车确认。选中全部绘制好的元件图，右击，从“设置对象格式…”对话框的“属性”选项卡中选中“大小固定，位置随单元格而改变”单选按钮。 2、基本设置 选中全部单元格设置行高28、列宽4，这差不多相当于实际打印的1cm左右。选中全部单元格设置对齐方式为水平居左、垂直居中，设置字号为10。把组合好的元件图放置在工作表左侧的A-C列中，调整位置使得元件的横向出线点正好与横向表格线重叠，竖向出线与纵向表格线重叠，同时有纵、横向出线的则放在表格线交叉处，让它同时满足两个条件。为了将来旋转方便，对于同一元件按横放和竖放两种格式各画一个，如图2所示。 3、编辑宏 执行“工具→宏→宏…”菜单命令，在“宏名”框中，输入宏的名称“线圈”。单击“编辑”按钮。在宏编辑窗口中输入下列宏代码： Sub 线圈（） ActiveSheet.Shapes（"线圈"）。Select