Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Noob kommt nicht weiter
10.01.2016 09:43:44 Rafael
NotSolved
10.01.2016 20:01:28 Gast77981
NotSolved
10.01.2016 20:35:24 Gast16068
NotSolved
11.01.2016 15:41:29 Rafael
NotSolved
11.01.2016 16:06:45 Gast54295
NotSolved
11.01.2016 16:20:58 Rafael
NotSolved
11.01.2016 16:24:34 Gast79487
NotSolved
12.01.2016 08:45:45 Rafael
NotSolved

Ansicht des Beitrags:
Von:
Rafael
Datum:
10.01.2016 09:43:44
Views:
680
Rating: Antwort:
  Ja
Thema:
VBA Noob kommt nicht weiter
Hallo werte Community, ich bin ein VBA noob und weiß an dieser STelle nicht mehr weiter und wollte um Hilfe bzw. Ratschlag bitten.

Zu meinem Problem:
05.10.2015
06.10.2015
Wien Hartberg
St. Pölten Mauerbach
Linz Wien
Graz Königstetten
Vösendorf Tulln
Mauerbach Bärenbach
(leer) Krank
Krank Pflege. U.
Urlaub Mauer
Tulln Mautern
Mautern Steyr

Ich habe auf der einen Seite einmal diese Tabelle, welche per VBA funktion nach den verschiedenen Werte abzusuchen ist. Das habe ich per funktion geschafft und mich richtig gefreut. Der Code ist unten zu finden: Sub Maekro3() schreibzeile = 5 For Each c In Range("C2:D12").Cells eintrag = c.Value gef = False For Zeile = 5 To schreibzeile If Cells(Zeile, 1).Value = eintrag Then gef = True Next If gef = False Then Cells(schreibzeile, 1).Value = eintrag schreibzeile = schreibzeile + 1 End If Next End Sub Die Ausgabe hat folgendes richtig ergeben:

Wien
Hartberg
St. Pölten
Mauerbach
Linz
Graz
Königstetten
Vösendorf
Tulln
Bärenbach
(leer)
Krank
Pflege. U.
Urlaub
Mauer
Mautern
Steyr

Nun habe ich diese Werte drei Spalten in einem neuen Tab abgespeichert und  zugewiesen. hier die Übersicht:

abwesend Nahe Fern
Pflege. U. Wien St. Pölten
(leer) Vösendorf Linz
Krank Mauerbach Graz
Urlaub Tulln Mautern
  Königstetten Hartberg
    Bärenbach
    Mauer
    Steyr

 

Meine Frage ist nun die folgende: Ich brauche eine Funktion die alle Werte in C2:D12 findet und diese dann in der Tabelle(F2:H9) sucht und  dann den Name zuweist der Spalte zuweist.. Also in der Spalte C6 steht Vösendorf dann muss die Funktion in den Spalten abwesend, Nahe und Fern suchen und dann den Namen der Spalten  ausgeben, in diesem Fall: Nahe.

Ich habe bereits das Internet auf Code der mir helfen könnten durchsucht und glaube aber nichts brauchbares gefunden zu haben, ich hoffe jemand kann mir da ein wenig weiter helfen.

Ganz liebe Grüße Rafael

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Noob kommt nicht weiter
10.01.2016 09:43:44 Rafael
NotSolved
10.01.2016 20:01:28 Gast77981
NotSolved
10.01.2016 20:35:24 Gast16068
NotSolved
11.01.2016 15:41:29 Rafael
NotSolved
11.01.2016 16:06:45 Gast54295
NotSolved
11.01.2016 16:20:58 Rafael
NotSolved
11.01.2016 16:24:34 Gast79487
NotSolved
12.01.2016 08:45:45 Rafael
NotSolved