Accessã‹ã‚‰Excelファイルã®ãƒ‡ãƒ¼ã‚¿å–å¾—VBAã§ã®åˆ¶å¾¡ã«ãªã‚Šã¾ã™ãŒã€ Excelをインãƒãƒ¼ãƒˆã™ã‚‹ã«ã¯ã€ã€ŒTransferSpreadsheetã€ä½¿ã£ã¦ã€ã‚¤ãƒ³ãƒãƒ¼ãƒˆã§ãã¾ã™ã€‚ （Excelã‚’ãã®ã¾ã¾ã‚¤ãƒ³ãƒãƒ¼ãƒˆï¼‰ Excelã®é …目（セル）ã«è©²å½“ã™ã‚‹ãƒ†ãƒ¼ãƒ–ルを作æˆã—ã¦ãŠãã€ãã®ãƒ†ãƒ¼ãƒ–ルã¸ç›´æŽ¥ã‚¤ãƒ³ãƒãƒ¼ãƒˆã™ã‚‹ã“ã¨ãŒã§ãã¾ã™ã€‚ --- DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "インãƒãƒ¼ãƒˆå…ˆã®ãƒ†ãƒ¼ãƒ–ルå", "Excelã¸ã®çµ¶å¯¾ãƒ‘ス", , "シートå" --- ※シートåã¯ã€æŒ‡å®šã—ãªã‘ã‚Œã°ï¼‘シート目ãŒã‚¤ãƒ³ãƒãƒ¼ãƒˆã•ã‚Œã¾ã™ã€‚ ã‚‚ã—シートãŒè¤‡æ•°ã‚ã‚‹ã®ãªã‚‰ã€ADOã‹ã€DAOç‰ã§Excelã«æŽ¥ç¶šã—ã¦ã€ã€ŒTableDefs(0).Nameã€ã§ã€ã‚·ãƒ¼ãƒˆåã‚‚å–å¾—ã§ãã¾ã™ã€‚ --- 'â– Excelデータベースã¸æŽ¥ç¶š Dim xDB As Database Set xDB = O
{{#tags}}- {{label}}
{{/tags}}