2017-05-18 18 views
0

私は、列の値をチェックして特定の範囲の内容をクリアするために作成されたサブを持っています。しかし値を選択するとき、私は継続的に型の不一致エラーを取得します。私は以下の4つの方法も試みました。シートはSQL Serverソースからリフレッシュされ、そのデータ型は文字列です。ソースのデータをint型に変更しましたが、現在は使用しています。どんな助力も高く評価されます。Excel vba型不一致型13

Sub abc() 
    Dim var1 As String 
    **var1 = Sheets(Sheet1).Cells(1, "A").Value 
    var1 = Sheets(Sheet1).Cells(1, "A").Text 
    var1 = Sheets(Sheet1).Range("A1").Value 
    var1 = Sheets(Sheet1).Range("A1").Text** 
End Sub 
+0

'Sheet1がその名前であると仮定したシート(" Sheet1 ")。 – SJR

+0

はい..あなたは正しいです。私がコードにない他のものは? –

+0

ここにはhttp://stackoverflow.com/questions/17359835/what-is-the-difference-between-text-value-and-value2によると、おそらく 'Value'や' Text'の代わりに 'Value2'を使うべきです(そして確かに後者ではない)。私は決してそれを使用することを告白する必要がありますが、おそらく私の方法を修正する必要があります。 – SJR

答えて

0

var1タイプを文字列からRangeまたはvariantに変更してみてください。

0

すべてのコメントいただきありがとうございます。問題を修正しました。 の引用符が追加されました。変更されたvar1 =シート(Sheet1).Range( "A1")。値