Re: [算表] VBA For迴圈問題
※ 引述《philfeel978 (廢柴二號)》之銘言：
: 感謝板友指教，For loop有跑得較正常，以下是修正後code
:
: For i = 2 To PasteData.Rows.Count
: If Worksheets(1).Cells(i, 2).Value < 2 Then
: Set Paste = Range(Cells(i, 2))
: Set Range("C2").Value = Paste.Row
:
: ElseIf Worksheets(1).Cells(i, 2).Value < 2 Then
: Exit For
: End If
:
: Next i
:
: 這裡又遇到個問題，在Set Paste = Range(Cells(i,2))時，顯示
這邊要改成
Set Paste = Range(Cells(i,2).Address)
Range跟Cells的預設屬性是Value (應該說VBA中大部分物件的預設屬性都是Value)
:
: Range 方法 (global) 失敗，在改成
:
: Set Paste = Cells(i,2)時便可以正常執行，請問是Cells的哪一項性質導致呢??
:
: 另外在下一行 Set Range("C2").Value = Paste.Row則是顯示
:
: "執行階段錯誤：此處需要物件"的錯誤，請問是指需要再指定另一變數嗎？
: ※ 編輯: philfeel978 來自: 140.96.44.107 (11/07 16:50)
:
: 發現錯誤了，原來是沒有物件只要設定值根本不用Set嘛...orz
: ※ 編輯: philfeel978 來自: 140.96.44.107 (11/07 16:57)
--
不勉強一份連綴不起來的情感
也不輕易放棄
一段曾經有過的感情
是隨緣也是執著
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.222.40.241
推
11/07 17:15, , 1F
11/07 17:15, 1F
→
11/07 17:16, , 2F
11/07 17:16, 2F
推
11/08 10:44, , 3F
11/08 10:44, 3F
→
11/08 10:45, , 4F
11/08 10:45, 4F
討論串 (同標題文章)
Office 近期熱門文章
PTT數位生活區 即時熱門文章
