Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel per Makro

Forumthread: Formel per Makro

Formel per Makro
30.03.2008 12:58:00
Dieter.G
Hallo zusammen,
in Tabelle1 werden täglich neue Daten eingefügt.
Für die Auswertung soll jetzt mit einem Makro in Spalte AI ab Zeile2 in jede Zeile neben den Daten eine "SVerweis-Formel" eingefügt werden. =SVERWEIS(I2;Preise!$C$1:$G$25000;5;0), =SVERWEIS(I3;Preise!$C$1:$G$25000;5;0), =SVERWEIS(I3;Preise!$C$1:$G$25000;5;0) usw.
Die Formel soll aber nur eingefügt werden, wenn sich in der Zeile Daten befinden!
Danke
Gruß Dieter

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel per Makro
30.03.2008 13:18:36
Tino
Hallo,
habe hier mal ein Beispiel aufgebaut.
Spalte Daten ist im Beispiel Spalte A, muss eventuell angepasst werden.
https://www.herber.de/bbs/user/51143.xls
Gruß
Tino

sorry erst jetzt gesehen. i2, i3 ...
30.03.2008 13:34:00
Tino
Hallo,
habe erst jetzt gesehen, dass I2,I3 usw. mitgehen muss.
https://www.herber.de/bbs/user/51144.xls
Gruß
Tino

Anzeige
AW: Formel per Makro
30.03.2008 13:38:13
Dieter.G
Hallo Tino,
lässt sich das auch als "normales" Makro mit einem Button starten?
Wenn ich das versuche bekomme immer eine Fehlermeldung: "Fehler beim kompilieren: Variable nicht definiert"
Gruß Dieter

AW: Formel per Makro
30.03.2008 13:42:00
Gerd
Hallo Dieter,
mal nur die Quintessenz.

Sub Ungetestet()
Dim lngCt As Long
With Worksheets("Tabelle1")
For lngCt = 2 To .Cells(Rows.Count, 1).End(xlUp).Row
If Not IsEmpty(.Cells(lngCt, 1)) Then
.Cells(lngCt, 2).FormulaLocal = "=SVERWEIS(I" & lngCt & ";Preise!$C$1:$G$25000;5;0)"
End If
Next
End With
End Sub


ClearContents, EnableEvents etc. kannst ja noch bei Bedarf dazubasteln.
Gruß Gerd

Anzeige
AW: Formel per Makro
30.03.2008 13:45:04
Tino
Hallo,
als normales Makro so.
Den Bereich habe ich von A2 bis A500 eingestellt,
kannst du ja noch an deine Bedürfnisse anpassen.
https://www.herber.de/bbs/user/51145.xls
Gruß
Tino
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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