Excel VBA質問箱 IV

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

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


7410 / 76735 ←次へ | 前へ→

【74912】Re:文字列の受け渡しでエラーがでます。。。
回答  ウッシ  - 13/10/23(水) 12:25 -

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

Dim strTarget As String

String型なのでSetは不要です。

strTarget = str

でいいです。

▼オレンジ さん:
>こんにちは、はじめまして。
>このサイトを利用するのは初めてです。
>無礼が無い様気をつけますので、どなたか助けていただけないでしょうか。
>
>いま Sub から Function へ、文字列を渡して処理するコードを考えているのですが
>コンパイルエラー「オブジェクトが必要です。」と出てうまくできません。
>
>具体的なコードは以下です。
>
>
>Sub test()
>  
>  ' String型で宣言 str
>  Dim str As String
>  
>  ' 変数str に文字列を格納
>  str = "商品名 AAA"
>  Debug.Print TypeName(str) ' 結果:String
>  Debug.Print str      ' 結果:商品名 AAA
>  
>  ' Function に変数str を渡す
>  myFunc str
>  
>End Sub
>
>
>Function myFunc(ByVal str As String)
>
>  Debug.Print str
>  
>  Dim strTarget As String
>  
>  Set strTarget = str 'コンパイルエラー オブジェクトが必要です。
>  ■■↑ここでエラーがでます。■■
>
>End Function
>
>
>私はVBA初心者ですので、分かりやすく教えていただけるとありがたいです。
>皆さん、ご助言をお願い致します。
>
1 hits

【74911】文字列の受け渡しでエラーがでます。。。 オレンジ 13/10/23(水) 12:22 質問
【74912】Re:文字列の受け渡しでエラーがでます。。。 ウッシ 13/10/23(水) 12:25 回答
【74913】Re:文字列の受け渡しでエラーがでます。。。 オレンジ 13/10/23(水) 15:14 お礼
【74922】Re:文字列の受け渡しでエラーがでます。。。 ichinose 13/10/26(土) 10:06 発言
【74927】Re:文字列の受け渡しでエラーがでます。。。 オレンジ 13/10/27(日) 15:12 お礼

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