2011-07-22 23 views
0

私のコードでは、次の行に1004ランタイムエラーが発生しています。アプリケーション定義またはオブジェクト定義エラー。私はそれが声明の右側の問題かもしれないと思う。しかし、私はそれが何回か書かれた方法を無駄に変更しました。ご覧のとおり、多くの文字コードを挿入しようとしました。私は最終的に欲しいです=「「」& A1 &「」、」明確にするためのスペースとB1がアクティブセルであり、セルB1に挿入された:これは想定している 『『 『=』』& A1 &』vba文字列の割り当て。 1004ランタイムエラーが発生するのはなぜですか?

をセルA1を参照するには、その値をとって一重引用符で囲み、最後にコンマを付けます。これは、SQLステートメント用にフォーマットされているためです。

ご協力いただければ幸いです。私はこれが一般的なエラーであることを知っていますが、エラーメッセージは役に立ちません。

ActiveCell.Formula = Chr(61) & "'" & Chr(34) & Chr(38) & "A1" & Chr(38) & Chr(34) & "'," 

答えて

4

あなたがそれらを二重にする必要がある引用符をエスケープする:

ActiveCell.Formula = "=""'"" & A1 & ""',""" 
+0

ビンゴ!それははるかに良いです、ありがとうございます。 – Brian

1

私はあなたの第一の開口引用し、あなたの最後の終了引用符が欠落していると信じています。以下は

= ' " & A1 & " , 

文字コードが非を求めて、私が出した、あなたの意図式

ActiveCell.Formula = "=" & Chr(34) & "'" & Chr(34) & "&A1&" & Chr(34) & "'," & Chr(34) 

の正しい構文です:直接(明確にするためのスペースを持つ)あなたのコードを変換するには、以下の文字列を持っています物を簡素化するための引用ですが、必須ではありません。

関連する問題