excel假如單元格里有指定文字則？舉例說明：需要判斷出，每個單元格中是否含有“5”這個數(shù)字。如果有“5”顯示為“Y:A11)),Yexcel有一個單元格，下拉有YES和NO兩個選項，默認是YES，如

excel假如單元格里有指定文字則？

舉例說明：需要判斷出，每個單元格中是否含有“5”這個數(shù)字。如果有“5”顯示為“Y:A11)),Y

excel有一個單元格，下拉有YES和NO兩個選項，默認是YES，如何通過VBA將這個選項值改為NO？

數(shù)據(jù)--數(shù)據(jù)有效性--設(shè)置--有效性條件的下面,允許選擇序列,并將來源改為y

在excel表格里如何設(shè)置yes和no？

在excel表格里設(shè)置成yes和no，可用數(shù)據(jù)有效性來添加。

打開exc

excel怎么制作收銀表格？

第一步 設(shè)計軟件界面

一共5個窗體

1 登錄界面

2 主界面

3 會員存款

4 收銀報表

5 進度條

第二步 寫代碼及功能界面微調(diào)

VB代碼和VBA有些區(qū)別。我按學(xué)習(xí)VBA的思路來進行編輯的。中間走了很多彎路。查詢也只能單條件進行。導(dǎo)致軟件運行速度慢。

1 登錄窗體

新建窗體，畫2個標(biāo)簽和2個文字框 2個按鈕

Private Declare Function GetUserName Lib #34advapi32.dll#34 Alias #34GetUserNameA#34 (ByVal lpbuffer As String, nSize As Long) As Long

Private Sub CMD_CANCEL_Click()

End

#39Unload Me

End Sub

Private Sub CMD_YES_Click()

Unload Me

MsgBox #34登錄成功!#34, vbInformation

End Sub

Private Sub Form_Load()

Dim sBuffer As String

Dim lSize As Long

sBuffer Space$(255)

lSize Len(sBuffer)

Call GetUserName(sBuffer, lSize)

If lSize gt 0 Then

Me.Text1.Text Left$(sBuffer, lSize)

Else

Me.Text1.Text vbNullString

End If

End Sub

效果：運行后在文字框1自動列入計算機當(dāng)前用戶名，點擊確定卸載登錄框顯示登錄進度條和主界面；點擊退出退出系統(tǒng)。