excel - Access VBAを使用して現在の日付を表示するようにExcelで日付をフォーマットする

Question

Access VBA で日付値をフォーマットして、現在の日付を Excel ファイルに表示しようとしています (そのために Access VBA コードを書いています)。ただし、Date() を使用しても効果はありません (Access 内でのみ機能すると思います)。たとえば、Cells(2, 3) = Date() を使用すると、日付ではなく数字「41039」が表示されます。Formatも試しましたが、うまくいきませんでした。私は Access VBA の初心者であり、上記の質問に対する回答をいただければ幸いです。

Answer 1

以前の形式が適用されていない限り、ほとんどの場合、日付は適切に形式化されて表示されます。

''Requires library reference 
Dim xl As Excel.Application

''Existing instance
Set xl = GetObject(, "Excel.application")

xl.Workbooks(1).ActiveSheet.Cells(2, 2) = Date
xl.Workbooks(1).ActiveSheet.Cells(2, 3) = 30
xl.Workbooks(1).ActiveSheet.Cells(2, 3).NumberFormat = "dd/mm/yyyy"