仓库进销存表[“EXCEL应用技巧班”版块培训教程]

WLL7611 · 发表于 2007-4-8 10:40

<div class="msgheader">QUOTE:</div><div class="msgborder">以下是引用jx1680000在2007-3-8 15:04:02的发言： 在入单界面中加入控制按钮。<img src="data/attachment/forum/dvbbs/2007-3/2007381535764581.gif" border="0" onclick="zoom(this)" onload="if(this.width>document.body.clientWidth*0.5) {this.resized=true;this.width=document.body.clientWidth*0.5;this.style.cursor='pointer';} else {this.onclick=null}" alt="" /> </div>在入单界面中加入控制按钮和控件对齐的视频没看明白（能否请版主重录一次视频并加入文字说明，加入控制按钮的步骤视频中看不到对话框）：１．我添加按钮后不能指定宏（指定宏命令为灰色）？２．控件对齐是如何选定两个按钮，设置格式的？　　　　　　　　　　我是笨鸟，谢谢版主不厌其烦的解答！

[此贴子已经被作者于2007-4-8 11:50:00编辑过]

jx1680000 · 发表于 2007-4-8 19:01

版主第二步问题已解决．对入单界面进行初步制作:公式Ｃ５＝IF(B5="","",VLOOKUP(B5,data,3,0))中的data是指进销存表中的A：F列吗？<hr/>  这里的DATA是一个名称，是自定义的一个区域，左上角的输入框，菜单中的定义名称等用CTRL+F3，CTRL+SHIFT+F3可以查询，定义找到在表中的区域。学会定义一些名称对以后的工作大有好处，最少可以简化你的公式，其它的一些功能很多，一下子不能一一说明了。

[此贴子已经被作者于2007-4-8 19:03:14编辑过]

WLL7611 · 发表于 2007-4-9 14:16

<div class="msgheader">QUOTE:</div><div class="msgborder">以下是引用jx1680000在2007-4-8 19:08:17的发言： 在入单界面中加入控制按钮和控件对齐的视频没看明白（能否请版主重录一次视频并加入文字说明，加入控制按钮的步骤视频中看不到对话框）：１．我添加按钮后不能指定宏（指定宏命令为灰色）？２．控件对齐是如何选定两个按钮，设置格式的？　　　　　　　　　　我是笨鸟，谢谢版主不厌其烦的解答！<hr/>第一个问题不知是如何出现的，要了解具体情况，先确定在宏里是不是能找到你写的宏。第二个问题，在选项菜单中专门有一个控件对齐的工具，你找一找。</div>１．原来我是没录制宏，所以指定宏命令为灰色．不知如何去录制宏；我点击visual basic编辑器却不见对话框出现？　　　　　　　　　　　　　　　　　　　　　　　　　　　２．在选项菜单中没找到控件对齐的工具　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　３．能否将数据清空的宏单独写下来吗？　　　　　　　　　　　　　　　　　　　　　　　　以上三个问题能否请版主用视频演示并用文字说明每个步骤？这些步骤很重要．我工作中正需要制作这样的一个表格．非常需要您的帮助，谢谢！！！！

[此贴子已经被作者于2007-4-9 14:39:38编辑过]

jx1680000 · 发表于 2007-4-9 14:29

第二个问题：绘图工具栏—工具栏选项—添加删除按钮—绘图—选中多个对象 <img src="data/attachment/forum/dvbbs/2007-4/20074914292462528.gif" border="0" onclick="zoom(this)" onload="if(this.width>document.body.clientWidth*0.5) {this.resized=true;this.width=document.body.clientWidth*0.5;this.style.cursor='pointer';} else {this.onclick=null}" alt="" />

jx1680000 · 发表于 2007-4-9 14:41

