Excel VBA質問箱 IV

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

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


2697 / 13646 ツリー ←次へ | 前へ→

【66512】"!"からの脱却 DDMK 10/9/7(火) 20:59 質問[未読]
【66513】Re:"!"からの脱却 かみちゃん 10/9/7(火) 21:21 発言[未読]
【66514】Re:"!"からの脱却 DDMK 10/9/7(火) 21:59 発言[未読]
【66515】Re:"!"からの脱却 UO3 10/9/7(火) 22:04 発言[未読]
【66516】Re:"!"からの脱却 かみちゃん 10/9/7(火) 22:09 発言[未読]
【66533】Re:"!"からの脱却 kanabun 10/9/8(水) 22:31 発言[未読]

【66512】"!"からの脱却
質問  DDMK  - 10/9/7(火) 20:59 -

引用なし
パスワード
   VBAで

Sub Macro1()
  Range("B6").Select
  ActiveCell.FormulaR1C1 = "=INDIRECT(R5C&""!""&R[-4]C[3]&ROW())"
End Sub


と書くと、B6セルの関数が

=INDIRECT(B$5&"!"&E2&ROW())

となってしまいます。 &"!"&という部分が!となるためにはどうすればいいでしょうか?

【66513】Re:"!"からの脱却
発言  かみちゃん  - 10/9/7(火) 21:21 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>Sub Macro1()
>  Range("B6").Select
>  ActiveCell.FormulaR1C1 = "=INDIRECT(R5C&""!""&R[-4]C[3]&ROW())"
>End Sub
>
>
>と書くと、B6セルの関数が
>
>=INDIRECT(B$5&"!"&E2&ROW())
>
>となってしまいます。 &"!"&という部分が!となるためにはどうすればいいでしょうか?

&""!""&
の部分を
&!&
とするだけではないでしょうか?

【66514】Re:"!"からの脱却
発言  DDMK  - 10/9/7(火) 21:59 -

引用なし
パスワード
   ▼かみちゃん さん:

こんにちは。
&!&とすると、エラーになってしまうのです。

【66515】Re:"!"からの脱却
発言  UO3  - 10/9/7(火) 22:04 -

引用なし
パスワード
   ▼DDMK さん:

こんばんは

シートの上で =INDIRECT(○○○○○) と記述するとしたら
どんな ○○○○○ を書かれるのでしょうか?

文字列連結の手法というより、○○○○○ 自体が なんだか変?

【66516】Re:"!"からの脱却
発言  かみちゃん  - 10/9/7(火) 22:09 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>&!&とすると、エラーになってしまうのです。

質問を読み違えました。

>Sub Macro1()
>  Range("B6").Select
>  ActiveCell.FormulaR1C1 = "=INDIRECT(R5C&""!""&R[-4]C[3]&ROW())"
>End Sub
>
>
>と書くと、B6セルの関数が
>
>=INDIRECT(B$5&"!"&E2&ROW())
>
>となってしまいます。 &"!"&という部分が!となるためにはどうすればいいでしょうか?

=INDIRECT(B$5&"!"&E2&ROW())
という数式自体は合っているように思います。
その結果のセルの表示が、#REF! となるのであれば、
B5セルに存在するシート名、
E2セルに列番号を入力してあるのでしょうか?

それとも、どのようなことがしたいのでしょうか?

【66533】Re:"!"からの脱却
発言  kanabun  - 10/9/8(水) 22:31 -

引用なし
パスワード
   ▼DDMK さん:

> B6セルの関数が
>
>=INDIRECT(B$5&"!"&E2&ROW())
>
>となってしまいます。 &"!"&という部分が!となるためにはどうすればいいでしょうか?

同じような?質問なら、
ht tp://oshiete.goo.ne.jp/qa/2823583.html
に解決例があるけど。

ここはVBA質問箱だからな〜
どういうことをしたいのかを説明したほうが速いと思いますが、

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