|
▼越山 洋 さん:
>▼[名前なし] さん:
>>▼越山 洋 さん:
>>"aaaaa"というのがシート名なら、
>>
>>> dim rng登録 as range
>>>
>>> Set rng登録 = Range("aaaaa")
>>
>> ↓
>>
>>Dim rng登録 As Worksheet
>>
>> Set rng登録 = Worksheets("aaaaa")
>>
>>だと思います。
>
>どうもありがとうございます。
>エラーが無くなりました。
もうひとつ教えて下さい。
下記のmatch関数の2個目の因数の指定方法がよくわかりません。
見つけたいintキーがexcelシートの1列目ならcolumns(1)、2列目ならcolumns(2)と
記述すれば良いのでしょうか。
よろしくお願いします。
-----------------------------------------------------------------------
Option Explicit
Dim no勤務ファイル新規登録 As Variant
no勤務ファイル新規登録 = _
Application.Match(intキー, rng勤務ファイル新規登録.Columns(1), 0)
-----------------------------------------------------------------------
|
|