Anhand der Abkürzungen die Firma ermitteln ?

Forumthread: Anhand der Abkürzungen die Firma ermitteln ?

11.11.2007 12:34:06

Selma

Hallo Leute,
wenn fünfte, sechste und siebte Stelle des Zelleninhalts der Spalte B:
...ein "RMP" ist dann soll in Spalte G dies "Firma Reiters" eingetragen werden
...ein "DSA" ist dann soll in Spalte G dies "Dickels & Parner" eingetragen werden
...ein "TWS" ist dann soll in Spalte G dies "Trummer GmbH" eingetragen werden
...ein "BCK" ist dann soll in Spalte G dies "Brauckmann" eingetragen werden
...ein "WOL" ist dann soll in Spalte G dies "Wollters" eingetragen werden
Anfang in Zeile 2, Ende in letzte gefüllte Zelle der Spalte B.
Wie mache ich das per VBA ?
Vielen Dank im Voraus.
Liebe Grüße
Selma

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Anhand der Abkürzungen die Firma ermitteln ?

11.11.2007 12:40:00

Josef

Hallo Selma,
das geht doch per Formel viel einfacher.
Tabelle3

	A	B	C	D	E	F	G	H	I	J
1	ÜB 1	ÜB 14	ÜB 2	ÜB 3	ÜB 4	ÜB 5	ÜB 6		Abkürzung	Firma
2	Eingang	ARC_RMP_5_4_DT_99_06_A_B1.pdf	Text1	Text1	Text1	Text1	Firma Reiters		RMP	Firma Reiters
3	Eingang	RWE_RMP_5_4_GT_ZG_06_Ohne Status_B1.pdf	Text3	Text3	Text3	Text3	Firma Reiters		DSA	Dickels & Parner
4	Eingang	ARC_DSA_5_4_DT_99_06_A_B1.pdf	Text4	Text4	Text4	Text4	Dickels & Parner		TWS	Trummer GmbH
5	Eingang	ECE_DSA_5_4_DT_ZG_06_Vorabzug_B1.pdf	Text5	Text5	Text5	Text5	Dickels & Parner		BCK	Brauckmann
6	Eingang	ECE_TWS_5_4_DT_ZG_06_T_B1.pdf	Text7	Text7	Text7	Text7	Trummer GmbH		WOL	Wollters
7	Eingang	ARC_RMP_5_4_DT_99_06_A_B1.pdf	Text8	Text8	Text8	Text8	Firma Reiters
8	Eingang	ARC_BCK_5_4_DT_99_06_A_B1.pdf	Text9	Text9	Text9	Text9	Brauckmann
9	Eingang	ECE_WOL_5_4_DT_ZG_06_T_B1.pdf	Text12	Text12	Text12	Text12	Wollters

Formeln der Tabelle

Zelle	Formel
G2	=SVERWEIS(TEIL(B2;5;3); $I$2:$J$6;2;0)

Excel Tabellen im Web darstellen Excel Jeanie HTML

Gruß Sepp

AW: Anhand der Abkürzungen die Firma ermitteln ?

11.11.2007 12:46:55

Daniel

Hi
per VBA würd ich das nicht machen, sondern so:
- Hilfstabelle anlegen, 1. Spalte die Abkürzung, 2. Spalte der ausgeschriebenen Name
- die Namen per SVERWEIS-Formel zuspielen: =SVerweis(teil(B2;5;3);TabelleXY!$A$1:$B$10;2;0)
(wobei für TabelleXY!$A$1:$B$10 der Zellbezug zur Hilfstabelle einzusetzen ist)
auch wenns per VBA sein muss, weil du regelmäßig neu erstellte Tabelle überarbeiten musst, würde ich es genauso machen, dh Hilfstabelle einmalig erstellen und dann per VBA nur die SVERWEIS-Formel in Spalte G schreiben. (wie das geht, kannst du mit dem Recorder rausfinden)
Gruß, Daniel

AW: Anhand der Abkürzungen die Firma ermitteln ?

11.11.2007 12:58:00

Selma

Hallo Sepp, hallo Daniel,
danke für die Antworten. Ich werde es mit Formeln versuchen, dies per VBA zu machen, weil ich es in ein vorhandenes Makro einfügen möchte.
Liebe Grüße,
Selma

Beliebteste Forumthreads (12 Monate)

Anhand der Abkürzungen die Firma ermitteln ?

Forumthread: Anhand der Abkürzungen die Firma ermitteln ?

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread