0

2 つの列 (可変範囲) を同じドキュメント内の別の列に連結するのに問題があります。私が見逃していることは本当に明らかですか？

Function ConcCol(ConVal_1 As String, ConVal_2 As String)
    Range("V30:V500").Select
    Application.CutCopyMode = False

    With ActiveCell
        .FormulaR1C1 = "=CONCATENATE(RC[5],"" "",RC[6])"
    End With

    Selection.AutoFill Destination:=Range(Destination), Type:=xlFillDefault

End Function

上記の関数を実行すると、次のエラーが発生します。

エラー: 実行時エラー '1004': Range クラスの AutoFill メソッドが失敗しました

おそらく、1つのセルのみがアクティブになっていることと関係があると思いますか？VBA の知識が限られている

4

3 に答える 3

0

ねえ、あなたは少し混乱していると思います。このコードをどのように実行する予定ですか? 詳細を提供する必要があります。以下に、vba コードを実行する 3 つの方法を示します。

  • ユーザー定義関数 (UDF) としてのユーザー インターフェイス
  • 別の VBA コードによって呼び出される/使用される関数として
  • マクロとして、ユーザーはマクロ リストから実行する必要があります。

あなたの目的のために、ユーザーがシートで CONCATENANTE 関数を使用して入力しないのはなぜですか?

エクセルの配列関数を使ってみませんか？

画像を投稿できません。評判が 10 個必要です :s

于 2013-08-13T20:44:10.453 に答える