Sub 清空数据()     If MsgBox("您将清空表单内的数据，请确认您的操作！", 64 + 4) = 6 Then         Range("C2,E2,B5:B9,E5:E9").ClearContents     End If End Sub这段代码一共是三个知识点： 1）IF的用法，这个前面说了。常用的有if ...then ...  if ...then  ...  end if    if ... then  ...  else  ...  endif 其它的 For Each 〈对象变量〉 In 〈对象集〉     〈语句块〉 Next 〈对象变量〉 有条件循环 do while ... loopDo While 〈条件表达式〉 〈语句块〉 Loop 计数循环 for x=a to b next xFor 〈变量〉=〈初值〉 To 〈终值〉 Step 〈步长〉 〈语句块〉 Next 〈变量〉 多条件选择 Function Bonus(performance, salary)     Select Case performance         Case 1             Bonus = salary * 0.1         Case 2, 3             Bonus = salary * 0.09         Case 4 To 6             Bonus = salary * 0.07         Case Is > 8             Bonus = 100         Case Else             Bonus = 0     End Select End Function

jx1680000 · 发表于 2007-4-9 14:47

2)msgbox MSGBOX("提示内容",对话框结构代码+显示图标代码，"对话框所显示出来的标题")对话框结构代码： 1：确定 2：取消 3：忽略 4：重试 5：终止 6：是 7：否 0：确定（只有）显示图标代码：64：代圈的感叹号 32：问号 16：红叉 48：三角感叹号

[此贴子已经被作者于2007-4-9 14:50:02编辑过]

WLL7611 · 发表于 2007-4-9 14:49

<div class="msgheader">QUOTE:</div><div class="msgborder">以下是引用WLL7611在2007-4-9 14:16:23的发言： <div class="msgheader">QUOTE:</div><div class="msgborder">以下是引用jx1680000在2007-4-8 19:08:17的发言： 在入单界面中加入控制按钮和控件对齐的视频没看明白（能否请版主重录一次视频并加入文字说明，加入控制按钮的步骤视频中看不到对话框）：１．我添加按钮后不能指定宏（指定宏命令为灰色）？２．控件对齐是如何选定两个按钮，设置格式的？　　　　　　　　　　我是笨鸟，谢谢版主不厌其烦的解答！<hr/>第一个问题不知是如何出现的，要了解具体情况，先确定在宏里是不是能找到你写的宏。第二个问题，在选项菜单中专门有一个控件对齐的工具，你找一找。</div>１．原来我是没录制宏，所以指定宏命令为灰色．不知如何去录制宏；我点击visual basic编辑器却不见对话框出现？　　　　　　　　　　　　　　　　　　　　　　　　　　　２．在选项菜单中没找到控件对齐的工具(此问题解决了）　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　３．能否将数据清空的宏单独写下来吗？　　　　　　　　　　　　　　　　　　　　　　　　以上三个问题能否请版主用视频演示并用文字说明每个步骤？这些步骤很重要．我工作中正需要制作这样的一个表格．非常需要您的帮助，谢谢！！！！ </div>

jx1680000 · 发表于 2007-4-9 15:01

Range("C2,E2,B5:B9,E5:E9").ClearContentsrange("具体的格子")这是在VBA里表示区域的方法，注意用""括起来，如果是一个格子，你写成，RANGE("C2")就可以了。如果是一个区域，你用RANGE("B5:B9")就可以表示了。如果是一些不连续的区域，就和题中一样，有“，”分开。不过要注意上面所有的写法都是在英文半角的情况下写，如是全角会出错。

jx1680000 · 发表于 2007-4-9 15:03

Range("C2,E2,B5:B9,E5:E9").ClearContentsClearContents是一个清除内容的命令，和CLEAR不同只清容，不清空格式。

jx1680000 · 发表于 2007-4-9 15:47

<img src="data/attachment/forum/dvbbs/2007-4/20074915471285345.gif" border="0" onclick="zoom(this)" onload="if(this.width>document.body.clientWidth*0.5) {this.resized=true;this.width=document.body.clientWidth*0.5;this.style.cursor='pointer';} else {this.onclick=null}" alt="" />

		自动登录	找回密码
密码			注册

[技巧] 仓库进销存表[“EXCEL应用技巧班”版块培训教程]

回复：（WLL7611）以下是引用jx1680000在2007-4-8 19:...