Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Home : Excel 2016)
指定のセルにtext関数を記載
投稿日時: 18/11/29 10:11:51
投稿者: せりむ

B列とC列にはそれぞれ1〜4桁の番号が振られており、
それらを合わせて8桁のユニークコードとしてvlookupの検索値としたいのですが
下線部分でエラーとなってしまいうまくできませんでした。
どなたか回避方法をお教えいただけませんでしょうか。
 
例としてはB2が56、C2が105の場合、検索値を「00560105」として
D列のどこかにある00560105を検索、対応するE列の文字列をA2に返して欲しいです。
 
現状
Range("A2") = "=VLOOKUP(TEXT(B2,"0000")&TEXT(C2,"0000"),D:E,2,0)"
エラー表示「ステートメントの最後」
 
よろしくお願い致します。

回答
投稿日時: 18/11/29 11:00:51
投稿者: bi

Range("A2") = "=VLOOKUP(TEXT(B2,""0000"")&TEXT(C2,""0000""),D:E,2,0)"
 
でうまくいくと思います。

投稿日時: 18/11/29 11:25:19
投稿者: せりむ

>bi様
ありがとうございます、頂きましたコードでエラーが解消できました!
二重は二重に対応といった形で開始地点と終了地点を紐づけするのですね。
勉強になりました、ありがとうございました。