Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
756to760
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Trennen einer Varibeln...

Trennen einer Varibeln...
19.04.2006 13:05:19
Swen
Hallo an alle,
folgende strings möchte ich gerne trennen
Beispiel1 = "1 - 2345µm/23456µm"
Beispiel2 = "23 - 12µm/45µm"
und zwar möchte ich das die erste varibael a heißt und
folgende bedingung erfüllt
sie besteht aus der ersten zahl bis zum erste space
in den beiden fällen wäre das dann
Beispiel1 a=1
Beispiel2 a=23
die zweite varibale soll b heißen und
hinter dem space nach dem "-" beginnen bis zum erste "µ"
Beispiel1 b=2345
Beispiel2 b=12
die letzte varibale soll c heißen und
hinter dem "/" beginnen bis zum zweiten "µ"
Beispiel1 b=23456
Beispiel2 b=45
kann mir da jemand helfen?
gruß
Swen

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Trennen einer Varibeln...
19.04.2006 13:18:52
Matthias
Hallo Swen,
Variable a, b, c.. Soll das wohl in VBA sein?
Gruß Matthias
AW: Trennen einer Varibeln...
19.04.2006 13:20:34
Swen
Hallo Matthias,
genau, sorry das hätte ich erwähnen sollen!
gruß
Swen
AW: Trennen einer Varibeln...
19.04.2006 13:29:10
Matthias
Hallo Swen,
Function Z_1(x As String) Z_1 = Split(x, "-")(0) * 1 End Function Function Z_2(x As String) Z_2 = Split(Split(x, "-")(1), "µ")(0) * 1 End Function Function Z_3(x As String) Z_3 = WorksheetFunction.Substitute(Split(x, "/")(1), "µm", "") * 1 End Function
 
 ABCD
51 - 2345µm/23456µm1234523456
623 - 12µm/45µm231245
Formeln der Tabelle
B5 : =Z_1(A5)
C5 : =Z_2(A5)
D5 : =Z_3(A5)
B6 : =Z_1(A6)
C6 : =Z_2(A6)
D6 : =Z_3(A6)
 
Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Gruß Matthias
Anzeige
Aber nicht in Excel 97
19.04.2006 13:36:09
Hugo
Hallo,
da gab es Split nocht nicht.
Hugo
AW: Aber nicht in Excel 97
19.04.2006 13:38:07
Swen
Hallo Hugo und Matthias,
wie kann ich das denn bei excel 97 machen?
gruß
Swen
AW: Aber nicht in Excel 97
19.04.2006 13:46:24
Matthias
Hallo Swen,
so:
Function Z_1(x As String) Z_1 = Left(x, InStr(x, " - ")) * 1 End Function Function Z_2(x As String) Dim t1 As String t1 = Mid(x, InStr(x, " - ") + 3) Z_2 = Left(t1, InStr(t1, "µ") - 1) * 1 End Function Function Z_3(x As String) Z_3 = WorksheetFunction.Substitute(Mid(x, InStr(x, "/") + 1), "µm", "") * 1 End Function
Wenn allerdings bestimmte Zeichen ("/","µ") im String fehlen, kommt ein Fehler. Müsstest du noch extra behandeln, falls das vorkommen kann.
Gruß Matthias
Anzeige
AW: Aber nicht in Excel 97
19.04.2006 15:46:06
Swen
Hallo Matthias,
kann ich auch statt
Function Z_1(x As String)
das so schreiben
Function Z_1(x As Integer)
gruß
swen
AW: Aber nicht in Excel 97
19.04.2006 15:52:04
Matthias
Hallo Swen,
versuch es - es wird ein Fehler kommen, denn das Argument ("1 - 2345µm/23456µm") ist ja keine Integer-Zahl.
oder meinst du:

Function Z_1(x As String) As Integer

?
Gruß Matthias
AW: Aber nicht in Excel 97
20.04.2006 12:48:53
Swen
Hallo Matthias,
genau das zweite war das was ich meinte!
Vielen Dank!
funzt jetzt alles Super!
Gruß
Swen
AW: Aber nicht in Excel 97
19.04.2006 13:39:52
Matthias
Hallo Hugo,
aha, Danke, wusste ich nicht.
Gibt es irgendwo eine Zusammenfassung, die auflistet, welche Funktionen / Methoden / Eigenschaften bei den jeweiligen Excel-Versionen neu hinzugekommen sind?
Immerhin hab ich mir gemerkt, dass es Replace() auch erst ab xl2000 gibt...
Gruß Matthias
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige