過去ログ

                                Page     632
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼Rangeの( )の中の文法  まつもと 03/1/28(火) 20:30
   ┗自己レス〜Rangeの( )の中の文法  まつもと 03/1/28(火) 23:40

 ───────────────────────────────────────
 ■題名 : Rangeの( )の中の文法
 ■名前 : まつもと
 ■日付 : 03/1/28(火) 20:30
 -------------------------------------------------------------------------
   Dim StartArray
  StartArray = Array("A", "E", "H")
  i= 1
  aaa1 = i   
  Range(aaa1 & "2").select
  
は,うまく作動しましたが。

Dim StartArray
  StartArray = Array("A", "E", "H")
Dim EndArray
  EndArray = Array("C", "F", "K")
  
  i= 1
  aaa1 = i
  bbb1 = i+1
    
  Range("aaa1 : bbb1").select ……○
    
は,最終行でひっかかります。

 Range(aaa1 ":" bbb1).select
 Range("aaa1" :" bbb1").select
 Range(aaa1 : bbb1).select
どれもダメでした。(当然列全体を指定したいのです)

○のところの書き方を教えて下さい。
 
 ───────────────────────────────────────  ■題名 : 自己レス〜Rangeの( )の中の文法  ■名前 : まつもと <himawari@ztv.ne.jp>  ■日付 : 03/1/28(火) 23:40  -------------------------------------------------------------------------
   Range(aaa1 & ":" & bbb1).Select
でできました。

>Dim StartArray
>  StartArray = Array("A", "E", "H")
>  i= 1
>  aaa1 = i   
>  Range(aaa1 & "2").select
>  
>は,うまく作動しましたが。
>
>Dim StartArray
>  StartArray = Array("A", "E", "H")
>Dim EndArray
>  EndArray = Array("C", "F", "K")
>  
>  i= 1
>  aaa1 = i
>  bbb1 = i+1
>    
>  Range("aaa1 : bbb1").select ……○
>    
>は,最終行でひっかかります。
>
> Range(aaa1 ":" bbb1).select
> Range("aaa1" :" bbb1").select
> Range(aaa1 : bbb1).select
>どれもダメでした。(当然列全体を指定したいのです)
>
> ○のところの書き方を教えて下さい。
>
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 632