Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1408to1412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Formel schreiben per vba

Formel schreiben per vba
17.02.2015 09:35:59
Jana
Guten Tag,
ich habe Probleme mit einem Code, der leider nicht funktioniert. Ich möchte gerne zwei nebeneinander stehende Spalten dividieren (G durch F) und habe folgenden Code geschrieben:
For j = 1 To 100
Range("H" & j).Select
ActiveCell.FormulaLocal = "=" & "ActiveCell.Offset(0, -1).Address" & "/" & "ActiveCell.Offset(0, -2).Address"
Next j
Für Hilfe bin ich sehr dankbar:)
Viele Grüße
Jana

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel schreiben per vba
17.02.2015 09:42:29
ransi
Hallo Jana
ICh glaube du bist da zu umständlich unterwegs...
Versuch mal so:
Option Explicit

Sub machs()
    With Sheets("Tabelle1").Range("H1:H100")
        .FormulaLocal = "=H2/H3"
        '.Value = .Value
    End With
End Sub


ransi

Anzeige
AW: Formel schreiben per vba
17.02.2015 09:44:46
ransi
Hallo Jana,
Korrektur:
Option Explicit

Sub machs()
    With Sheets("Tabelle1").Range("H1:H100")
        .FormulaLocal = "=G1/F1"
        '.Value = .Value
    End With
End Sub


ransi

Anzeige
AW: Formel schreiben per vba
17.02.2015 10:05:30
Daniel
Hi
beim Formelschreiben per VBA ist die R1C1-Addressierungsart oft die besser:
Range("H1:H100").FormulaR1C1 = "=RC[-1]/RC[-2]"
du kannst die Formel in alle Zellen gleichzeitig schreiben.
Vorteil der R1C1-Schreibweise ist, dass sich die Formel nicht ändertn, wenn sich das ganze um ein paar Spalten passiert oder wenn du noch Überschriften einfügst und du de Formeln erst ab Zeile 2 oder später beginnt.
Gruß Daniel

AW: Formel schreiben per vba
17.02.2015 10:23:00
Jana
Vielen Dank für Eure Antworten! Nun klappt es:)

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige