不能分配開始報價到另一個小區在Excel VBA中

我具有其中電池是通過網絡查詢填充Excel表值。該單元格的內容以單引號（'）開頭。單元格具有文本數字格式。不能分配開始報價到另一個小區在Excel VBA中

當我使用VBA這個單元格的內容分配到另一個小區，該帖被刪除，但我不希望這種事情發生。

如何獲得小區的精確副本，即報價不會被刪除？

我用：

Dim lSourceRange as Range 
Dim lTargetRange as Range 

set lSourceRange = Cells(1,1) 
set lTargetRange = Cells(2,2) 

lTargetRange.numberformat = '@' 
lTargetRange.value2 = lSourceRange.Value2

我也試過

lTargetRange.value2 = lSourceRange.text 
lTargetRange.value2 = lSourceRange.Value 

lTargetRange.value = lSourceRange.text 
lTargetRange.value = lSourceRange.Value

始終初始報價被刪除。（中 lSourceRange值/值2 /文本's-Hertogenbosch，在調試器"'s-Hertogenbosch"看到）

我知道報價是明確到Excel中，我想用文字，但我需要的報價是部分的價值（和表中的顯示）。

來源

2012-05-26 linda cindy

選擇在公式欄中的小區時嘗試此

lTargetRange.value = "'" & lSourceRange.Value

或使用本

lSourceRange.Copy lTargetRange

來源

2012-05-26 17:39:52

該（第一溶液）確實顯示報價，但現在的值被顯示具有兩個單引號。選擇所述源小區（其中報價是可見的），然後在公式欄中也單個單引號是可見 –

奇怪。在我的Excel 2010中，它顯示一個單引號 –

使用複製第二個解決方案，似乎做的工作。我使用application.screenupdating = false來隱藏結果隱藏了一些問題，這些問題並沒有隱藏所有內容，但是您的聲明也適用於這方面。謝謝@sidd –

不能分配開始報價到另一個小區在Excel VBA中

回答

相關問題