excel創造窗體向導

❶ 怎樣在EXCEL中創建一個錄入窗口

1、首先打開excel軟體並輸入相關信息。

❷ 2010版EXCEL中怎麼使用窗體

從EXCEL2003以後的版本，都存在這個問題：雙擊已有的工作簿，都只在一個窗口中打開。這個過程其實只是打開了一次EXCEL程序，而其他工作薄只是在不同窗口中調用。
解決辦法：（無需其他設置，只是再打開一個EXCEL程序即可）
1、雙擊已存在的工作薄，此時將找開一個EXCEL程序；
2、使用「開始」菜單或桌面上的EXCEL快捷圖標（不是已有的工作薄文件），此時會自動新建一個空白的EXCEL，再把你的第二個已經存在的工作薄拖到這個窗口中。（此時這兩個工作薄是在不同的兩個窗口中）
3、如果還想使用第三個窗口打開第三個工作薄，則重復上面的第2步，即可。

（原理：每打開一次excel程序，即新建了一個窗口）

❸ Excel 如何實現用窗體錄入數據到指定的單元格

1、在自己的電腦上打開EXCEL表格

❹ 創建報表與窗體的數據源有哪些

在9.0的幫助文件中

Access/Excel (DAO)
此選項用於連接到所支持的資料庫類型（Access、dBASE、Excel、Lotus 等）。可以使用「建立新連接」選項創建新的連接。

Crystal 查詢
此選項用於瀏覽查詢文件 (.qry)。

資料庫文件
此選項顯示一組位於本地的標准 PC 資料庫。可以使用「查找資料庫文件」用「打開」對話框瀏覽 PC 資料庫。

字典/Infoview
此選項用於查找字典（.dct 或 .dc5）或 infoview (.civ) 文件。

ODBC (RDO)
此選項顯示經過配置可供使用的 ODBC 數據源列表。

OLAP
此選項用於打開「Crystal OLAP 連接瀏覽器」，便於您將 OLAP 多維數據集選作數據源。

OLE DB (ADO)
此選項顯示經過配置可供使用的 OLE DB 提供程序列表。也可以指定要使用的 Microsoft 數據鏈接文件。

更多數據源
此選項顯示可通過本機驅動程序訪問的其他數據源的列表。

❺ excel如何創建用戶窗體

下面，創建一個簡單的用戶窗體，用於輸入「入職員工信息」數據。
設計用戶窗體
下表是個簡單的「入職員工信息」資料庫，用戶窗體用於收集信息並將數據信息保存到該資料庫中。

打開VBE，插入用戶窗體，默認名為UserForm1。按下表在用戶窗體中添加控制項並設置屬性。

完成的用戶窗體如下圖所示。

