作者criky (阿偉)
看板Visual_Basic
標題[VBA ] function問題
時間Mon May 23 12:16:15 2011
大家好，問一個應該是基本但是我不懂的問題
我在excel的vba寫了一個簡單的幾行程式如下:
function right_r(a, x, y)
Sheets("record").Cells(1, 1).Copy
Cells(6, 50).Select
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Sheets("record").Cells(a, 2).Value = Cells(6, 50).Value
Cells(x, y).Select
End function
然後我以為執行是打
right_r(1,2,3)
^^^^^^ 程式會變動的3個值
可是就有錯誤訊息
vba是初學者，想用function來簡化程式碼，
不過不知道怎麼做，拜託知道的前輩回答一下，謝謝
另外類似的問題，
如果變數有的是字串，有的是數字，可以打在一起嗎？
例如呼叫的時候是
wrong_r=(X1,B1,16,14,6)
謝謝回答
錯誤訊息如下：
輸入 right_r(1,2,3) => 整個公式出現紅字 編譯錯誤，必須是： :=
輸入 right_r=(1,2,3)=> 紅字游標指在第1個逗號 編譯錯誤，必須是： :)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.133.13.138
1F：推 ClubT:應該是用sub不是用function 05/23 12:34
2F：→ criky:我有試過用sub，結果一樣 @@" 請問要怎麼修改 05/23 12:40
※ 編輯: criky 來自: 140.133.13.138 (05/23 12:43)
3F：推 ClubT:錯誤訊息是啥? 05/23 12:48
※ 編輯: criky 來自: 140.133.13.138 (05/23 12:57)
4F：→ twtimbow: call right_r(1,2,3) 05/23 13:41
5F：→ criky:原來是要call 啊 >"< 謝謝 05/23 13:46
6F：推 A1pha:編譯錯誤，必須是： :) 他的意思是：你必須要微笑以對。 05/30 06:35