1樓：匿名使用者
如果其它單元均可不變(包括專案名稱和專案金額），則按以下步驟進行
按alt+f11，開啟vba編輯器，單擊選單「插入→模組」，在**視窗中貼上下列**：
sub 批量提取資料有效性下拉列表專案並列印()
dim rcell as range
dim arr, m
on error resume next
set rcell = worksheets("專案申報表").range("b3")』這裡的表名稱請自行修改
'將單元格中的資料有效性序列提取到陣列
with rcell.validation
if .type = 3 then
if range(.formula1) is nothing then
'當資料有效性序列的**不是單元格區域時
arr = split(.formula1, ",")
else
arr = range(.formula1).value
end if
'批量列印
if isarray(arr) then
for each m in arr
if m <> "" then
rcell.value = m
worksheets("專案申報表").printout』這裡的表名稱請自行修改
end if
next
else
rcell.value = arr
worksheets("專案申報表").printout』這裡的表名稱請自行修改
end if
end if
end with
end sub
』執行後即可將每個單位的頁依次列印出來。
2樓：匿名使用者
替換後點列印，是否可以
在excel建了乙個巨集，怎麼改變單元格的顏色？
3樓：路路通
在excel建了乙個巨集，按以下方法改變單元格的顏色：
cells(4, 6).offset(0, 1).interior.color = cells(4, 6).interior.color
上面vba執行後則將（4，6）單元格的顏色向右偏移一格填充（4，6）顏色
將（0，1）換成（0，-1）則是向左偏移填充顏色 。
執行下面的巨集**：
sub a()
for i = 2 to 100 '假設有99行要塗色的資料
if cells(i, 3) <> "" then
cells(i, 3).offset(0, 1).interior.color = cells(i, 3).interior.color '向右的乙個單元格填充顏色；
cells(i, 3).offset(0, 2).interior.color = cells(i, 3).interior.color '向右的第二個單元格填充顏色；
cells(i, 3).offset(0, -1).interior.color = cells(i, 3).interior.color '向左的乙個單元格填充顏色；
cells(i, 3).offset(0, -2).interior.color = cells(i, 3).interior.color '向左的第二個單元格填充顏色；
end if；
next；
end sub。
4樓：綠衣人敲門
cells(4, 6).offset(0, 1).interior.color = cells(4, 6).interior.color
上面vba執行後則將（4，6）單元格的顏色向右偏移一格填充（4，6）顏色
將（0，1）換成（0，-1）則是向左偏移填充顏色
執行下面的巨集**
sub a()
for i = 2 to 100 '假設有99行要塗色的資料
if cells(i, 3) <> "" then
cells(i, 3).offset(0, 1).interior.color = cells(i, 3).interior.color '向右的乙個單元格填充顏色
cells(i, 3).offset(0, 2).interior.color = cells(i, 3).interior.color '向右的第二個單元格填充顏色
cells(i, 3).offset(0, -1).interior.color = cells(i, 3).interior.color '向左的乙個單元格填充顏色
cells(i, 3).offset(0, -2).interior.color = cells(i, 3).interior.color '向左的第二個單元格填充顏色
end if
next
end sub
5樓：太極健
多少個單元格也是一樣的，把你的**貼上來看下呀一句話的事
selection.interior.color = 5296274或selection.
interior.colorindex = 8把後面的顏色改成你要的顏色就行了，不管你乙個單元格還是多個單元格，你選幾個執行巨集，就把這幾個單元格填充了顏色
excel 怎樣在某一單元格的資料改變後自動執行乙個巨集
6樓：愚人談娛樂
1、先選中要轉換格式的乙個單元格，記住一定要先選中它，然後點選錄製巨集。
2、開啟錄製巨集對話方塊，你可以給巨集起乙個名字，幫助你以後使用的時候方便，將其儲存在個人巨集中，然後點選確定按鈕
3、接下來我們幾開始錄製巨集了，右鍵單擊已經被選中的單元格，在右鍵選單中選擇：單元格格式
4、選擇一批想要轉換格式的資料，如圖所示，然後點選工具欄上面的【巨集】就可以了。
7樓：excel辦公實戰
某一單元格的資料改變後自動執行乙個巨集一般使用工作表的change事件來處理。
舉例如下：例如a1單元格的內容，發生變化，則彈窗顯示a1的值已改變，現在是多少
具體**如下：
private sub worksheet_change(byval target as range)
'只有a1單元格的值改變才會執行
if target.address = "$a$1" then'彈窗顯示資訊
msgbox "a1單元格的值已改變，現在是" & targetend if
end sub
8樓：匿名使用者
用vba的事件**：
private sub worksheet_change(byval target as range)
'內容end sub
excel中，怎樣乙個單元格輸入內容後另乙個同時自動顯示出來？
9樓：匿名使用者
excel中，乙個單元格
輸入內容後另乙個同時自動顯示具體操作步驟如下：
一、第一步，先開啟excel，接下來選擇乙個內單元格例如：c4，點選資料——資料有效性，如下圖所示。
二、第二步，接下來彈出框框，然後在允許下面選擇序列，接下來在**上面填寫所需的選擇內容，用小寫的逗號（,）隔開，容例如黃色,紅色,綠色,藍色，如下圖所示。
三、第三步，接下來在f、g列上分別填寫顏色及事物，並且要左右一一對應，如下圖所示。
四、第四步，在你所需跟著變換的單元格上填寫公式（例如d4）：=vlookup($c$4,$f:$g,2,0)，按回車鍵，如下圖所示。
五、第五步，在c4選擇顏色，接下來對應的事物就自動在d4中顯示出來，如下圖所示。
六、第六步，完成效果圖，如下圖所示。
10樓：匿名使用者
這個可以用公式
來來完成,比如在
自a1單元格寫入某內容,在baib100單元du格中顯示a1單元格的內容,則預先在zhib100單元格中寫入公式dao
=a1或
=if(a1="","",a1)
比如"怎樣在sheet1中乙個單元格（比如f12）輸入內容後sheet2中的乙個單元格（比如f12或其他）同時自動顯示出來？"
則在sheet2工作表的指定單元格寫入公式=sheet1!f12
或=if(sheet1!f12="","",sheet1!f12)
11樓：匿名使用者
可以直來接用公式實
現。假設**如下自，a列用於輸入原數字，b列為計算原則，c列自動顯示a列數字經過b列計算過程之後的結果。
第一步：在c2中輸入公式「=if(a2="","",a2)」，c3輸入「=if(a3="","",a3*a3)」,c4輸入「=if(a4="","",a4*a4*a4)」(也可以根據需要輸入其他公式)
第二步：在a列隨便輸入數字，c列自動顯示計算結果。
12樓：匿名使用者
在sheet2表的f12中輸入如下內容:
=sheet1!f12
然後在sheet1的f12中輸入內容,則在sheet2表中就可以得到同樣內容.
13樓：匿名使用者
這很bai簡
方法一：1、選中sheet2中的
duzhif12單元格
按「dao=」
2、再按sheet1（表的標籤）
3、再按sheet1中的f12單元內格，再來一下回容車鍵就ok了。
公式欄中應該顯示 =sheet1!f12
方法二：直接在表二的f12中輸入公式=sheet1!f12如果你還想使sheet2中的f13等於sheet1中的f13拉填充柄等下填充吧
14樓：取個名兒也難
這很簡單
方法一：1、選中sheet2中的f12單元格按「=」2、再按sheet1（表的標籤）
3、再按sheet1中的f12單元格，再來一下回車鍵就ok了。
公式欄中應該顯示 =sheet1!f12
方法二：直接在表二的f12中輸入公式=sheet1!f12如果你還想使sheet2中的f13等於sheet1中的f13拉填充柄往下填充吧
15樓：匿名使用者
單元格引用啊：
sheet2中的f12中輸入＝sheet1！f12（中間的感嘆號不是直接輸入，而是呼叫的結果。）
至於怎麼呼叫（引用），查網上教程吧。
在excel中如何讓某一單元格中的乙個資料隨另外一**中的某個資料變化而變化？
16樓：
在乙個**中輸入="另乙個格"
比如想讓b1隨a1變化，在b1格內輸入=a1
然後下拉所有格，就一一對應了。
17樓：匿名使用者
寫好公式，公式中呼叫另乙個**的資料
18樓：
在結果的單元格輸入 =，然後點選另外的單元格即可
19樓：匿名使用者
=「第乙個單元格」&「-"&"第二個單元格」即：=a1&「-」&b1最終效果是：a1單元格內容——b1單元格內容舉例：
希望達到 蘇州傑銳思自動化裝置****-專案部-001 的效果，步驟如下：
a1單元格內容：蘇州傑銳思自動化裝置****；b1單元格內容：專案部；c1單元格內容：001
插入新的一列：寫入=a1&"-"&b1&"-"&c1最終即可得到結果：蘇州傑銳思自動化裝置****-專案部-001
excel中單元格中的值與多個單元格的值對比是否相同（如圖）
你說的問題和單元格的絕對位址與相對位址有關。如用a1的值乘以b列的值，結果放在c列 在c1裡寫 a 1 b1 然後向下複製。這時，你會看到 c2的內容 a 1 b2 也就是，公式中a1我們使用了絕對位址 a 1，在拖地複製的過程中它不會改變，b1我們使用的是相對位址，向下複製時，行號會自動改變。使用...
excel如何使單元格內值增加，excel 如何使單元格內值增加
空單元格中輸入 120 複製，選中剛才那一列資料，點右鍵，選擇性貼上，乘，即可。在一空單元格輸入1.2並複製它，選中要增加的全部單元格，再右擊選中的 選擇性貼上 乘 確定。假設已有數值的列為a列，並在第1行開始到第10行結束，可在相鄰的b列設定公式 a1 1.2 再自動複製下拉到b10為的止，b列出...
Excel怎樣在某一單元格的資料改變後自動執行巨集
excel辦公實戰 某一單元格的資料改變後自動執行一個巨集一般使用工作表的change事件來處理。舉例如下 例如a1單元格的內容，發生變化，則彈窗顯示a1的值已改變，現在是多少 具體 如下 private sub worksheet change byval target as range 只有a1...