用vba怎樣取excel中的一列在將提取的資料放到另sh

2022-02-17 12:00:00 字數 3212 閱讀 5018

1樓:小新de和尚頭

用我這個,

sub aa()

range("a1:a5").copy

sheet2.range("a1").pastespecial xlpasteall, , , true

range("a1:a5").clear '用來刪除複製的區域,如果區域需要保留,就把這句刪掉

end sub

2樓:匿名使用者

dim xsht1 as worksheetdim xsht2 as worksheetset xsht1 = sheets("sheet1")set xsht2 = sheets("sheet2")for i = 1 to 45

xsht2.cells(1, i) = xsht1.cells(i + 3, 3)

'sheet1表中的c4-c48,放到sheet2的第一行。

next i

3樓:匿名使用者

'在sheet2的單元格a1輸入sheet1的a1的值

sheets("sheet2").cells(1,1)=sheets("sheet1").cells(1,1)

或sheets("sheet2").range("a1")=sheets("sheet1").range("a1")

怎樣用vba讀取一個excel**中的某一列,然後提取出來放到另一個sheet的一行裡如何寫**求詳細,謝謝

4樓:朱仕平

sub test()

sheets("sheet1").range("a:a").copy sheets("sheet2").range("b1")

end sub

5樓:匿名使用者

sheets("sheet1").range("a1:a30").copy

sheets("sheet2").select[a5].select

selection.pastespecial paste:=xlpasteall, operation:=xlnone, skipblanks:= _

false, transpose:=true

怎樣用vba在excel**裡提取一列資料比如想提取b4到b48這一段怎麼寫**呀,跪求**

6樓:匿名使用者

提取b4的值

dim a as string '定義成字串格式a=range("b4") '將b4的值賦予 變數a'*************************====dim a as range '定義range變數a=range("b4:b48") '將b4:b48賦予ab=a(0)'將a中的第一個值(b4的值)賦予b'*************************==='將「**名字1」的a1輸入1 如下

sheets("**名字1").cells(1,1)=1'cells(行,列)

sheets("**名字1").range("a1")=1'其他類似寫法

7樓:朱仕平

下面這段將b4:b48單元格區域複製貼上到a1單元格sub test()

range("b4:b48").copt range("a1")end sub

vba**:用excel的vbe編輯器如何用**實現提取某個單元格(如a1)所屬的sheet名稱,並在另一張表中讀出

8樓:匿名使用者

dim aa

aa=sheet1.range("a1")或者k=1

aa= sheet1.range("a"& k)

excel如何提取或者複製**中的某一整列內容到另一張**中。

9樓:匿名使用者

excel提取或者複製抄**中的某一整列內容襲到另一張表bai格中,可以快速

du選中需要複製zhi的一整列單元格dao,到新的**中貼上即可。

方法步驟如下:

1、開啟需要操作的excel**,滑鼠停留在需要複製的列上面字母處,當滑鼠變成向下黑色箭頭「↓」時,點選滑鼠左鍵即可選中整列**。

2、按鍵盤「ctrl+c」複製整列**內容。

3、到新的工作表中在需要貼上的地方按「ctrl+v」即可將整列資料**成功貼上在新工作表。

10樓:泡影果果

工具:office excel

步驟bai:

1、開啟duoffice excel,選中需要提zhi取或者複製**中的某一dao整列到另一張表專格中的內容屬、右鍵選擇複製。

2、開啟一個空白的excel**。選擇需要的位置,插入游標,滑鼠右鍵貼上即可完成。

3、貼上的**的格式和內容與剛才的**完全相同,可以根據需要編輯即可。

11樓:蘆葦微微軒珞

1,如果沒公式,bai

選擇列---複製---貼上du。

2,如果有公式zhi,選擇列

dao---複製---選擇性貼上版--數值。

3,使用權資料「轉置」功能可以很簡單解決這個問題。假定你要複製的內容在sheet1中的a1:a100,要求複製到sheet2中的第1行中。方法如下:

選定sheet1的a1:a100並複製,轉到sheet2,滑鼠點中第1 行第一格,在其上點滑鼠右鍵——「選擇性貼上」——「轉置」——「確定」。

12樓:v多餘的解釋

如何將一張excel**中某行固定列的資料自動複製到另一個excel**的解決方法如下:

1、公式回法,

比如要把sheet1中b2單元答格內容複製到sheet2的a1單元格,a1單元格的公式為:=sheet1!b2,如果是連續的可以下拉公式,你說的情況不是連續單元格,就只能這樣了

2、程式設計法,

可以根據你的需要,通過錄制或是直接手動輸入的方法生成vba程式段,然後通過的手工編輯,從源位置讀取資料,然後把內容寫到目的位置即可。

13樓:不一樣的剛哥

sheet2表中 =sheet1!a9 就是等於而已

14樓:匿名使用者

可以用vba**提取

15樓:蝸牛全能

直接選中一欄一列複製

16樓:匿名使用者

aaaaaaaaaaaaaaaa

在excel中如何使用vba的巨集

保護公式可以這樣 選擇不需要保護 需要錄入內容 的單元格,設定單元格屬性,最後一個 保護 卡里面的 鎖定 取消,其它那些沒有取消鎖定的有公式的單元格自然是鎖定狀態。下一步是在工具 審閱 新版本 或者 工具 選單 舊版本 裡面選擇 保護工作表 設定一個密碼後確認。完成這兩步之後,鎖定的單元格內容就無法...

vba如何去呼叫另excel中的function,注意

function 自定義函抄 數,只能在當前 工作襲簿中使用 如果本bai電腦上都想用du,建議儲存為個人zhi巨集,以後本電腦上的工作薄dao都可以使用 function可以向其他函式一樣,正常呼叫即可function ms tt msgbox tt end function sub tets m...

請問如何用VBA將EXCEL檔案中的資料複製到別EXCEL檔案相同的位置

sheet1的區域a1 c3拷貝到sheet2的區域a1 c3 sheet1.range a1 c3 copy sheet2.range a1 c3 sub aaa dim sh1 as worksheet dim sh2 as worksheet set sh1 workbooks 1.xls s...