2012-05-06 41 views
2

問題: 我經常需要將一行引用到列(使用= Cell)。當我需要使用多行時,我只需使用Ctrl + Shift + Enter。但它很煩人,因爲錯誤:當我想編輯某些東西時,「你不能更改數組的一部分」。使用參考Excel VBA將單列轉換爲單列

解釋預期結果: 我想選擇不帶標題的單行範圍。

Dim cRangeColumn As Range 
Set cRangeColumn = Application.InputBox("Please choose a range", "Specify Range", Type:=8) 

後,我按「確定」,就應該讓我選擇,我把我的行(單列被轉列) - 單元格地址,讓程序知道從哪裏開始

再次,這可以通過

Dim rRangeRow As Range 
Set rRangeRow = Application.InputBox("Please choose a range", "Specify Range", Type:=8) 

問題來完成我面對: 如何在範圍訪問該值

邏輯:

  1. 我得到的列的量程 - 讓說$E$29:$E$37 - 共計9價值

  2. 我選擇轉置列(行)的起始地址,讓說Sheet226!$G$14

  3. 程序啓動寫="$E$29 to the starting address "Sheet226!$G$14",然後寫 ,直到$E$37滿足。每次寫入時,偏移1列。

+0

我得到了這個答案。因爲它尚未發佈8小時,所以我現在無法發佈解決方案。 – NCC

回答

1

在海里游泳後,我就能夠使這項工作

enter image description here

我嘗試使用「<碼>」,但它看起來並不好。所以我拍了代碼的快照。它並不冗長。我希望它不打擾。