編寫代碼
1 編寫找到資料庫工作表中下一個空白行的代碼
在VBE中，插入一個類模塊，並命名為cExcelUtils，輸入下列代碼：
Function FindEmptyRow(ws As Worksheet) As LongDim lngReturn As LonglngReturn = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).RowFindEmptyRow = lngReturnEnd Function
2 編寫代碼以包含每個員工信息的值，以及存儲資料庫工作表的位置，將數據保存到資料庫
插入一個類模塊，並命名為cEmployeeInfo，添加下面的代碼在模塊的聲明部分：
Private m_lngID As LongPrivate m_strName As StringPrivate m_strSchool As StringPrivate m_blnAbility As BooleanPrivate m_blnObey As BooleanPrivate m_xlWksht As WorksheetPrivate m_oXL As cExcelUtils
前5個變數是我們在用戶窗體中要輸入的數據，以及從資料庫工作表中產生的ID欄位。變數m_xlWksht包含資料庫工作表的位置。變數m_oXL決定在哪裡放置新數據。
首先，添加數據屬性。
Property Get ID() As LongID = m_lngIDEnd Property Property Get Name() As StringName = m_strNameEnd Property Property Let Name(newName As String)m_strName = newNameEnd Property Property Get School() As StringSchool = m_strSchoolEnd Property Property Let School(newSchool As String)m_strSchool = newSchoolEnd Property Property Get Ability() As BooleanAbility = m_blnAbilityEnd Property Property Let Ability(newAbility As Boolean)m_blnAbility = newAbilityEnd Property Property Get Obey() As BooleanObey = m_blnObeyEnd Property Property Let Obey(newObey As Boolean)m_blnObey = newObeyEnd Property Property Get DBWorkSheet() As WorksheetSet DBWorkSheet = m_xlWkshtEnd Property Property Set DBWorkSheet(newSheet As Worksheet)Set m_xlWksht = newSheetEnd Property
注意，ID屬性沒有Property Let方法，因此該屬性是只讀的。
下面，添加GetNextID方法找到最後一行，從第一列中獲取值，然後增加1，以此來設置ID屬性的值。
Public Function GetNextID() As LongDim lngReturn As LonglngReturn = m_xlWksht.Cells(Rows.Count, 1).End(xlUp).Value + 1m_lngID = lngReturn '設置ID屬性 GetNextID = lngReturnEnd Function
接下來，添加初始化和清除代碼：
Private Sub Class_Initialize()Set m_oXL = New cExcelUtilsEnd Sub Private Sub Class_Terminate()Set m_oXL = NothingEnd Sub
再繼續完善該類的功能。先添加一些驗證代碼。如果Name屬性和School屬性沒有數據的話，則不會保存記錄。
Public Function ValidateData() As BooleanDim blnReturn As BooleanIf (Len(Me.Name & "") * Len(Me.School & "")) = 0 ThenblnReturn = FalseElseblnReturn = TrueEnd IfValidateData = blnReturnEnd Function
通過文本值的長度相乘，能夠決定是否填充數據。
接下來，編寫保存功能的代碼。需要知道下一個可用行的行號為數據輸入，需要知道該行所在的工作表，並且如果沒有錯誤，返回True。
Public Function Save() As BooleanDim lngNewRowNum As LongDim blnReturn As Boolean If m_xlWksht Is Nothing ThenblnReturn = FalseGoTo Exit_FunctionEnd If lngNewRowNum = m_oXL.FindEmptyRow(m_xlWksht) With m_xlWksht.Cells(lngNewRowNum, 1).Value = Me.ID.Cells(lngNewRowNum, 2).Value = Me.Name.Cells(lngNewRowNum, 3).Value = Me.School.Cells(lngNewRowNum, 4).Value = Me.Ability.Cells(lngNewRowNum, 5).Value = Me.ObeyEnd With If Err.Number = 0 ThenblnReturn = TrueEnd If Exit_Function:Save = blnReturnExit FunctionEnd Function
代碼首先檢查以確保工作表對象存在，如果不存在則返回False並退出函數。接下來，從cExcelUtils對象中獲取空行位置。然後，使用代表資料庫工作表的m_xlWksht變數，使用從類屬性中的數據填充每列。最後，檢查沒有發生錯誤，設置返回值為True，然後退出函數。
這就是cEmployeeInfo類，包含從用戶窗體中的輸入值，為任何新記錄找到下一個ID值，保存數據到工作表中下一個空行。
編寫用戶窗體代碼
在用戶窗體代碼模塊中添加下列模塊級變數：
Private m_oEmployeeInfo As cEmployeeInfoPrivate m_blnSaved As Boolean
變數m_blnSaved存儲從m_oEmployeeInfo對象的Save方法中返回的值。下面，編寫用戶窗體初始化和中止事件代碼：
Private Sub UserForm_Initialize()Set m_oEmployeeInfo = New cEmployeeInfoSet m_oEmployeeInfo.DBWorkSheet = Sheets("入職員工信息")m_oEmployeeInfo.GetNextIDlblID.Caption = m_oEmployeeInfo.IDm_blnSaved = FalseClearFormEnd Sub Private Sub UserForm_Terminate()Set m_oEmployeeInfo = NothingEnd Sub
在用戶窗體初始化時，實例化oEmployeeInfo對象，然後設置DBWorksheet屬性。然後，獲取下一個可用的ID號並將其放置到標簽中。也清除了窗體中的控制項值。
Private Sub ClearForm()Me.txtName.Value = ""Me.txtSchool.Value = ""Me.chkAbility.Value = FalseMe.chkObey.Value = FalseEnd Sub
用戶窗體中有三個命令按鈕：一個用於保存輸入的數據，一個用於清除用戶窗體數據並添加新記錄，一個用於取消數據輸入操作並且不保存數據而關閉用戶窗體。
「保存」按鈕應該執行下列功能：
發送數據到cEmployeeInfo類
驗收數據，如果數據無效則返回一條消息
如果數據有效則保存數據，並且如果保存成功則返回一條消息
保存後清除用戶窗體數據，並重設保存標志
代碼如下：
Private Sub cmdSave_Click()With m_oEmployeeInfo.Name = txtName.Text.School = txtSchool.Text.Ability = chkAbility.Value.Obey = chkObey.ValueEnd WithIf Not m_oEmployeeInfo.ValidateData ThenMsgBox "姓名和畢業院校必填", vbOKOnly, "不能保存"Exit SubElsem_blnSaved = m_oEmployeeInfo.SaveEnd IfDoAfterSave m_blnSavedEnd Sub
過程DoAfterSave用於執行清理。
Private Sub DoAfterSave(success As Boolean)If success ThenClearFormlblID.Caption = m_oEmployeeInfo.GetNextIDMsgBox "記錄已保存"ElseMsgBox "沒有保存記錄"End Ifm_blnSaved = False '重設標志End Sub
「新建」按鈕的代碼如下，在新建之前，檢查文本欄位看用戶窗體中是否有任何數據：
Private Sub cmdNew_Click()'為新記錄設置窗體 Dim iAnswer As Integer'檢查當前記錄是否被保存 If Not m_blnSaved Then '是否有輸入的文本沒有被保存 If (Len(Me.txtName.Value & "") + Len(Me.txtSchool.Value & "")) <> 0 TheniAnswer = MsgBox("有沒有保存的數據,想繼續嗎?", vbYesNo, "沒有保存數據")If iAnswer = vbYes ThenClearFormEnd IfElseClearFormEnd IfEnd IfEnd Sub
「取消」按鈕用來清除用戶窗體並關閉該用戶窗體：
Private Sub cmdCancel_Click()ClearFormUnload UserForm1End Sub
現在，運行用戶窗體來看看效果。

❻ 怎麼在excel中調出窗體工具欄

1、首先, 添加 "Excel 開發工具" 選項卡。我們打開一個新的工作表, 並在左上角找到 office 按鈕。單擊它, 然後選擇下面的 Excel 選項。

❼ 2010版的excel中窗體選項在哪裡

剛換10版吧？

在開發工具可以找到控制項

❽ 怎樣製作EXCEL帶工作表和錄入數據的窗體

是製作的按鈕。
有多種方法製作按鈕。從圖上來看，應該是窗體的按鈕。
視圖－工具欄－窗體。選擇「按鈕」，然後在窗體帶出。
按鈕要起作用，還必須連接到宏（指定宏），宏可以錄制產生，也可以用VBA編制。這方面你要學習些VBA知識。

❾ 如何創建excel工作表窗體

alt+F11
插入--用戶窗體

❿ 在excel中建立用戶窗體求N!怎麼做

• 1

• 在工作表界面按下組合快捷鍵Alt+F11進入VBA編輯環境，如下圖所示

•