Office: Umbau von einem office 2000 nach Office 2007 Code

Hallo Leute,

ich habe nun endlich mich getraut und bin nun von Ecxel 2000 auf Excel 2007 umgestiegen. Nun ist das Problem das einige VBA-Codes nicht mehr funktionieren.
Aktuell hab ich diesen Code hier der nicht mehr funktioniert. Da ich diesen von Schatzi damals bekommen hatte und ich immer noch nicht genau weiß wo der Unterschied zwischen Excel 2000 und Excel 2007 ist, brauch ich wieder eure Hilfe um dieses Problem zu lösen:

Das steht in Modul 1
Function xyz(ErsteTab As String, _
LetzteTab As String, _
Bereich As String, _
Versatz As Integer, _
Such As Range)
Dim i As Integer, Zelle As Range
Application.Volatile
For i = Sheets(ErsteTab).Index To Sheets(LetzteTab).Index
For Each Zelle In Sheets(i).Range(Bereich)
If Zelle = Such Then xyz = xyz & vbLf & Zelle.Offset(0, Versatz)
Next Zelle
Next i
If IsEmpty(xyz) Then
xyz = ""
Exit Function
End If
xyz = Mid(xyz, 2, Len(xyz) - 1)
End Function


und das steht halt in den zellen in der die Werte wieder gegeben werden sollen

=xyz("Beginn";"Ende";"A1:A700";2;A2)

Wäre nett wenn mir einer da helfen könnte.

Als kleine Anmerkung noch: es sind insgesamt 107 Tabellen die "Anfangs"- und "Ende"- Tabelle mit einberechnet.

Vielen Dank schon mal im voraus.

mfg
adpar

 

Hallo adpar,

Das ist nun wirklich sehr "dünn" und sagt mir gar nichts. Welcher Fehler tritt denn auf? Ideal wäre, wenn du vor die Zeile Application Volatile eine neue Zeile mit Stop einfügst. Dort hät die Funktion dann an. Mit F8 schaltest du dann Schritt für Schritt weiter und dort, wo die Function meckert, steckt dann auch der/ein Fehler. Ich selbst sehe derzeit keinen Fehler im Code ...

 

Hallo Nemo!
Er sagt immer #Name
Das mit dem Stop bekomme ich irgendwie nicht hin. Habs da eingefügt wo du geschrieben hast.
Sobald ich auf Berechnen gehe schaltet er auch schon auf #Name und mit der F8 passiert nichts mehr.

mfg
adpar

 

Hallo adpar,

ganz klar, Excel erkennt den Namen der Function nicht. Da sehe ich nur 2 Möglichkeiten: Entweder du schreibst den Namen der Function (immer wieder) falsch, was ich aber nicht glaube. Oder aber die Function steht am falschen Platz. Sie gehört in ein allgemeines Modul der Datei, wo die Daten drin stehen, also beispielsweise in Modul1 einfügen.

 

Hallo!

Der Code läuft auch auf neueren Excel-Versionen, daran kann es also nicht liegen.
Bist du sicher, dass VBA in der Mappe auch aktiviert ist? Denn Cpt Nemo hat recht: #NAME? bedeutet hier wohl, dass Excel diese Funktion gar nicht findet!

 

Wo kann ich das bei Excel 2007 nach schauen? Die Menuführung ist echt Gewöhnungsbedürftig. Hab bis jetzt nur die Berechnung der Formeln MAnuell;Automatisch gefunden

 

Ditekt nach dem Öffnen der Datei könnte auf Höhe der Bearbeitungsleiste eine entsprechende Meldung erscheinen.
Einstellungsmöglichkeiten bzgl. Makros findest du unter Office-Button > Excel-Optionen > Sicherheitscenter

 

So!Habt Recht gehabt. Irgendwie war das VBA abgeschaltet gewesen. Vielen lieben Dank für die schnelle Hilfe.
Jetzt muss ich alles nochmal lernen wo ich was bei Excel finde. Das wird wieder dauern.

mfg
adpar

 

Hallo!

Da die Oberfläche ab XL07 wirklich grunderneuert wurde, hat Microsoft ein interaktives Referenzhandbuch zur Verfügung gestellt:
http://office.microsoft.com/de-de/e...-und-excel-2007-im-vergleich-HA010149151.aspx
Mir hat das Teil damals einige Male recht gut geholfen.