Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


11411 / 13644 ツリー ←次へ | 前へ→

【16229】オートフィルター ちか 04/7/21(水) 14:15 質問[未読]
【16230】Re:オートフィルター Jaka 04/7/21(水) 14:22 回答[未読]
【16235】Re:オートフィルター ちか 04/7/21(水) 17:19 質問[未読]
【16236】Re:オートフィルター Jaka 04/7/21(水) 17:30 回答[未読]
【16237】Re:オートフィルター ちか 04/7/21(水) 17:45 質問[未読]
【16238】Re:オートフィルター IROC 04/7/21(水) 19:25 回答[未読]
【16243】Re:オートフィルター Asaki 04/7/22(木) 0:02 回答[未読]
【16247】Re:オートフィルター ちか 04/7/22(木) 8:41 お礼[未読]

【16229】オートフィルター
質問  ちか  - 04/7/21(水) 14:15 -

引用なし
パスワード
   オートフィルターの Criteria1:= で別シートの
A1の値を指定したいのですが、どのようにコードを
記述したらいいのかわかりません。
どなたかご教授いただけませんか?

【16230】Re:オートフィルター
回答  Jaka  - 04/7/21(水) 14:22 -

引用なし
パスワード
   こんにちは。


Criteria1:= Sheets("Sheet1").Range("A1").value

【16235】Re:オートフィルター
質問  ちか  - 04/7/21(水) 17:19 -

引用なし
パスワード
   ▼Jaka さん:
>こんにちは。
>
>例
>Criteria1:= Sheets("Sheet1").Range("A1").value

ありがとうございます。できました。
それと、もう一つお聞きしたいのですが、
Range("A1").value の、左から5文字目まで・・という指定
をしたいのですが、どう記述したら良いのでしょうか・・

【16236】Re:オートフィルター
回答  Jaka  - 04/7/21(水) 17:30 -

引用なし
パスワード
   これっ?

Left(Sheets("Sheet1").Range("A1").value,5)

【16237】Re:オートフィルター
質問  ちか  - 04/7/21(水) 17:45 -

引用なし
パスワード
   ▼Jaka さん:
>これっ?
>
>Left(Sheets("Sheet1").Range("A1").value,5)
Jakaさん。。
できませんでした(涙)

【16238】Re:オートフィルター
回答  IROC  - 04/7/21(水) 19:25 -

引用なし
パスワード
   msgbox Left(Sheets("Sheet1").Range("A1").value,5)

として確認してみて下さい。

【16243】Re:オートフィルター
回答  Asaki  - 04/7/22(木) 0:02 -

引用なし
パスワード
   こんばんは。
後ろから失礼します。

ひょっとして、目的は↓これですかね。。。?
Criteria1:=Left(Sheets("Sheet1").Range("A1").value,5) & "*"

【16247】Re:オートフィルター
お礼  ちか  - 04/7/22(木) 8:41 -

引用なし
パスワード
   ▼Asaki さん:
>こんばんは。
>後ろから失礼します。
>
>ひょっとして、目的は↓これですかね。。。?
>Criteria1:=Left(Sheets("Sheet1").Range("A1").value,5) & "*"

Jaka さま、IROCさま、Asakiさま。
どうもありがとうございます。
上記で思うように出来ました。

11411 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free