Datum

Titel

26.04.2024 12:46:38

Nutzereingaben Speichern und Laden

26.04.2024 11:49:48

VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht

26.04.2024 11:38:46

Acrobat PDF Formularfelder mit Excel ausfüllen

26.04.2024 11:23:04

zählen wenn - aber nur die selektierten Zeilen

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1000to1004

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

2 Probleme (für mich)

Forumthread: 2 Probleme (für mich)
6 Beiträge zu diesem Forumthread
Anzeige
299 Threads zu ähnlichen Themen
Top 100 Forumthreads

20.08.2008 18:55:00

Peter

Hallo Excel-Gemeinde,
hier mein 2. Problem:
Aus einer Tabelle kann mann mit Formel "Sverweis ...." einen bestimmten Wert extrahieren.
Sicher geht das auch in VBA, aber wie ? Den extrahierten Wert möchte ich als Variable im weiteren Verlauf
des Makros verwenden.
Gruß,
Peter F.
(zu Euren Lösungsvorschlägen kann ich erst morgen Stellung nehmen).

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

doppelt

20.08.2008 19:03:00

zu
NICHT doppelt, also noch offen oT

20.08.2008 21:58:00

Jens
AW: schon Doppelt

21.08.2008 06:28:00

Hajo_Zi
AW: NICHT doppelt - mit Antwort

21.08.2008 06:55:00

Erich
AW: NICHT doppelt - mit Antwort

21.08.2008 18:20:22

Peter
@Hajo

21.08.2008 10:38:00

Jens

doppelt

20.08.2008 19:03:00

NICHT doppelt, also noch offen oT

20.08.2008 21:58:00

Jens

AW: schon Doppelt

21.08.2008 06:28:00

Hajo_Zi

Hallo Jens,
genauer suchen
https://www.herber.de/forum/messages/1003279.html

AW: NICHT doppelt - mit Antwort

21.08.2008 06:55:00

Erich

Hallo Peter,
hielfen dir diese Beispiele weiter?


Option Explicit
Sub Beispiel()
Dim strSuch As String, varW As Variant, lngErg As Long, strErg As String
' SVERWEIS("abc";A2:C10;2;0)
strSuch = Range("E1").Value
varW = Application.VLookup(strSuch, Range("A2:C10"), 2, 0)
If Not IsError(varW) Then lngErg = varW
' oder
' SVERWEIS(E1;A2:C10;3;WAHR)
varW = Application.VLookup(Cells(1, 5), Range("A2:C10"), 3, True)
If Not IsError(varW) Then strErg = varW
End Sub

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
P.S. für Hajo:
Was an der Frage ist doppelt - abgesehen vom etwas unglücklich gewählten Betreff (und dem Fragesteller)?

AW: NICHT doppelt - mit Antwort

21.08.2008 18:20:22

Peter

Hallo Erich,
danke für den Code. Der erste Teil hat nach dem Einfügen und Anpassen an meinen Code schon das erwünschte Ergebnis geliefert, so dass ich das "oder " nicht mehr brauchte.
Nochmals danke für deine bereits wiederholte Hilfe und vielleicht bis zum nächsten Mal.
Peter F.

@Hajo

21.08.2008 10:38:00

Jens

Hallo Hajo
Genauer schauen. Das sind 2 unterschiedliche Fragen.
Ist vielleicht etwas unglücklich gemacht vom Fragesteller.
Gruß aus dem Sauerland
Jens