Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Formelteil mit var. Zeilennummer ersetzen
zurück: Per VBA xlt-Dokumente erstellen. weiter: Excel Addins brauchen beim Starten und Beenden viel Zeit Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Henker46
Im Profil kannst Du frei den Rang ändern


Verfasst am:
20. Jun 2012, 06:54
Rufname:

Formelteil mit var. Zeilennummer ersetzen - Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Guten Morgen,

ich habe in meiner Tabelle in den Spalten B-K von Zeile 4 bis 993 Formeln stehen, die mir anhand einer Artikelnummer in Spalte A Preise raussucht.

Hier ein Beispiel einer solchen Formel:

WENN(UND(ISTFEHLER(SUCHEN("IK";$A4;FINDEN("-";$A4)));ISTFEHLER(SUCHEN("S";$A4;FINDEN("-";$A4))));0;SVERWEIS(TEIL($A4;FINDEN("-";$A4)+1;3);$Q$6:$T$17;2;FALSCH))

Den unterstrichenen Teil muss ich nun zu folgendem ersetzen:
FINDEN("-";$A4;3)

Mein Problem ist die fortlaufende Zeilennummer. Dies hier (per Makro aufgezeichnet und umgebastelt) funktioniert leider nicht:

Replace What:="FINDEN(""-"";$A" & i & ")", Replacement:="FINDEN(""-"";$A" & i & ";3)"

Zudem ist zu beachten, dass in einigen Zellen im o. g. Bereich manuell eingetragene Werte stehen, die nicht überschrieben werden dürfen.

Ich danke für jede Hilfe.
werni
Solala


Verfasst am:
20. Jun 2012, 07:47
Rufname: werni
Wohnort: Ennenda GL


AW: Formelteil mit var. Zeilennummer ersetzen - AW: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Hallo

Warum per VBA?

Spalte markieren
Suchen/Ersetzen

Suche: FINDEN("-";$A4)))
Ersetzen: FINDEN("-";$A4;3)))

Alle ersetzen, das bezieht sich auf den markierten Bereich. Und dann Schliessen.


Das ist schon alles

Gruss werni

_________________
"Die Summe aller Intelligenz auf Erden ist konstant, aber die Anzahl Individuen steigt."
. EINSTEIN
Henker46
Im Profil kannst Du frei den Rang ändern


Verfasst am:
20. Jun 2012, 07:54
Rufname:

AW: Formelteil mit var. Zeilennummer ersetzen - AW: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Schön wenn's so einfach wäre...

Das Problem sind die fortlaufenden Zeilennummern in dem Bereich

In den Formeln in Zeile 4 steht A4
Zeile 5 -> A5
...
Zeile 993 - >A993

Da ich keine Lösung für Suchen/Ersetzen gefunden habe, mit der Platzhalterzeichen bleiben (Stichworte bei Google "Platzhalter referenzieren") müsste ich das ganze 993x durchführen und jedes mal die Suchen u. Ersetzen Parameter ändern..

Deshalb per VBA...
werni
Solala


Verfasst am:
20. Jun 2012, 08:55
Rufname: werni
Wohnort: Ennenda GL

AW: Formelteil mit var. Zeilennummer ersetzen - AW: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Hallo

Und wenn du die Formel einfach nach unten ziehst?

Gruss werni

_________________
"Die Summe aller Intelligenz auf Erden ist konstant, aber die Anzahl Individuen steigt."
. EINSTEIN
Henker46
Im Profil kannst Du frei den Rang ändern


Verfasst am:
20. Jun 2012, 09:07
Rufname:

Re: Formelteil mit var. Zeilennummer ersetzen - Re: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

[quote="Henker46 - 20. Jun 2012, 06:54"]Zudem ist zu beachten, dass in einigen Zellen im o. g. Bereich manuell eingetragene Werte stehen, die nicht überschrieben werden dürfen.quote]

