Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Gleichheitszeichen in VBA-Code

Gleichheitszeichen in VBA-Code
30.12.2004 18:26:02
ingo
Hallo,
schaut mal, das folgende wollte ich haben:

Sub toll()
i = 1
Do While i < 10
Sheets(5).Cells(i + 6, 4).Value = "='0" & i & "'!$B$66*8,5"
i = i + 1
Loop
End Sub

Leider funktioniert es nicht, weil das eine Gleichheitszeichen ("='0") innerhalb der Anführungszeichen Probleme bereitet.
Kann ich das irgendwie anders lösen?
Danke für Hilfe
Ingo
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gleichheitszeichen in VBA-Code
30.12.2004 18:39:24
Christoph
Hi Ingo
so zB
Gruß
Christoph

Option Explicit
Sub toll()
Dim i As Byte
i = 1
Do While i < 10
Sheets(5).Cells(i + 6, 4).FormulaLocal = "='0" & i & "'!$B$66*8,5"
i = i + 1
Loop
End Sub

AW: Gleichheitszeichen in VBA-Code
30.12.2004 19:59:33
ingo
Hallo Christoph,
danke für die schnelle und tolle Antwort!
Alle Probleme sind gelöst.
Ingo
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Gleichheitszeichen in VBA-Code verwenden


Schritt-für-Schritt-Anleitung

Um das Gleichheitszeichen in VBA korrekt zu verwenden, insbesondere wenn du es als Teil einer Formel in Excel einfügen möchtest, folge diesen Schritten:

  1. Öffne den Visual Basic for Applications (VBA)-Editor in Excel.

  2. Erstelle ein neues Modul, indem du mit der rechten Maustaste auf „VBAProject“ klickst und „Modul einfügen“ wählst.

  3. Füge den folgenden Code ein:

    Option Explicit
    Sub toll()
       Dim i As Byte
       i = 1
       Do While i < 10
           Sheets(5).Cells(i + 6, 4).FormulaLocal = "='0" & i & "'!$B$66*8,5"
           i = i + 1
       Loop
    End Sub
  4. Schließe den VBA-Editor und führe das Makro aus. Du wirst sehen, dass die Formeln korrekt in die Zellen eingefügt werden.


Häufige Fehler und Lösungen

  • Problem: Das Gleichheitszeichen wird nicht korrekt interpretiert.

    • Lösung: Stelle sicher, dass du die .FormulaLocal-Eigenschaft verwendest, um das Gleichheitszeichen als Teil einer Formel einzufügen. Dies verhindert Probleme mit dem Zeichen innerhalb der Anführungszeichen.
  • Problem: Der Code führt zu einem Laufzeitfehler.

    • Lösung: Überprüfe, ob das Zielblatt (in diesem Beispiel „Sheets(5)“) tatsächlich existiert und dass die Zellen, in die du schreibst, korrekt referenziert sind.

Alternative Methoden

Eine alternative Methode, um das Gleichheitszeichen in Excel zu verwenden, ist das direkte Einfügen von Text in die Zelle, ohne eine Formel zu erstellen. Du kannst das Gleichheitszeichen als Text einfügen, indem du ein Apostroph ' davor setzt:

Sheets(5).Cells(i + 6, 4).Value = "'=0" & i & "'!$B$66*8,5"

Dies behandelt das Gleichheitszeichen als Text und nicht als Formel.


Praktische Beispiele

Hier sind einige Beispiele, wie du das Gleichheitszeichen in VBA verwenden kannst:

  1. Einfügen einer einfachen Formel:

    Sheets(1).Cells(1, 1).FormulaLocal = "=SUM(A1:A10)"
  2. Verwendung des Gleichheitszeichens in einer Schleife:

    Sub Beispiel()
       Dim i As Integer
       For i = 1 To 10
           Sheets(1).Cells(i, 1).FormulaLocal = "=A" & i & "+B" & i
       Next i
    End Sub
  3. Gleichheitszeichen als Text in einer Zelle:

    Sheets(1).Cells(1, 1).Value = "'=A1+B1"

Tipps für Profis

  • Nutze die .Formula-Eigenschaft, wenn du sicher bist, dass die Spracheinstellungen deiner Excel-Version auf Englisch eingestellt sind. Andernfalls ist .FormulaLocal die sicherere Wahl.
  • Wenn du Formeln dynamisch erstellst, achte darauf, wie du Anführungszeichen und das Gleichheitszeichen kombinierst, um Syntaxfehler zu vermeiden.
  • Um Kommentare oder nicht ausführbaren Code zu erstellen, kannst du vba auskommentieren, indem du ein Apostroph ' vor die Zeile setzt.

FAQ: Häufige Fragen

1. Wie kann ich ein Gleichheitszeichen in eine Zelle als Text einfügen?
Füge ein Apostroph ' vor dem Gleichheitszeichen hinzu, um sicherzustellen, dass es als Text interpretiert wird.

2. Was ist der Unterschied zwischen .FormulaLocal und .Formula?
.FormulaLocal berücksichtigt die Spracheinstellungen deiner Excel-Version, während .Formula die Formel in Englisch erwartet.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige