A. 請問在Access里，如何自動生成這種編號
提供一個思路吧，在SQL Server 2008中測試。假設你這個表名叫Proct。
Declare @Type nvarchar(8)
Set @Type = 'A'
Declare @TypeCnt Int
Select @TypeCnt = COUNT(1) From Proct Where [產品類別] = @Type
Set @TypeCnt = @TypeCnt + 1
Insert into Proct Values (@Type,@Type + right(cast(power(10,4) + @TypeCnt as varchar),4))
每次你這樣插入，就會產生你要看到的那種產品號碼，相當於根據產品類型自動生成。只要只能產品類型A,就會自動生成一個編號。很久不用Access了。但是道理應該差不多。
B. 表單中的編號我用的是字母+數字的字元串，想問添加的時候字母設置讓他自動遞增添加
這樣可能比較麻煩，但是我沒想到其他好辦法。首先提取編號字元串"A0001"，然後將編號拆分為兩部分字元串"a" 和數字"1"，然後把數字"1"加1後，再轉變成字元串"0002"，和字元串"A"合並成"A0002"。
C. 學號0001自動編號怎麼弄
發發如下：
打開表格，選中要輸入學號的一列。
在工具欄中找到單元格格式。
單擊下拉菜單選擇文本。
此時就可以正常輸入學號0001了。
在所有學校里，前四位都是自己學校的學號代碼。在自己學校內，例如有的學校為年份+班級+編號，如20050603，表示該同學為2005年入學，在6班，編號為3號。有的學校還包含學院或專業的信息，如23050602，23表示該學校的某個專業或學院的編號，05表示2005年，06表示6班，02為班內編號。學號只是一個編號而已，只有在就讀的學校里才有用。還有的學校在學號的倒數第二位，用奇偶數來區分男女，偶數就代表女性，奇數就代表男性，這樣就容易區分某個人的性別！
D. 自動填充學號如0001這樣的
A列上的單元格還未真正是「常規」格式，因為只要看看單元格左上角的綠色小三角形就知道了。你試試雙擊這些有三角形的單元格後再退出，就能變成真正的「常規」格式了。
而且要實現快速向下按序列填充是有多種方法的，只是你的這些數字都太多位數了，所以如果用「常規」格式後再手工下拉的方法，結果就會以科學記數法去顯示，也就達不到你的要求了。以下給你幾個方法試試，但前提是已經將單元格的格式設置成「常規」：
1、在第1個單元格輸入：=200915410&row(a201)
再將公式向下拉填充復制就可以了；
2、在第1個單元格輸入：20091501
選中這個單元格後摁住CTRL鍵，再點擊單元格右下角的小黑點並向下拉填充復制就可以了；
3、在第1個單元格輸入：20091501 在第2個單元格輸入：2009102
同時選中這兩個單元格，再點擊單元格右下角的小黑點並向下拉填充復制就可以了。
4、在第1個單元格輸入：20091501
選中這個單元格，打開菜單「編輯」-「填充」-「序列」，點選「列」，在「終止值」輸入最後一個序號(如：200915410300)，點「確定」後就能一次生成所有序號。
註：除第1種方法能直接得到效果外，其他的3種方法雖然不用公式得到結果，但因數字位數太多，為了不變成科學記數法的顯示，可以通過第2步來達到與第1種方法的顯示效果。方法：選中這些單元格，打開菜單「格式」-「單元格」-「數字」-「自定義」，在「類型」中輸入：""#
保存後就是你要的效果了。
E. Word怎麼自動生成編號 Word自動生成編號方法
使用VBA，按Alt+F11鍵打開，插入一個新模塊，輸入代碼，我只能讓編號列印的時候累加，比如起始列印編號0001，列印第二張就變為0002，一直累加到9999，代碼如下：
Sub普通編號()
'
'
'
'
DimiAsInteger
DimdyAsInteger
OnErrorResumeNext
i=InputBox("請輸入起始數","起始數",1)-1
dy=InputBox("請輸入列印份數","列印份數",1)
Fordy=1TodyStep1
i=i+1
Ifi>=1000Then
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeTextText:=i
ActiveDocument.PrintOut
Else
Ifi>=100Then
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeTextText:="0"&i
ActiveDocument.PrintOut
Else
Ifi>=10Then
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeTextText:="00"&i
ActiveDocument.PrintOut
Else
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeTextText:="000"&i
ActiveDocument.PrintOut
EndIf
EndIf
EndIf
Nextdy
EndSub
F. Access資料庫自動生成訂單號
可以利用asp代碼生成，如果是資料庫端的話，應該是不可能的，自動編號不可能中間，不生成那些數字就直接跳過的。我寫了端代碼，你看下吧，可以不使用自動編號，就搞定你說的功能。數據表ordertable，訂單欄位ordernum。ordernum設置成文本類型。 dim num,mydate,year,month,day,sql
mydate=date()
year=year(mydate)
month=year(mydate)
day=year(mydate)if month<10 then
month="0"&month
end ifif day<10 then
day="0"&day
end ifmydate=year&month&day sql="select ordernum form ordertable where ordernum like"&mydate&"% order by ordernum desc"
set rs=execute(sql)
if rs.eof or rs.bof then
num=mydate&"001"
else
num=right(rs("ordernum"),3)
num=cint(num)
if num=999 then
response.write "今日的訂單號碼，超越上限。此訂單仍將有效，該訂單號將記錄為"&mydate&"1000，請管理員，盡快處理！"end if
num=num+1end if if num="001" thenresponse.write "訂單超量，此訂單將不能存儲，請與管理員聯系，管理員號碼為：XXXXXXXX"
else num=mydate&"num"
sql="insert into ordertable set ordernum='"&num&"'"
execute(sql) if err thenresponse.write"訂單保存出現錯誤，請重試！"err.clearend if
end if
G. excel自動編號問題。A為編號，B為名稱，要求A從0001往下排，凡是B相同的A的序號也一樣。 求公式！
按第一個圖列的順序，A2 輸入1，A3輸入：
=IF(COUNTIF($B$1:B2,B3)>0,INDEX($A$1:A2,MATCH($B$1:B2,$B$1:B2,0)),MAX($A$1:A2)+1)
如果反過來按第二個圖列順序的話，B2輸入1，B3輸入：
=IF(COUNTIF($A$1:A2,A3)>0,INDEX($B$1:B2,MATCH($A$1:A2,$A$1:A2,0)),MAX($B$1:B2)+1)