2022年2月18日金曜日

accessのクエリでパーセントを表示するには、Format([ 式],"0.0%")でいい。

 accessのクエリでパーセントを表示するには、Format([式],"0.0%")でいい。式にフィrールド名(必要ならテーブル名!を付ける)を書けばいい。

carrot


2022年2月8日火曜日

accessのフォームのテキストボックスに更新後処理のイベントプロシジャを設定する。

accessのフォームのテキストボックスに更新後処理のイベントプロシジャを設定する。

Private Sub 当月_AfterUpdate()
  With Me!当月
    msgBox Me!当月
  End With
end sub

2022年2月6日日曜日

access にexcelファイルの特定列をインポートするvbaコードを書いてみた。

access にexcelファイルの特定列(例えば、シート名が顧客リストのセルA2からc列まで)を顧客リストというテーブルにインポートするvbaコードを書いてみた。

Sub ImportExcel()
Dim file1 as String
  file1 = "C:¥Users¥username¥Documents¥importedEXCEL.xlsx"
  if DCount("*", "MSysObjects", "[Name] = '顧客リスト'") > 0 Then DoCmd.DeleteObject acTable,"顧客リスト"  ' 顧客リストがあれば削除する
  DoCmd.TransferSpreadsheet acImport,acSpreadsheetTypeExcel12Xml,"顧客リスト",file1,True,顧客リスト!A2:C
End Sub