Ich sehe leider nicht sofort, welche Werte manuell eingetragen sind, d. h. ich müsste immer bis zu einer (un)gewissen Zeile runterziehen; schauen, ob die nächste Zelle manuell ist.
Ferner ist es auch nicht so, dass wenn der Wert z. B. in B85 manuell ist, der Wert in den anderen Spalten in Zeile 85 auch manuell ist.

Und mit Formeln einblenden und dann runterziehen funktioniert leider auch nicht soooo toll.
rogstar
learning by doing


Verfasst am:
20. Jun 2012, 09:19
Rufname:
Wohnort: _Hessen_

AW: Formelteil mit var. Zeilennummer ersetzen - AW: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Hallo,
so wird in Spalte B der Teil ersetzt.
Code:
Sub test()
    Dim i As Integer
    For i = 4 To 993
        Cells(i, 2).Formula = Replace(Cells(i, 2).Formula, "FIND(""-"",$A" & i, "FIND(""-"",$A" & i & ",3")
    Next i
End Sub

_________________
Gruß, Tobias
Henker46
Im Profil kannst Du frei den Rang ändern


Verfasst am:
20. Jun 2012, 10:04
Rufname:


AW: Formelteil mit var. Zeilennummer ersetzen - AW: Formelteil mit var. Zeilennummer ersetzen

Nach oben
       Version: Office 2007

Vielen Dank...hat ohne Probleme funktioniert!

Jetzt seh ich im Vergleich zu dem aus meinem Erstpost auch, wo der Fehler liegt.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Werte in Feldern ersetzen 4 LexGor 314 03. Jul 2008, 15:16
LexGor Werte in Feldern ersetzen
Keine neuen Beiträge Excel Formeln: Zeilennummer 4 Gast 1314 23. Mai 2008, 16:36
Gast Zeilennummer
Keine neuen Beiträge Excel Formeln: Formeln durch Werte ersetzen 5 Fabi 491 07. Mai 2008, 08:43
Fabi Formeln durch Werte ersetzen
Keine neuen Beiträge Excel Formeln: Ersetzen einer Zahl 2 Nicki1978 405 03. März 2008, 16:22
Gast Ersetzen einer Zahl
Keine neuen Beiträge Excel Formeln: Letzte Zeilennummer einer Spalte 6 mathmanne 592 25. Nov 2007, 21:51
mathmanne Letzte Zeilennummer einer Spalte
Keine neuen Beiträge Excel Formeln: Nachkommastellen ersetzen (Industrieminuten) 5 Manfredo 1864 21. Aug 2007, 16:38
McAdder Nachkommastellen ersetzen (Industrieminuten)
Keine neuen Beiträge Excel Formeln: Formeln durch Werte ersetzen, die Summenzeilen jedoch nicht 7 CorinnaK 735 26. Apr 2007, 11:33
hukahey73 Formeln durch Werte ersetzen, die Summenzeilen jedoch nicht
Keine neuen Beiträge Excel Formeln: #BEZUG! ersetzen 2 tin 1370 12. Apr 2007, 15:16
< Peter > #BEZUG! ersetzen
Keine neuen Beiträge Excel Formeln: Ersetzen von Formelteilen funktioniert nicht 2 iceview 526 11. Apr 2007, 11:17
iceview Ersetzen von Formelteilen funktioniert nicht
Keine neuen Beiträge Excel Formeln: Log auswerten und nach Liste ersetzen 0 spooky23 617 26. Feb 2007, 13:18
spooky23 Log auswerten und nach Liste ersetzen
Keine neuen Beiträge Excel Formeln: Zeilennummer des größten Werts ausgeben 18 Bertl133 1656 25. Feb 2007, 11:47
fridgenep Zeilennummer des größten Werts ausgeben
Keine neuen Beiträge Excel Formeln: Text überprüfen und ersetzen 3 miwo99 718 10. Jan 2007, 14:41
miwo99 Text überprüfen und ersetzen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Macromedia Dreamweaver