1樓:真真真白丁
親,這段**可以把你需要更名的sheet的名稱改為……一直順序念螞下去;自動取還未用過的最小數字作為sheet名,不知是不是你要的~~~
sub changesheetname()dim i, j, flag as integeri = 1flag = 0
do while true
for j = 1 to
if sheets(j).name <>仔叢埋鄭純 cstr(i) then
flag = i
elseflag = 0
exit for
end if
nextif flag <>0 then
flag '這一句可以換成你要更改名稱的那個sheetexit do
elsei = i + 1
end if
loopend sub
sub changesheetname()dim i, j, flag as integeri = 1flag = 0
do while true
for j = 1 to
if sheets(j).name <>cstr(i) thenflag = i
elseflag = 0
exit for
end if
nextif flag <>0 then
flag '這一句可以換成你要更改名稱的那個sheetexit do
elsei = i + 1
end if
loopend sub
excel中如何用vba將工作表sheet1重新命名,因為要重新命名的名稱是變數,所以搞不定。
2樓:20時13分14秒
sub rename
mydate = format(date, "[$-409]dd-mmm-yy;@") '得到美式的日期格式。
mymonth = split(mydate, "-") 'split此日期格式,找到當前的月份的英語簡寫。
myname = ucase(mymonth(1)) ucase(mymonth(0)) year(date) &"n" '你需要的格式。
sheets(1).name = mynameend sub
excel (求助)用vba自動提取不重複姓名
3樓:網友
舉例說明。
要求將a列姓名取出後去除重複值,然後輸出到c列。
第一步:點選開發工具-visual basic。選擇sheet1,輸入**如下:
sub 姓名去重()
dim jgarr(1 to 100)
zz = 0
sheets("sheet1").activateset zd = createobject("")hh = 2
do while cells(hh, 1) <""
if not , 1).text) thencells(hh, 1).text, zzzz = zz + 1
jgarr(zz) = cells(hh, 1).textend if
hh = hh + 1
loop輸出結果。
range("c2:c100000").clearcontentsfor i = 1 to zz
cells(2 + i - 1, 3) = jgarr(i)next i
end sub
求大神解答vba去除一列重複的值之後將所有不重複的值生成新的sheet頁,並且每個sheet頁用不重複的值命名
4樓:網友
零基礎鼓搗出來,看來你是個天才啊,我很看好你,小夥子,有發展前途。
用vba些**,但是新增了sheet名字重名了怎麼辦?
5樓:落葉l無情
你可以用 & 1) 作為sheet的名字,也就是根據表數量來定。
excel批量修改工作表名稱 vba
6樓:網友
比如a列儲存著你的**名稱:
sub test()
dim ws as worksheet
i = 1for each ws in
i = i + 1
nextend sub
excel vba,求批量更改各個excel的單個工作表名稱
7樓:網友
答:可以。
複製下面**到vb器裡,執行"modifysheetname"程式。程式會彈出對話方塊來讓你選擇檔案,修改完成後儲存在原位置。
如何批量修改excel sheet名稱
8樓:網友
看了上面幾個回答,在2010測試了下,或多或少有點報錯(可能是office版本的原因吧),我用的是2010版office,簡單修改了下,親測ok,分享給大家:
sub name()
for i = 1 to
sheets(i).name = , 1)next
end sub
原理:還是在第乙個工作表中第一列取值,對所有工作表重新命名。
IE跳轉頁面自動關閉 自動重複跳轉)
本人經過25個小時,終於自己解決了!ps 再次鄙視瑞星防毒,自己殺不了就算了,還把別的能殺的工具當木馬 解決方法 安全模式 不帶網路 下執行最新註冊版的木馬克星,經過掃描發現3個exe木馬執行檔案,其中有1個和ie 了,另外有3個dll木馬控制元件,互相繫結的,刪除其中任何一個都會自動複製出來。木馬...
怎麼實現跨頁也能輕鬆自動重複表頭
騰訊電腦管家 方法如下 1 開啟word 2 選定標題行 多行也行 右擊 屬性 3 在彈回出 屬性視窗,選擇行,答勾選 在各頁頂端以標題行形式重複出現 4 屬性 中,設為環繞設為 無 5 確定,完成。 word教學課堂 如何製作 跨頁重複表頭? 人人哦哦哦課 1 首先開啟baiword文件,做一個 ...
哪種自動檔更節油,手動擋和自動檔哪個更省油 為什麼
據我所知目前國內市面上銷售的自動擋車型的自動變速箱分為以下幾類,其節油順序是目前市面上公認最省油的是amt自動變速器,其油耗與手動擋車型幾乎相同,甚至更低,機械結構也很簡單,其次是cvt無級變速箱,這種變速箱的換檔衝擊極小,舒適性極佳油耗略高於手動擋車型,油耗會高出約10 左右,而且其內部結構比較複...