1樓：匿名使用者
利用worksheet.printout(1, 1, 1, false, , false, false, false, true)即可列印出當前工作表的第一頁。
worksheet.printout 方法 列印物件。
語法表示式.printout(from, to, copies, preview, activeprinter, printtofile, collate, prtofilename, ignoreprintareas)
表示式 乙個代表 worksheet 物件的變數。
引數名稱 必選/可選 資料型別 描述
from 可選 variant 列印的開始頁號。如果省略此引數，則從起始位置開始列印。
to 可選 variant 列印的終止頁號。如果省略此引數，則列印至最後一頁。
copies 可選 variant 列印份數。如果省略此引數，則只列印乙份。
preview 可選 variant 如果為 true，microsoft excel 將在列印物件之前呼叫列印預覽。如果為 false（或省略該引數），則立即列印物件。
activeprinter 可選 variant 設定活動印表機的名稱。
printtofile 可選 variant 如果為 true，則列印到檔案。如果沒有指定 prtofilename，microsoft excel 將提示使用者輸入要使用的輸出檔案的檔名。
collate 可選 variant 如果為 true，則逐份列印多個副本。
prtofilename 可選 variant 如果 printtofile 設為 true，則該引數指定要列印到的檔名。
ignoreprintareas 可選 variant 如果為 true，則忽略列印區域並列印整個物件。
返回值variant
說明from 和 to 所描述的「頁」指的是要列印的頁，並非指定工作表或工作簿中的全部頁。
示例此示例列印當前活動工作表。
activesheet.printout
2樓：
workbooks(1).printout(1,1) 類似這樣就可以了
workbook.printout 方法
列印物件。
語法表示式.printout(from, to, copies, preview, activeprinter, printtofile, collate, prtofilename, ignoreprintareas)
表示式 乙個代表 workbook 物件的變數。
引數名稱 必選/可選 資料型別 說明
from 可選 variant 列印的開始頁號。如果省略此引數，則從起始位置開始列印。
to 可選 variant 列印的終止頁號。如果省略此引數，則列印至最後一頁。
copies 可選 variant 列印份數。如果省略此引數，則只列印乙份。
preview 可選 variant 如果為 true，microsoft excel 將在列印物件之前呼叫列印預覽。如果為 false（或省略該引數），則立即列印物件。
activeprinter 可選 variant 設定活動印表機的名稱。
printtofile 可選 variant 如果為 true，則列印到檔案。如果沒有指定 prtofilename，microsoft excel 將提示使用者輸入要使用的輸出檔案的檔名。
collate 可選 variant 如果為 true，則逐份列印多個副本。
prtofilename 可選 variant 如果 printtofile 設為 true，則該引數指定要列印到的檔名。
ignoreprintareas 可選 variant 如果為 true，則忽略列印區域並列印整個物件。
3樓：真真真白丁
親，試一下這個：
activesheet.printout from:=1, to:=1
在 excel 中編輯巨集,怎樣實現列印當前工作表
4樓：毅子尚猛
利用worksheet.printout(1, 1, 1, false, , false, false, false, true)即可列印出當前工作表的第一頁。
worksheet.printout 方法 列印物件。
語法表示式.printout(from, to, copies, preview, activeprinter, printtofile, collate, prtofilename, ignoreprintareas)
表示式 乙個代表 worksheet 物件的變數。
引數名稱 必選/可選 資料型別 描述
from 可選 variant 列印的開始頁號。如果省略此引數，則從起始位置開始列印。
to 可選 variant 列印的終止頁號。如果省略此引數，則列印至最後一頁。
copies 可選 variant 列印份數。如果省略此引數，則只列印乙份。
preview 可選 variant 如果為 true，microsoft excel 將在列印物件之前呼叫列印預覽。如果為 false（或省略該引數），則立即列印物件。
activeprinter 可選 variant 設定活動印表機的名稱。
printtofile 可選 variant 如果為 true，則列印到檔案。如果沒有指定 prtofilename，microsoft excel 將提示使用者輸入要使用的輸出檔案的檔名。
collate 可選 variant 如果為 true，則逐份列印多個副本。
prtofilename 可選 variant 如果 printtofile 設為 true，則該引數指定要列印到的檔名。
ignoreprintareas 可選 variant 如果為 true，則忽略列印區域並列印整個物件。
返回值variant
說明from 和 to 所描述的「頁」指的是要列印的頁，並非指定工作表或工作簿中的全部頁。
示例此示例列印當前活動工作表。
activesheet.printout
5樓：傳說的魔法
看題目不是很清楚你的要求,如果不行的話請上附件最好
sub列印()
fori=1toworksheets.count
ifsheets(i).hpagebreaks.count+1>3then
msgbox"工作表名稱:["&worksheets(i).name&"]超過3頁,請重新編輯",vbokonly+vbinformation,"提示!":exitsub
endif
nexti
ifmsgbox("是否列印所有工作表?",vbokcancel,"請確定")=vbcancelthenexitsub
fori=1toworksheets.count
sheets(i).select
activewindow.selectedsheets.printout
nexti
endsub
6樓：**
excel 巨集實現列印 **提供
excel每次怎樣才能快捷列印工作表的第一頁，急求。除了頁數設定1-1頁這種方法。印表機設定，外掛程式等方法
7樓：匿名使用者
貌似只有vba能解決你的問題
請教，在excel vba中如何列印指定的工作表？謝謝。
8樓：刺友互
1、用重新命名方式將sheet5的名稱修改為了「測試表單」，但在vbaproject中，前面的名字依然叫sheet5。
2、點選 vbaproject下面的sheet3，下面對應出現sheet3的屬性，我們能夠看到屬性中 乙個叫「名稱」，就是工作表的codename，另外乙個name，就是平時大家所見的sheet 的名字。
3、在「名稱」屬性中輸入新的名稱，直接對codename進行修改。
4、工作表的codename就是工作表在vbe工程中所在部件的名稱，通過修改vbe工程中所在部件的名稱來達到修改工作表的codename的目的。
5、執行，輸入新的codename以後，系統給出提示「未信任到vb工程訪問，請在信任選項中勾選vb工程訪問」。
6、點選開發工具|巨集安全性，開啟巨集安全性配置視窗。
7、勾選「信任對vba工程物件模型的訪問」，然後點選確定。
8、重新執行，成功將sheet1修改為testaaa。
9樓：匿名使用者
假設想列印當前工作簿中的sheet2工作表，**如下：
sheets("sheet2").printout
10樓：天意
把你需要列印的內容選中，然後點列印，列印時選擇只列印選中內容！
11樓：陸陸阿缸
sheets(array("sheet1", "sheet2")).printout 可以將你要列印的合進去。
12樓：匿名使用者
請補充問題，什麼是vba？
請問在excel中怎麼樣用巨集實現列印計數和列印指定工作表（多個工作表）
13樓：匿名使用者
private sub commandbutton1_click()static clicktimes as integeractivesheet.printout '工作表列印clicktimes = clicktimes + 1 '計數end sub
14樓：匿名使用者
你指定的是哪個工作表，計數寫在**？
如何通過excel巨集功能實現列印選定內容
15樓：來自大雲山雙瞳剪水的小飛象
通過excel巨集功能實現列印選定內容的步驟如下：
1、首先我們先在桌面找到excel這個軟體並開啟。
2、然後我們再進入頁面布局這個選項卡。
3、我們可以看到有乙個選項叫做列印區域。
4、之後我們點選設定列印區域這個選項。
5、然後我們可以選擇需要列印的區域。
6、然後我們再點選列印這個選項，可以看到列印選項。
7、把列印選定工作表改為選定區域，然後預覽一下是不是自己剛才選擇的需要列印的區域就可以列印了。
16樓：嘉文四世丶威威
通過excel巨集功能實現列印選定內容的具體步驟如下：
1、首先開啟需要編輯的excel**，進入到編輯頁面中，開啟開發工具中的「插入」，選擇第乙個圖示。
2、然後框選出乙個按鈕，右鍵單擊該按鈕選擇開啟「指定巨集」。
3、然後在彈出來的視窗中點選開啟「編輯」選項。
4、然後在彈出來的視窗中點選輸入**如下：
sub 按鈕8_click()
for i = range('i1') to range('i2')range('h1') = i
activesheet.printout
next
end sub 輸完後，單擊按鈕即可。
在excel中如何實現數字的直接轉換，如我要把1轉換為0 36，2轉換為0 72，3轉換為1 08依此類推
先在另一工作表上輸入0.36，選擇複製，再回到你需要轉換的工作表，按下f5定位，再按 定位條件 然後選擇 常量 即可選中所有數字。再在包含這些數字的單元格中，右鍵選擇 選擇性貼上 然後選擇 運算 中的 乘 即可。要設計為程式，請將工作表發到rabbit2nd 163.com沒收到你的工作表，只好考慮...
怎樣在cs中實現對講
麥克風講話有什麼故障的話，解決方法如下 1 你的麥是好的嗎，是否插在音效卡的合適介面？2 開啟音訊屬性 雙擊螢幕右下方那個小喇叭 看是否有mic或micphone之類的一項，並且要開啟。這樣，你吹一吹麥，耳機會有聲音。沒有，請設定好為止。3 cs遊戲中，預設是k鍵講話，按k鍵，看螢幕是否有小喇叭出現...
在Excel中，若拖動填充柄實現填入按步長值1遞增等比數列資料，如按住Ctrl鍵，應先選中
個人認為這個題目出的應該是有問題的。30 在excel中，若拖動填充柄實現填入按步長值1遞增等比數列資料，如按住ctrl鍵，應先選中 看我加粗的 等比 兩個字，然後在看abcd四個選項，沒有乙個選項能達成填充出等比數列。只有答案a能填充出等差數列，所以我大膽揣測這題的本意應該是填充出步長值為1的等差...
在Excel中如何實現資料有效性檢查
如學生證號碼為9位，資料 有效性 自定義 if a1 身份證 len b1 18,if a1 軍官證 len b1 12,if a1 學生證 len b1 9 手機wps 中怎麼設定資料有效性，資料有效性控制資料長度。excel進行資料有效性該怎樣設定？excel進行資料有效性是頁面布局下的功能，需...
在EXCEL中怎樣將兩頁變成，在EXCEL中怎樣將兩頁變成一頁
1 在桌面裡將需要將兩頁變成一頁的 開啟，後點選 左上角的檔案選項。2 點選了檔案之後，在彈出來的下拉列表裡點選列印。3 點選了列印之後會彈出列印的各種設定，在裡面找到將工作表調整為一頁即可,點選了之後，就可以使兩頁的 變成一頁了。1.如圖，將 填好後，我們先預覽一下檔案，看是否所有專案都在一頁紙上...