先望望一下动态效用图：日本av

图片

在普通使命中，数据录入是一项必不成少的任务。然则，未必咱们可能会不留神鼎新了原有的数据。

为了处置这个问题，咱们不错将数据录入界面和数据存储表分开确立。

具体圭臬如下：

咱们需要三张使命表

（1）录入界面：这是咱们的主要使命区域，用于输入数据。

图片

（2）数据表：用于存储已录入的数据。

图片

（3）居品与价钱表：包含居品称呼和对应的价钱等信息。

图片

接下来，咱们将详备考验若何制作录入界面：

一、制作下拉菜单

1、选中需要制作下拉菜单的单位格A2。

2、点击“数据”选项卡，然后遴选“数据考证”。

图片

3、在弹出的对话框中，遴选“序列”行动允许的类型，并在“起首”框中输入居品称呼的列表。

图片

4、点击“笃定”按钮，完成下拉菜单的制作。

二、竣事单价自动读取

在需要表现单价的单位格中输入以下公式：

=IFERROR(VLOOKUP(A2，信息表!A:B，2，0)，'')

图片

真义是：在“信息表”使命表的A列中查找与A2单位格本色所有匹配的值，若是找到了，就复返该行B列的值；

因为A2单位格是输入后，才表现单价，是以当A2是空值时发生失实，惟一VLOOKUP函数时会教导#N/A 。

图片

是以加IFERROR函数就让复返一个空值。

三、制作保存按钮

1、在“插入”选项卡中遴选“花样”，然后遴选一个心爱的花样（举例圆角矩形）行动保存按钮

图片

2、在录入表中绘图该花样，并确立填充色、花样概括等表情。

图片

3、右键点击花样，遴选“剪辑笔墨”，然后输入“保存”两字。

图片

4、选中“保存”两字，确立字体、大小，并使其居中表现。

图片

图片

四、编写自动保存的代码

咱们需要编写一段VBA代码来竣事数据的自动保存。

右键点击“录入界面”使命表标签，遴选“检察代码”，

图片

然后在代码窗口中输入以下代码：

图片

把代码复制到这里，你不错径直拷贝使用：

Sub 录入()

I = Sheets('数据表').Cells(Rows.Count， 1).End(xlUp).Row + 1

Sheets('数据表').Range('A' & I & ':D' & I) = [a2:d2].Value

[a2].ClearContents

[C2].ClearContents

End Sub

这段代码的作用是：找到“数据表”使命表的临了一瞥，并在其下一瞥插入从“录入界面”使命表的A2到D2单位格中输入的数据。

然后清空“录入界面”使命表的A2到C2单位格，以便下次输入。

五、将按钮与代码关系

右键点击保存按钮，遴选“指定宏”，然后在弹出的对话框中遴选咱们刚才编写的代码名（即“录入”）。点击“笃定”按钮。

图片

图片

这么你就不错进行数据的录入了。

萝莉抖音

六、保存文献

临了一步，别忘了将文献保存为启用了宏的使命簿花样（举例.xlsm），因为.xlsx文献是无法保存VBA代码的。

当今，你也曾学会了若何创建数据录入界面并竣事自动保存。

快去试试吧！并将这篇著作保藏起来以备备而无用日本av。

本站仅提供存储管事，通盘本色均由用户发布，如发现存害或侵权本色，请点击举报。