Excel中,使用VBA以某一單元格內容命名工作表

2022-02-19 13:21:57 字數 2638 閱讀 9409

1樓:教育仁昌

工具/材料:microsoft office excel2007版,excel**。

1、首先選中excel**,雙擊開啟。

2、然後在該介面中,選中要以某一單元格內容命名的工作表,右鍵點選「檢視**」。

3、再者在該介面中,輸入vba**「sub 更改名稱度() dim myn as string myn = cells(1, 1) activesheet.name = myn end sub」。

4、其次在該介面中,點選「執行」按鈕。

5、、最後在該介面中,成功以某一單元格內容命名工作表。

2樓:匿名使用者

用萬能的vba可以實現。

例如在a1單元格輸入「我的工作表",然後將當前工作表名替換為」我的工作表"。**如下:

sub 更改名稱()

dim myn as string

myn = cells(1, 1)

activesheet.name = mynend sub

程式執行前如圖:

點選巨集,選擇更改名稱巨集-執行。如圖:

執行後結果如圖。

3樓:七星小蘑菇

執行以下**,當前工作表以選中單元格的內容重新命名。

sub 工作表重新命名()

if selection.value <> "" then activesheet.name = selection.value

end sub

4樓:蘇州老三石

sub change

dim i as integer, j as integerdim nam as string

for i=1 to thisworkbook.sheets.count

nam=worksheets(i).range("g4")for j=1 to worksheets(j)if worksheets(j).name=nam thenworksheets(i).

name="工作表("& i & ")else

worsheets(i)=nam

end if

next

next

end sub

5樓:匿名使用者

sub change()

for i = 1 to activeworkbook.worksheets.count

n = worksheets(i).range("g4").value

if n="" then

msgbox 「單元格空" '提示一下但不作操作,或者按照你的需要再修改

else

activeworkbook.worksheets(i).name = n

end if

next

end sub

'注意單元格內不能有非法字元,如「/」,否則會出錯

excel用vba如何建新一個工作表然後命名為表1裡面a1單元格輸入的內容

6樓:茗童

不需要用vba,直接用函式即可。

使用函式來處理

excel版本參考:2013

1、a1輸入公式:=replace(cell("filename"),1,find("]",cell("filename")),"")

2、回車完成專

函式簡單解析

屬:1、cell("filename"),獲取活動工作薄的全路徑2、replace替換函式,此處從第一個到],替換為空

7樓:匿名使用者

巨集代復碼

sub 指定位置新建制工作表並命名()

sheets.add before:=sheets(1)'before 前邊.after 後邊

activesheet.name = "表1"

cells(1, 1) = "a1單元格輸入的內容"

end sub

8樓:呆呆的小鈺

表1是指原來的那個表嗎?如果是的話,試試下面的**sub 新建工作表()

sheets.add

activesheet.name = sheets("表1").range("a1")

end sub

vba excel 根據sheet1的每一行都建立一個工作表 並以每行第一個單元格命名工作表

excel中如何使用vba實現將另一個檔案以某單元格內容為檔名儲存 50

excel用單元格內容作為工作表名稱

9樓:

可以的,

假如a1單元格值為:sheet2,需要引用sheet2 a1的值,可以這樣寫。

=indirect( a1 & 「!a1」)就可以了

10樓:

假設a1單元格式中的資料為sheet1的文字資料,用公式:

=indirect(a1&"!a1:a13")

11樓:匿名使用者

=indirect("sheet1!a1:a13")

12樓:白亦無常

可以,用indirect函式

Excel返回符合條件的單元格所在列某一行單元格的內容

index 函式 bai match函式 index 函式du 返回表zhi或區域中的值或對值的dao引用 回。語法答 index 區域,引用行號 match函式 返回指定數值在指定陣列區域中的位置。語法 match 查詢值,區域,查詢方式 index 1 1,match 100,2 2,0 或 i...

EXCEL中,如何實現某一單元格數值隨前一單元格文字變化而變化

還有其他的嘛?如抄果有很多的話,那麼你要首先做一個以這樣對應的表 然後在需要的地方 使用vlookup 等函式將後邊的數值引用過來 如果你的 這個對應表為sheet1,資料分別在a b兩列 a列為一等 二等 b列為10 8 5 那麼你在需要引用的地方 b1 vlookup a1,sheet1 a b...

excel中當某一單元格符合特定條件,如何在另一單元格顯示特

可以試試if函式,可以返回引號內任意的數字或字元。if b1 1,0 1和0是可以任意換的。b1 if a1 123 1 2 如果a1等於123,則b1等於1,否則等於2.類似這個思路,自己去做吧。要麼你發個 過來 excel 查詢特定數值單元格,並將所有對應的特定數值單元格的上一行的對應單元格求合...