[過去ログ] Excel総合相談所 141 (1002レス)
1-

このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
127
(1): 2020/10/17(土)07:28 AAS
>>126
ここまでできた。目的は何?教えて。

Sub foo_value()
Range("A1:A10000").Value = 1
Debug.Print "start"
Debug.Print Now()
For i = 1 To 100
Range("A1:A10000").Value = Range("B1:B10000").Value
Next
Debug.Print "end"
Debug.Print Now()
End Sub

Sub foo_copy()
Range("A1:A10000").Value = 1
Debug.Print "start"
Debug.Print Now()
For i = 1 To 100
Range("A1:A10000").Copy
Range("B1:B10000").PasteSpecial
Next
Debug.Print "end"
Debug.Print Now()
End Sub
1-
あと 875 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.134s*