wake-up-neo.com

Excel (2007) VBA - .Formula mit Anführungszeichen

Ich habe gestern versucht, den folgenden Code in ein Programm einzufügen. VBA hat einen Fehler aufgerufen. Ich vermute, es liegt an den doppelten Anführungszeichen in der Formel. Ich googelte, und alle Ergebnisse, die ich fand, gaben nur die Grundregeln für das Einfügen von Formeln an, aber keiner erklärte, wie man Zitate in die Umgebung bringt.

(Vorher gab es eine With-Anweisung, Pivot ist ein Arbeitsblattname.)

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

Jede Hilfe wird sehr geschätzt. Vielen Dank!

11
Graphth

Nimm im Zweifelsfall ein Makro auf, wenn es erlaubt ist

Versuche dies

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

Verwenden Sie Chr(34) anstelle eines doppelten Anführungszeichens.

Also in deinem Fall:

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

möglicherweise müssen Sie Folgendes tun:

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