按鈕/語法錯誤Excel

我有一個文檔，我要在工作表1上創建一個名爲Escelations的按鈕，當按下時所有數據都會發送到名爲Albany的工作表2，我發現一些代碼對我有意義，我編輯它到我想要的，但是當我使用它並將它附加到按鈕時，我得到一個語法錯誤。它說什麼是錯的表reftable，這裏是我的代碼有：按鈕/語法錯誤Excel

Private Sub CommandButton1_Click() 
Dim refTable As Variant, trans As Variant 
refTable = Array("A=A15","B=E15","C=G15","D=I15","F=L15","E=AA15) 
Dim Row As Long 
Row = Worksheets("Albany").UsedRange.Rows.Count + 1 
For Each trans In refTable 
    Dim Dest As String, Field As String 
    Dest = Trim(Left(trans, InStr(1, trans, "=") - 1)) & Row 
    Field = Trim(Right(trans, Len(trans) - InStr(1, trans, "="))) 
    Worksheets("Albany").Range(Dest).Value = Worksheets("Escelations").Range(Field).Value 
Next 
End Sub

一對夫婦，我想其他的事情提一提，我不知道是否是造成問題，但A15是從ABCD15/16合併的cel，E15被合併，G15被合併，I15被合併，L15被合併，並且AA15被合併以及他們將要去的地方，A，B，C，D，E，F不是。這可能是一個問題嗎？任何幫助將不勝感激，謝謝。這是我第一篇文章，所以如果我錯過了任何信息，請讓我知道。

來源

2016-08-18 Ryan Lake

歡迎堆棧溢出。你可以改善你的問題。請閱讀[如何提問]（http://stackoverflow.com/help/how-to-ask）在將來幫助其他人。修復拼寫錯誤，爲可讀性格式化代碼，將文本分解爲句子並添加更多段落。 – zhon

你缺少一個右"：

refTable = Array("A=A15","B=E15","C=G15","D=I15","F=L15","E=AA15")

來源

2016-08-18 20:13:02 BruceWayne

哦聖手榴彈蝙蝠俠....我覺得很蠢...非常感謝你，做到了這一點，它的工作！ –

@RyanLake哈哈，它發生在我們身上。 – BruceWayne

按鈕/語法錯誤Excel

回答

相關問題