| |
▼Jaka さん りんさん こんにちは。
>エラーになった行と、ひでさんが回答されたコードを良く見比べてみてください。
JaKaさんフォローありがとうございます!
すでにJaKaさんの回答で、りんさんもわかっていると思いますが念のために・・(^^;
>｢引数の数が一致していません。または不正な
>プロパティを指定しています。｣という
>エラーがでるのですが...。
↓
>N = Sheets(acs).Range("c" & Rows.Count).End
りんさんのコードを試してみました
この行でエラーになります｡
私のは・・ ↓
N = Sheets(acs).Range("c" & Rows.Count).End(xlUp).Row
>また、"＜CK3"は実際には間に
>空白をたくさん含む文字列なのですが、
>これがいけないのでしょうか？？
上記エラーとは関係ないと思いますが・・
>If Cells(r, 3).Value Like "〈 CK*" = True Then
> "〈 CK" この空白数や記号は固定でしょうか？
"CK"のみで判断がつくのなら
If Cells(r, 3).Value Like "*CK*" = True Then
にしてみてはいかがでしょう。
|
|
ひで
- 03/7/14(月) 13:33 -
