設為首頁收藏本站Access中國

Office中國論壇/Access中國論壇

 找回密碼
 注冊

QQ登錄

只需一步,快速開始

返回列表 發(fā)新帖
查看: 1640|回復: 3
打印 上一主題 下一主題

[Access本身] 什么根據excel的工作表,批量建立空白表,字段名跟excel工作表一樣

[復制鏈接]
跳轉到指定樓層
1#
發(fā)表于 2024-6-18 16:36:10 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
500金錢
什么根據excel的工作表,在access中用VBA批量建立空白表,創(chuàng)建固定字段名字,可以用    Set 創(chuàng)建 = CurrentDb.CreateTableDef(表名)    創(chuàng)建.Fields.Append 創(chuàng)建.CreateField("序號", dbText)
    創(chuàng)建.Fields.Append 創(chuàng)建.CreateField("字段名1", dbText)
    創(chuàng)建.Fields.Append 創(chuàng)建.CreateField("字段名2", dbText)
    創(chuàng)建.Fields.Append 創(chuàng)建.CreateField("字段名3", dbText)
如何把字段名跟excel工作表的第一行一樣???也就是讀取excel的第一行,用來做字段名






分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享分享 分享淘帖 訂閱訂閱
2#
發(fā)表于 2024-6-23 20:54:50 | 只看該作者
直接導入不就好了么?或者批量鏈接excel表再生成表。
回復

使用道具 舉報

3#
 樓主| 發(fā)表于 2024-6-27 16:08:05 | 只看該作者
工作表有點多,一個一個導入花時間,需要批量的
回復

使用道具 舉報

4#
發(fā)表于 2024-11-17 02:43:35 | 只看該作者
寫個程序導入,請參考:http://m.mzhfr.cn/thread-121627-1-1.html
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 注冊

本版積分規(guī)則

QQ|站長郵箱|小黑屋|手機版|Office中國/Access中國 ( 粵ICP備10043721號-1 )  

GMT+8, 2025-7-13 08:10 , Processed in 0.108828 second(s), 25 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回復 返回頂部 返回列表