Hilfe bei VBA

Forumthread: Hilfe bei VBA

Hilfe bei VBA

02.06.2007 19:04:00

Georg

Hallo zusammen,
ich habe meine Tabelle um etliche Spalten erweitert, nun komme ich mit zwei Formeln (wenn/dann und sverweis) an die Grenzen von Excel. Ist es möglich diese Formeln in ein Makro, welches automatisch die Daten aktualisiert, umzuwandeln?
Die entsprechenden Spalten habe ich rot markiert.
Vielen dank für Eure Hilfe!!
Gruß Georg
https://www.herber.de/bbs/user/42975.xls

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Hilfe bei VBA

02.06.2007 19:11:00

Matthias
AW: Hilfe bei VBA

02.06.2007 19:20:00

Georg
AW: Hilfe bei VBA

02.06.2007 20:09:31

Matthias
AW: Hilfe bei VBA

02.06.2007 20:22:00

Georg
AW: Hilfe bei VBA

02.06.2007 20:25:00

Matthias
AW: Hilfe bei VBA

02.06.2007 20:34:23

Georg
AW: Hilfe bei VBA

02.06.2007 20:54:00

Matthias
AW: Hilfe bei VBA

02.06.2007 21:20:00

Georg

AW: Hilfe bei VBA

02.06.2007 19:11:00

Matthias

Hallo Georg,
welche Grenzen von Excel meinst du?
Gruß Matthias

AW: Hilfe bei VBA

02.06.2007 19:20:00

Georg

Hallo Matthias,
ich meine die Anzahl der WENN/DANN Funktionen in einer Formel.
Gruß Georg

AW: Hilfe bei VBA

02.06.2007 20:09:31

Matthias

Hallo Georg,
die Wenns sind ja nicht verschachtelt, es handelt sich eher um eine Begrenzung der maximalen Länge einer Formel.
Mit untenstehendem Makro trägst du die Teilsummen in die Spalten rechts der Tabelle ein und die Summenformel in die Spalten CT und CU. Das ganze geschieht aber nur in Zeile 7 (in Zeile 6 nocht die Shop-Beschriftung), aber das Ziehen der Formeln nach unten dürfte ja kein Problem darstellen.
Es tritt bei mir noch ein !BEZUG-Fehler auf, der aber wahrscheinlich an derUnvollständigkeit deiner hochgeladenen Beispieltabelle liegt.
Der Code:


Sub FormelnEintragen()
Dim i As Integer, x As Integer
Dim f As String
For i = 1 To 46
x = 2 * i + 1
f = "=" & "IF(" & spB(x) & "5

Gruß Matthias

AW: Hilfe bei VBA

02.06.2007 20:22:00

Georg

Hallo Matthias,
vielen Dank für die schnelle Antwort.
Ich habe nun ein neues Makro erstellt und Deinen Code eingefügt. Beim Ausführen des Makros bekomme ich folgende Fehlermeldung:
Fehler beim Kompilieren:
Sub oder Funktion nicht definiert
In Zeile 7 ist der Befehl "spB" blau hinterlegt.
Kannst Du bitte prüfen woran das liegt?
Nochmals vielen DANK
Gruß Georg

AW: Hilfe bei VBA

02.06.2007 20:25:00

Matthias

Hallo Georg,
ach Sorry, diesen Codeteil hab ich vergessen, bitte noch ergänzen (ins gleiche Modul):


Function spB(sp As Integer) As String
Dim tmp As String
tmp = Cells(1, sp).EntireColumn.Address(0, 0)
spB = Left(tmp, InStr(tmp, ":") - 1)
End Function

Gruß Matthias

AW: Hilfe bei VBA

02.06.2007 20:34:23

Georg

Hallo Matthias,
muss ich den zusätzlichen Code, so wie er ist, an eine bestimmte Stelle einfügen?
Gruß Georg
Am besten, du postest den kompletten Code.

AW: Hilfe bei VBA

02.06.2007 20:54:00

Matthias

Hallo Georg,
den einen unter den anderen, Reihenfolge ist egal. Du mustt dann das Makro FormelEinfügen starten.


Sub ...()
End Sub
Function()
End Function

Gruß Matthias

AW: Hilfe bei VBA

02.06.2007 21:20:00

Georg

Hallo Matthias,
hat super funktioniert!!!!!!!!!!
Vielen Dank.
Gurß Georg

Beliebteste Forumthreads (12 Monate)

Forumthread: Hilfe bei VBA

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread