vbaでmenuシートのセルA19にパラメタのセルが指定されていると仮定し、そのセルが空白でないか(指定されているか)を判定する方法は、こんな感じだ。
Sub parameterCheck() Dim paramSpecified As integer paramSpecified = 0 If WorkSheets("menu).Range("A10").Formula <>"" then paramSpecified = 1 End Sub
vbaでmenuシートのセルA19にパラメタのセルが指定されていると仮定し、そのセルが空白でないか(指定されているか)を判定する方法は、こんな感じだ。
Sub parameterCheck() Dim paramSpecified As integer paramSpecified = 0 If WorkSheets("menu).Range("A10").Formula <>"" then paramSpecified = 1 End Sub
vbaでsqlを使う時の小さいけれども大事なこと。
'(1) strSQL = "" strSQL = strSQL & " SELECT " strSQL = strSQL & "*" strSQL = strSQL & " FROM MEMBERS;" '(2) strSQL = "" strSQL = strSQL + " INSERT " strSQL = strSQL & " (NO,NAME) " strSQL = strSQL & " VALUES(1,'田中');"