標題:
[發問]
EXCEL SHEET複製及某欄位自動跳號
[打印本頁]
作者:
kwu1213
時間:
2015-3-5 08:55
標題:
EXCEL SHEET複製及某欄位自動跳號
問題1:
D1欄如填入12(不一定數),接著要複製SHEET 15張(不一定數)
這時D1欄會依SHEET一直跳到26(其餘欄位資料不動)
問題2:
B1欄如填入B0706(不一定數),第一個字一定是英文數字,接下來四位數字,
接著要複製SHEET 20張(不一定數)
這時B1欄會SHEET一直跳到B0725(其餘欄位資料不動)
用填入或按鈕方式皆可,不知是否複雜,有請高手回答,謝謝
[attach]20370[/attach]
作者:
kwu1213
時間:
2015-3-5 09:05
不好意思 C14欄(為39條碼)及D15需依數字也要變(請看公式)
作者:
mark15jill
時間:
2015-3-16 00:35
單一檔案 沒連結 沒其他檔案 ??
說明不清楚... 沒任何輔助說明....
文章寫的 輸入不一定數 複製 某頁(不一定數)
說真的 很難理解
作者:
changxxx
時間:
2015-3-16 06:10
Sub xx()
For i = 2 To 5
Sheets(i).Cells(1, 1) = Sheets(i - 1).Cells(1, 1) + 1
Next
End Sub
Sub xxx()
For i = 2 To 5
x = Left(Sheets(1).Cells(1, 1), 1)
y = Val(Right(Sheets(1).Cells(1, 1), 4)) + i - 1
Z = Format(y, "0000")
Sheets(i).Cells(1, 1) = x & Z
Next
End Sub
複製代碼
作者:
changxxx
時間:
2015-3-16 06:26
少看一句
不確定工作表
請改
For i = 2 To Sheets.Count
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)
