FC2ブログ

Entries

ふしぎなメモ

カテゴリ : 釣りの出来事
Dim mmySH1 As Worksheet
Dim saR As Range
Dim sbR As Range
Dim ccR As Range
Dim MaR
Dim MbR
Dim McR
Application.ScreenUpdating = False
Set mmySH1 = ThisWorkbook.Worksheets("リスト")
Set saR = mmySH1.Range("AC2")
Set sbR = mmySH1.Range("AD3")
Set ccR = mmySH1.Range("AE2")
MaR = saR.Value
MbR = sbR.Value
McR = ccR.Value

Call progcopy(MaR, MbR, McR)

Set mmySH1 = Nothing
Set saR = Nothing
Set sbR = Nothing
Application.ScreenUpdating = True
スポンサーサイト



Appendix

小さな天気予報


-天気予報コム- -FC2-

最近の記事

カレンダー

03 | 2012/04 | 05
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 - - - - -

アフィリエイト



プロフィール

copysakana

Author:copysakana
海釣り好きの壮年です。
よろしく!!!

ご照会