1樓：匿名使用者
option explicit
sub spliteveryfivepagesasdocuments()
dim osrcdoc as document, onewdoc as document
dim strsrcname as string, strnewname as string
dim orange as range
dim nindex as integer, nsubindex as integer, ntotalpages as integer, nbound as integer
dim fso as object
const nsteps = 5 ' 修改這裡控制每隔幾頁分割一次。
set fso = createobject(""
set osrcdoc = activedocument
set orange =
ntotalpages =
wdcollapsestart
for nindex = 1 to ntotalpages step nsteps
set onewdoc =
if nindex + nsteps > ntotalpages then
nbound = ntotalpages
elsenbound = nindex + nsteps - 1
end if
for nsubindex = nindex to nbound
"\page").
next nsubindex
strsrcname =
strnewname = nindex \ nsteps + 1) &
strnewname
false
next nindex
set onewdoc = nothing
set orange = nothing
set osrcdoc = nothing
set fso = nothing
msgbox "結束！"
end sub
2樓：匿名使用者
你如果只有這一個檔案需要這樣處理的話，還是老老實實的手工操作，複製-貼上，120個也是挺快的，比編個程式快哦，，，當然了，如果這種活經常要做的話，編個小程式還是挺好的。
vba是什麼？
3樓：小牛仔
主要能用來擴充套件windows的應用程式功能，特別是microsoft office軟體。它也可說是一種應用程式視覺化的 basic 指令碼。
固有常量。固有常量是程式設計時引用的物件庫定義的常量。所有固有常量都可以在巨集或vba**中使用。通常，固有常量通過前兩個字母來指明定義該常量。
來自vb庫的常量則以「vb」開頭。來自access的常量以「ac」開頭。可以使用物件瀏覽器來檢視所有物件庫中的固有常量列表。
在vba中，常量的資料型別有整型、長整型、單精度型、雙精度型、位元組型、貨幣型、字元型、日期型和邏輯型。一個整型資料就是一個整型常量，一個長整型資料就是一個長整型常量。
4樓：蘆筍君
應用程式共享一種通用的自動化語言。
excel vba的問題？ 160
5樓：陽光上的橋
程式**：?
測試資料：?
執行**後的資料：
測試說明程式符合要求，如果原資料分佈在不同區域，只需要修改e1:e3處的**為實際區域即可。程式**的文字如下：
option explicit
sub 巨集1()
dim r as range, a, t, s, i
for each r in range("e1:e3").cells
a = split(r, "
s = for each t in split(a(0),for i = 1 to 3
if i < 3 or t < 6" then
s = s & i & t &
end if
next i
next t
s = left(s, len(s) -1) &a(1)
r = snext r
end sub
6樓：匿名使用者
已知會不會沒序或者差超過10
vba**問題？
7樓：陽光上的橋
語法錯誤的原因：&的前後需要新增空格，下面這樣可以通過語法檢查：
後面還有類似的語句。
此外str1=""的初始化語句應該放在迴圈的前面；
還有，反覆迴圈中訪問cells(i,2)會造成**很慢，一般應該先提取到變數再訪問。
vba是什麼？？
vba是幹什麼用的
8樓：匿名使用者
微軟決定讓它開發出來的應用程式共享一種通用的自動化語言---visual basic for application(vba),可以認為vba是非常流行的應用程式開發語言visual basic 的子集。實際上vba是寄生於vb應用程式的版本。
9樓：創作者
vba是visual basic for applications的縮寫，他是針對應用程式的函數語言程式設計，與其他程式語言不同的是他生存的程式設計環境沒有編譯過程，只是執行函式過程。
在語言原理上是從vb語言演變而來，語法大部分與vb想通。
vba把**的類叫做模組，把可執行**片段叫做巨集，跟c++裡面的巨集有所區別。
vba普遍應用於microsoft office應用中，開啟office應用程式，如word\excel等，按住alt+f11就會進去vba**模組，access直接選擇模組，進入程式設計介面或者設計窗體、報表選擇工具欄上的**按鈕進入**模式。
vba的函數語言程式設計舉例：
1. 對字串第三位開始取5位數，vba表示如下：
mid(string,3,5)
2. 執行內部sql語句，把sql語句存放在runsql巨集。
「runsql名稱」
3. 窗體全屏。
關於excel vba
幫忙看看這個excel的功能如何用vba來實現！
10樓：陽光上的橋
下面用盡量簡單的**實現，自定義一個函式來統計有效備註數量，**寫到模組裡面，如下圖：
然後工作表就可以使用這個函式了，如下圖：
當然這個公式是可以下拉的，而且引數可以隨意寫。
最後，程式**文字為：
option explicit
function 有效備註數量(byval s$) as longdim n&, t, i&
for each t in split(replace(s, "
t = replace(t, "
i = instr(t, "
if i = 0 then i = len(t)if i > 6 then n = n + 1next t
有效備註數量 = n
end function
DSP IQmath中IQ是什么的縮寫，求助達人
iq不是什麼的縮寫，其中q是定點格式，浮點進行定點處理時一般有q格式和s格式，dsp採用q格式。那個字母i表示32位的dsp的標號，16位的dsp前面沒有字母i，所以字母i可以理解為增強型increase，即32dsp是16位dsp的增強型，然後定點格式就用iq表示。iqmath 智慧數字庫 iq ...
現在伺服器用的最多的linu作業系統是什麼系統
網天絡地 linux作業系統是一套免費使用和自由傳播的類unix作業系統，是一個基於posix和unix的多使用者 多工 支援多執行緒和多cpu的作業系統。linux作業系統能執行主要的unix工具軟體 應用程式和網路協議，支援32位和64位硬體，並繼承了unix以網路為核心的設計思想，是一個效能穩...
在沒有作業系統的時候。程式設計是靠什么來實現的
沒有作業系統的時候,大多都是操作計算機硬體,與計算機硬體打交道的一般用匯編控制邏輯,組合語言 用二進位制的形式儲存在cpu上面,所以用匯編 程式設計就可以控制計算機硬體,在沒有作業系統的情況下也可以操作電腦,只不過非常麻煩,也很抽象,在沒有作業系統的情況下,程式設計的時候的使用一種特殊的平臺來 寫 ...