1樓：大徐哥
你的表述略有有矛盾，輸入17，結果怎麼會是9、9、9、1，即28呢？
我個人意見，不用程式設計，用公式可以實現
假設a1輸入貨物總噸位
b1向後，得到你想要的各車配載的重量
b1輸入公式
=if($a1/9>1,9,mod($a1,9))c1輸入公式
=if(($a1-sum($b1:b1))/9>1,9,$a1-sum($b1:b1))
c1公式向右複製
b1向後的公式，可以一起向下複製，以求得a列多個噸位的各個分配資料
2樓：
28在1行a列，要的資料在b1/c1/d1......等
在b1用下面的公式，右拉
=mid("123456789",min(9,$a$1-(column(a1)-1)*9),1)
3樓：匿名使用者
sub aaa()
if cells(1,1)<>17 then exit subaa = 29
bb = aa mod 9
cc = aa / 9
for x = 1 to cc step 1cells(2, x) = 9
next x
if bb > 0 then cells(2, cc + 1) = bb
end sub
在a1輸入17 然後執行程式，會在b1-b4格填入 9 9 9 1,也就是要拉4次才拉完。
不過不明白為什麼是輸入 17，另外9 9 9 1 應該是分四個格吧？你分兩個格我沒看懂是什麼意思。。。
關於excel裡VBA程式設計的問題，請教了
range b b copy range b b pastespecial xlpastevalues 數值化 選擇性貼上pastespecial 在a1中貼上值 cells 1,1 pastespecial xlpastevaluesandnumberformats 其中引數xlpastevalu...
請教會計問題，請教乙個會計問題
一般納稅人丟失已開具專用發票的發票聯和抵扣聯，如果丟失前已認證相符的，購買方憑銷售方提供的相應專用發票記賬聯影印件及銷售方所在地主管稅務機關出具的 丟失增值稅專用發票已報稅證明單 附件5 經購買方主管稅務機關審核同意後，可作為增值稅進項稅額的抵扣憑證 如果丟失前未認證的，購買方憑銷售方提供的相應專用...
c語言程式設計問題請教，C語言程式設計問題請教
veket的小號 已測試，正確 c free 4.1 mingw 3.4.5 veket的小號 include void trimfrnt char int main void trimfrnt char s include char trimfrnt char s void main char t...
請教excel函式問題，請教乙個Excel函式問題
在b表c2中輸入以下公式 if b2 100,vlookup a2,a表 a b,2,false vlookup a2,b表 a c,3,false vlookup a2,a表 a b,2,false 在a表的a列查詢a2，並返回對應的b列 2 資料 大單單價 資料區a b共兩列，a列為第1列，b列...
請教個excel問題
青槓林學校在a1 在b1中輸入或複製貼上下列公式 vlookup substitute a1,學校 表二 a b,2,0 把問題作為內容 郵件主題一定要包含 excel 本人以此為依據辨別非垃圾郵件，以免誤刪 excel樣表檔案 把現狀和目標效果表示出來 作為附件發來看下 yqch134 163.c...