Wenn = Dann ..hilfäää

[DieFabi]

Hallo,

also ich bin ja in Excel absolut kein Profi und verzweifel hier an einer if = than regel :( (2007)

Und zwar nutze ich eine Vorlage in die ich Versandadressen importiere.

In Spalte G (Country) stehen die Länderkürzel wie DE und AT

In Spalte 11 und 12 trage ich die Codierung von DHL momentan noch manuell ein. Sprich wenn die Sendung nach Deutschland geht (DE) Dann kommt in Spalte 11 folgender Text: V01PAK und in Spalte 12 die Zahlenfolge: 52381470610101

Für AT folgt dann jeweils eine andere Zeichen und Zahlenfolge

Wie bekomme ich das jetzt hin das gleichzeitig mit dem Import der Adressen auch die Spalte 11 und 12 mit ausgefüllt wird mit der jeweiligen Zahlen und Zeichenfolge?

Ohje..hoffe ich habe das jetzt einigermaßen verständlich erklärt. Ansonsten versuche ich es auf ein neues

Lieben Dank für Eure Hilfe und Ratschläge

Die Fabi

[silcono]

Hi,

wenn du mehrere Länderkürzel hast, würde ich dir die Select-Case-Anweisung empfehlen, hier werden Bedingungen abgefragt:

Code:

Select Case Spalte-G

  Case "DE"
     Spalte11 = "V01PAK"
     Spalte12 = "52381470610101"

  Case "AT"
     Spalte11 = "blabla"
     Spalte12 = "12345"
End Select

Grüße Silcono

[RPP63]

Moin!
Nicht mit Kanonen auf Spatzen, Silcono!
Entweder eine geschachtelte =Wenn(a;"x";Wenn(b;"y";""))
oder Bezugnahme auf eine Verweistabelle, die man gerne ausblenden darf.

Gruß Ralf

[DieFabi]

Huhu,

Select Case klingt ja ganz gut *lach* Aber wo / wie füge ich sowas ein.
Wie gesagt ich habe da null plan :(

Fabi

[Gast 123]

Hallo

wenn man "Glocken einbauen" soll, aber nicht weiss wo sie haengen sollen und wie man das einrichten muss - dann ist m.E. fachlicher Rat angesagt.
Unter Selct Case kann ich mir nach 20 Jahren programmieren etwas vorstellen, aber Anfaeger  machen dann lustiges Ratespiel.  Was gehört wo hin??

Man Rat:  stelle bitte eine kleine Beispieldatei mit Fantasie Daten ins Forum wo wir sehen in welche Spalten der Import erfolgt und was du wohin auswerten willst.  Wenn meine eine Datei sieht versteht man schnellsten das System.  Dann kann man auch gemeinsam ein Makro entwickeln.  

mfg Gast 123

[RPP63]

Moin!
Wieso Beispieldatei?
Steht doch alles in der Eröffnungsfrage.

Das simpelste dürfte eine (jederzeit erweiterbare) Verweistabelle sein.
Siehe dazu auch meinen Beitrag #3.
Die Verweistabelle:
Tabelle1

	A	B	C
1	LK	Text	Zahl
2	DE	V01PAK	52381470610101
3	AT	V02PVC	62810794707330
4	US	X04YWK	13583994403684
5	GB	K05KWQ	41279437006218

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Die Arbeitstabelle:
Tabelle2

A

B

C

D

E

F

G

H

I

J

K

L

1

Country

Text

Zahl

2

US

X04YWK

13583994403684

3

AT

V02PVC

62810794707330

4

GB

K05KWQ

41279437006218

5

DE

V01PAK

52381470610101

Formeln der Tabelle

Zelle Formel K2 =SVERWEIS($G2;Tabelle1!$A:$C;SPALTE(B1);0)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Die Formel aus K2 kann nach rechts und unten gezogen werden.

Gruß Ralf

[Gast 123]

Hallo Ralf

ich habe die Aufgabe am Anfang vielleicht nicht richtig verstanden, freue mich über deine Lösung. Sie öffnete mir die Augen.

Wenn die Lösung korrekt ist kann man völlig auf If Then und Select Case verzichten. Das ist nur simples kopieren.  Oder sehe ich das wieder falsch ??

mfg Gast 123

Code:

Sub Spalten_kopieren()
'Spalten in Tabelle2 kopieren
 Worksheets("Tabelle1").Columns("A").Copy Worksheets("Tabelle2").Columns(7)
 Worksheets("Tabelle1").Columns("B:C").Copy Worksheets("Tabelle2").Columns(11)
End Sub

[RPP63]

Das ist nur simples kopieren.  Oder sehe ich das wieder falsch ??

Moin Gast 123!
Aus der Threaderöffnung:

Und zwar nutze ich eine Vorlage in die ich Versandadressen importiere.

Deshalb gehe ich davon aus, dass die Vorlage bereits besteht.
Diese müsste dann mit der Verweistabelle sowie den Formeln erweitert werden.
Um das "hässliche" #NV nicht anzuzeigen, müsste die Formel noch erweitert werden:
=WENNFEHLER(SVERWEIS($G2;Tabelle1!$A:$C;SPALTE(B1);0);"")

Gruß Ralf