excel問題,excel問題

2022-10-11 07:10:04 字數 1103 閱讀 3358

1樓:腦漿騎士

寫乙個巨集,執行之:

dim col, row , sheetsnum as integer

const addstring = "tj"

for sheetsnum = 1 to activeworkbook.sheets.count

for row = 1 to sheets(sheetsnum).usedrange.rows.count

for col = 1 to sheets(sheetsnum).usedrange.columns.count

sheets(sheetsnum).cells(row, col).value = sheets(sheetsnum).

cells(row, col).value + addstring

'sheets(sheetsnum).cells(row, col).value = addstring + sheets(sheetsnum).

cells(row, col).value

next

next

next

注掉的那句是在前面加「tj」

2樓:匿名使用者

在excel中按alt+f11,出現vba程式設計視窗貼上以下**後,按f5執行

sub test()

for each i in range("a1:b5") '"a1:b5"是你要操作的選擇範圍

'如果你要從a5到a100,則變成"a5:a100"

i.value = "tj" + i

next

end sub

3樓:匿名使用者

將你想放資料的地方全部選中,再上面的欄中編輯 =tj(a1) ,之後按enter

4樓:

sub 巨集1()

set r = selection

for i = 1 to r.rows.count: for j = 1 to r.columns.count

r.cells(i, j) = r.cells(i, j) & "tj"

next j: next i

end sub

Excel問題,Excel問題

你是用vba建立的吧。在剛建立的時候沒有任何提示,但在開啟時,會提示有巨集病毒。的確很多巨集病毒就是利用巨集來建立的,excel在開啟時,給予提醒是正常的,以便防止巨集病毒對文件資料的破壞。啟用巨集試試,如果顯示正常,就說明是你在excel文件中應用了vba。按alt f11,可以檢視vba源 如果...

EXCEL問題請教?Excel問題

j2輸入。if row a1 counta a 2 a 10 a2,if row a1 counta a 2 d 10 2,offset c 1,row a1 counta a 2 a 10 if row a1 counta a 2 f 10 2,offset e 1,row a1 counta a...

EXCEL的排序問題,EXCEL排序問題?

給你個只輸入兩個單元格就實現的方法 1 在b2輸入l1,選中他,用b2右下角填充柄向右填充到d2 這樣b2是l1,c2是l2,d2是l3 2 在b3輸入l4,選中他,用b3右下角填充柄向右填充到d3 這樣b3是l4,c3是l5,d3是l6 3 選中c列,在其左邊插入列 變成c列為空,第一行和第二行就...