2012-04-13 15 views
9

Aşağıdaki kodu bir programa dün koymaya çalıştım. VBA bir hata denir. Bunun formülün içindeki çift tırnaktan kaynaklandığını farz ediyorum. Ben googled ve bulduğum tüm sonuçlar sadece formülleri koymak temel vermişti, ama hiçbiri içinde tırnak içine almak için nasıl açıkladı. Excel (2007) VBA - .Formula içinde tırnak işareti var.

Herhangi bir yardım çok takdir edilir

.Range("A2").Formula = "=IF(Pivot!A5="",A1,Pivot!A5)" 

(bundan önce deyimi ile bir oldu, Pivot bir çalışma sayfası adıdır). Teşekkürler!

.Range("A2").Formula = "=IF(Pivot!A5="& """" & """" & ",A1,Pivot!A5)" 

cevap

21

zaman şüphe, bir makro kaydetmek -alıntı. Yani sizin durumda

: Makro kaydedici hakkında

.Range("A2").Formula = "=IF(Pivot!A5=" & Chr(34) & Chr(34) & ",A1,Pivot!A5)" 
+0

İyi bir nokta. Ayrıca, kodunuz çalışır ve tüm cevapların en temizidir. Teşekkürler. – Graphth

1

bunu yapmak gerekebilir deneyin

2

kullanın Chr(34) çift yerine: o izin verirse :)

bu

.Range("A2").Formula = "=IF(Pivot!A5="""",A1,Pivot!A5)"