Office: Wertzuweisung von Formeln mit Variablen (erledigt)

Ich hab mit folgendem Code Probleme

Sub formula_autofill()
'

Sheets("PCB Area Estimation").Cells(10, 2) = "=WENN((A10="");"";SUMMENPRODUKT(N(' &Aktueller_Pfad "[" &Aktuelle_Datei "]Tabelle1'!C$13:C$4000=A10)))" 'Hier dritt der Fehler auf

Range("B10").Select
Selection.AutoFill Destination:=Range("B10:B2100"), Type:=xlFillDefault
Range("B2110:B2117").Select

End Sub

Ich möchte eine Formel in eine zelle kopieren und dann durch Autofill die Formel in andere Zellen kopieren.

Das Problem taucht schon beim Zuweisen des Zelleninhalts auf.

Ich möchte eine Summenproduktformel in die Zellen eintragen, jedoch ist den Dateinamen, aus welcher das Summenprodukt gewonnen wird, variabel gestalten.

Mit den normalen Excel Formeln, welche ich direkt in die Zellen eintragen kann, kann ich ja keine Variablen eintragen.

Deshalb dachte ich mir, schreib ich die Formeln einfach mit einem Makro in die Zellen, aber durch die vielen " kommt Excel mit dem Makro nicht ganz klar.

Eine Möglichkeit wäre wohl, jeden Buchstabe mit "Buchstabe" zu schreiben, aber das ist doch recht umständlich.

Kann ich in Excel VBA irgendwie begreiflich machen, dass nur die zwei äußersten linken bzw. rechten eines Strings Anführungszeichen im Sinne des Anfangs und des Endes eines Strings sind, bzw. ich schreibe ich in einem String "?

 

hab schon mal rausgefunden, wie man anführungszeichen in einem string schreibt.

man nimmt anstatt des anführungszeichen, seinen ASCII wert:

Private Sub Form_Load()
Text1.Text = "Ich stehe " & _
Chr(34) & "zwischen" & Chr(34) & _
" Anführungszeichen"
End Sub

 

hallo, jetzt hab ich es geschafft das er meine formel richtig in die zellen schreibt:

leider akzeptiert er das ganze nicht als formel, sondern als text.

kopiere ich das, was in der zelle drin steht, in eine andere excel tabelle, wird es als formel akzeptiert.

 

Hallo!

Kennst du die Anweisung "FormulaLocal"?

Code:

Sheets("Tabelle1").Cells(3, 3).FormulaLocal = "=WENN((A10="""");"""";SUMMENPRODUKT(N('" & Pfad & "[" & Datei & "]Tabelle1'!C$13:C$4000=A10)))"

Anführungszeichen in der Formel müssen in VBA verdoppelt werden.

 

so wäre es natürlich einfacher gegangen :)

nein formulalocal kannte ich noch nicht


seit dem ich mich jetzt mit vba beschäftige glaub ich immer mehr, dass VBA nix für hobbyprogrammier ist bzw. das ein hobbyprogrammierer kaum VBA ausreizen kann, weil da gibts soo viele dinge welche man wissen muss, das ist schon fast, wie ne eigene programmiersprache lernen (C, C++) etc. vielleicht sogar noch komplexer, weil es hier gleich soviele klasse gibt, mit welchen man was machen kann.

ich mach jetzt seit etwas über ner woche VBA und ich sehe mein wissensstand ist noch so gering ;/

kennt einer von euch nen gutes VBA skript oder ne seite über VBA?

 

Klick mich!