1

反復ごとに参照が変化するセルに数式を割り当てようとしています。ただし、以下の割り当ての左側は、右側を "=""Test""" にするとうまくいくように見えるので、うまくいくようです。

問題は、右側の式にあると思います。文字列、ループの反復ごとに変化する変数、およびセルから取得した値の組み合わせがあります。

    Worksheets("LimsOutput").Cells(4, 2 + 14 * i).Formula = "=" & BR & " Blah blah " & Worksheets("Lims").Range("A3").Value

問題は、シート内の引用符とセル参照に関係しているのではないかと考えています。

4

2 に答える 2

0

以下は簡単な例です。これがお役に立てば幸いです。

 Sub sample()
    Dim lastRow As Long
    lastRow = Range("A65000").End(xlUp).Row

    Dim rng As Range
    Set rng = Range("B1:B" & lastRow)

    Dim BR As String
    BR = "STRING"

    rng.Formula = BR & " Blah blah " & cstr(Range("$A$3"))

End Sub

ここに画像の説明を入力

于 2013-03-27T16:23:27.703 に答える
0

あなたの場合、Excelセルの連結式は次のようになります

 = "String" & " Blah Blah " & "30/06/2012"

それをコードに変換するにはCHR(34)、二重引用符と"&"

この例を参照してください

Worksheets("LimsOutput").Cells(4, 2 + 14 * i).Formula = "=" & _
                                                        Chr(34) & BR & Chr(34) & _
                                                        "&" & _
                                                        Chr(34) & " Blah blah " & Chr(34) & _
                                                        "&" & _
                                                        Worksheets("Lims").Range("A3").Value

もう一つ ：）

Worksheets("Lims").Range("A3").Value0.00248508946322068あなたに与えます30/06/2012

したがって、上記のコードは次のような出力を提供します。最後に日付を取得するには、日付の前後にもSTRING Blah blah 0.00248508946322068追加する必要があります。CHR(34)例えば

Worksheets("LimsOutput").Cells(4, 2 + 14 * i).Formula = "=" & _
                                                        Chr(34) & BR & Chr(34) & _
                                                        "&" & _
                                                        Chr(34) & " Blah blah " & Chr(34) & _
                                                        "&" & _
                                                        Chr(34) & Worksheets("Lims").Range("A3").Value & Chr(34)
于 2013-03-27T16:46:11.550 に答える