Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Preis aus Zelleintrag!!

Preis aus Zelleintrag!!
11.02.2008 08:56:00
Baronf
Habe aus einem ERP Daten gezogen und in Excel geöffnet. Der komplette Eintrag ist in in einer Zelle. Ich brauche aus dieser Zelle den Preis separat. Der Preis kann 3 stellig bis 8 stelleig sein. BSP
4711 Fächerräder FR 16530 A120, Bohrung 20,56 ; der Preis beträgt 20,56 ; steht rechts neben dem ersten Leerzeichen von rechts.
Gibt es da eine variable Formel?
Danke
Frederieke

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Preis aus Zelleintrag!!
11.02.2008 09:04:02
M@x
Hi,
wie wärs mit Daten - Textin Spalten,
eventuell sind 2 Durchgänge nötig
Gruss
M@x

AW: Preis aus Zelleintrag!!
11.02.2008 09:13:00
Rudi
Hallo,
=TEIL(A1;FINDEN("|";WECHSELN(A1;" ";"|";LÄNGE(A1)-LÄNGE(WECHSELN(A1;" ";""))))+1;255)*1
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Preis aus Zelleintrag!!
11.02.2008 09:13:00
Peter
Hallo Frederieke,
mit der nachfolgenden Function sollte es gehen:


Option Explicit
Public Function Preis(Eingabe As String) As Double
Dim iPosition As Integer
   iPosition = InStrRev(Eingabe, " ")
   If iPosition > 0 Then
      Preis = CDbl(Mid(Eingabe, iPosition + 1))
   End If
End Function 


Wenn dein Test in A1 steht: in B1: =Preis(A1)
Gruß Peter
Anzeige
AW: Preis aus Zelleintrag!!
11.02.2008 09:20:00
Peter
Hallo Frederieke,
so funktioniert die Function auch, wenn an der vermuteten Stelle kein Preis steht


Option Explicit
Public Function Preis(Eingabe As String) As Double
Dim iPosition As Integer
   Eingabe = Trim(Eingabe)
   iPosition = InStrRev(Eingabe, " ")
   If iPosition > 0 Then
      If IsNumeric(Mid(Eingabe, iPosition + 1)) Then
         Preis = CDbl(Mid(Eingabe, iPosition + 1))
      End If
   End If
End Function 


Gruß Peter
Anzeige
Alertnative
11.02.2008 09:37:00
Rudi
Hallo,
mit Matrixformel so:
{=TEIL(A1;MAX(WENN(TEIL(A1;ZEILE(1:100);1)=" ";ZEILE(1:100);""));255)*1}
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige