怎樣用excel寫一個程序
『壹』 excel使用VOOKUP函數,製作一個報價單簡易小程序
老闆讓製作一個報價單,當填入需求的時候,總報價就自動的計算出來了
1、物品較少的時候
製作的效果如下,我們只需要輸入物品和數量,單價和金額能夠自動的進行計算
這樣就能實現了在C3先輸入一個關鍵字,然後下拉菜單就是和這個關鍵字相關的內容了。
『貳』 如何利用Excel宏編寫一個小程序 求助,謝謝!
要是會VB,編VBA就簡單很多。
你的具體問題我沒有看,只是想說一些基本的東西。
EXCEL主要調用的是Sheet對象和Cell
(或者說是Range)對象。
例如,Sheet1中的單元格A2可以用Sheet1.cells(2,1)調用,也可以用Sheet1.Range("A2")進行調用。
『叄』 Excel 怎樣做一個小程序
如果運算不是很復雜,用excel自帶的公式就可以完成啦。
1.將計算邏輯寫清楚
2.發貼
3.等高手指點迷津
4.^_^
『肆』 如何在excel里寫程序,注意是程序!不是函數
VBA吧,把控制項調出來,畫一個按鈕,雙擊按鈕,就可以編寫代碼或者在sheet表上點擊右鍵,查看代碼。在裡面就可以編寫代碼了。
『伍』 我想要用excel編一個程序
第一個單元格:3,第二個單元格3;輸入兩個之後其餘的一拖都是3.
這是比較簡單,要是實現復雜的就要自己寫。比如A1中輸入2,你想在後面公比為2的等比數列,在A2中輸入=2*A1
回車後就會得到4,然後從這個單元格開始拖,後邊就會自動識別這個規律。這個稱之為相對引用。
『陸』 在Excel中編寫一個盡可能簡單的程序,自動生成指定年月的月歷
先打開excel工作表,打開之後單擊工作表左上角的office圖標。
『柒』 excel程序怎麼寫
0<X<10 X*1,2%,
10<=X<20 X*1,3%
=IF(AND(A1>0,A1<10),A1*1.2%,IF(and(a1>=10,a1<20),a1*1.3%,
後面的仿照著寫,
03版本只能寫7個條件,高級版本更多。
『捌』 請問怎麼用Excel中VBA編寫一個程序,根據系統時間問好求代碼,謝謝!
用hour取得當前的小時,然後根據這個判斷就好了,類似於
Sub sample()
Dim h, s
h = Hour(Now)
If h < 9 Then
s = "早上"
ElseIf h < 12 Then
s = "上午"
ElseIf h < 13 Then
s = "中午"
ElseIf h < 18 Then
s = "下午"
Else
s = "晚上"
End If
MsgBox s & "ºÃ"
End Sub
『玖』 怎麼把excel工作表做成程序
做成跟程序一樣的這個我不會,但是可以讓你把寫公式的單元格鎖住,就不會隨意被修改了。
1、全選工作表(CTRL+A),右鍵-設置單元格格式-保護-取消「鎖定」前面的勾子
確定。
2、按F5鍵-定位條件-公式
確定。
3、右鍵-設置單元格格式(或菜單欄上的格式-單元格)
保護-勾上「鎖定」-確定。
這是把寫上公式的單元格鎖住,其他的不鎖定
4、菜單欄上的「工具」-「保護」-「保護工作表」
密碼可以不輸入,
「允許此工作表的所有用戶進行」這些選項可根據實際需要勾選,默認是勾選
第一、二項
確定
現在,這些寫了公式的單元格就不會被隨意改動了,雙擊寫公式的單元格看看,是不是出現此提示:
需要修改公式就解除工作表的保護,修改後再保護工作表。
『拾』 怎麼編個簡單小程序,用EXCEL的數據調用資料庫把該EXCEL表打包進去。 50 如題,我想用一個E
用不到exe,小題大做了,使用vba代碼編個form就好了
將以下代碼寫入thisworkbook
Private Sub Workbook_Open()
Application.ScreenUpdating = False
Application.Visible = False
Application.WindowState = xlMinimized
UserForm1.Show
Application.ScreenUpdating = True
End Sub
按alt+f11打開vbe,插入用戶窗體,在用戶窗體界面上,拖入textbox1,和command1,在command1的下方,拖入label1,將command1的captain改成「查詢」,雙擊command1,將以下代碼復制進去
Private Sub CommandButton1_Click()
with userform1
wb = .textbox1.text
cz = thisworkbok.sheets("sheet1").usedrange.find(what:= wb)『這里sheet1是你的sheet _名稱
if not cz is nothing then
.label1.captain = '你的問題不全,這里就是你需要顯示的內容
end if
end with
end sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
ThisWorkbook.Close
End Sub
總結,在打開excel時,將其最小化,並打開vba窗體,以此顯示查詢內容,且將窗體關閉前先將excel關閉,以該種方式讓用戶查看不到excel文件內容。
最後,針對你的excel的sheet可以使用密碼保護的,就是在該sheet激活前,彈出inputbox驗證密碼,這也是一種方式呢