Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
372to376
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
372to376
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

möchte nur Zahlenwert aus String erhalten!

möchte nur Zahlenwert aus String erhalten!
02.02.2004 13:31:02
Thomas
Hallo,
ich habe einen String der z.B. so aussieht "comment[123]" nun ist meine Frage gibt es eine Funktion die mir aus diesem string als rückgabewert nur die "123" zurückgibt?
gruß
Thomas

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: möchte nur Zahlenwert aus String erhalten!
02.02.2004 13:38:08
y
hi Thomas,
so in etwa ? bei diesem ;-) string !
=TEIL(A1;SUCHEN("[";A1)+1;3)
cu Micha
nein ich such eine VB Funktion
02.02.2004 13:41:52
Thomas
nein ich such eine VB Funktion

Danke
Gruss
Thomas
AW: nein ich such eine VB Funktion
02.02.2004 13:48:27
xXx
Hallo,

Function strZahl(MeinString As String)
For t = 1 To Len(MeinString)
If IsNumeric(Mid(MeinString, t, 1)) Then
strZahl = strZahl & Mid(MeinString, t, 1)
End If
Next t
End Function

Gruß aus'm Pott
Udo
http:www.ecxelerator.de
AW: nein ich such eine VB Funktion
02.02.2004 14:01:57
y
hi Thomas,
es wäre hübsch wenn das dann auch gleich dabeistehen würde damit man nicht "doppelt" nachdenken braucht ;-)

Sub test()
ergebnis = Mid(Cells(1, 1), InStr(1, Cells(1, 1), "[") + 1, InStr(1, Cells(1, 1), "]") - InStr(1, Cells(1, 1), "[") - 1)
End Sub

cu Micha
Anzeige
AW: möchte nur Zahlenwert aus String erhalten!
02.02.2004 14:06:09
Harald
Der quell und Zielbereich besteht hier nur aus 3 Zeilen


Sub xWerte()
Dim aDaten, temp
Dim x As Long, y As Long
aDaten = Range("B2:B4").Value
'ReDim aZiel(1 To UBound(aDaten), 1)
For x = 1 To UBound(aDaten)
temp = aDaten(x, 1)
aDaten(x, 1) = ""
For y = 1 To Len(temp)
If Asc(Mid(temp, y, 1)) > 47 And Asc(Mid(temp, y, 1)) < 58 Then
aDaten(x, 1) = aDaten(x, 1) & Mid(temp, y, 1)
End If
Next
Next
Range("D2:d4") = aDaten
End Sub

AW: möchte nur Zahlenwert aus String erhalten!
02.02.2004 13:47:34
ChrisL
Hi Thomas
Option Explicit

Sub test()
MsgBox NurZahl("comment[123]")
End Sub



Function NurZahl(strText As String) As Variant
Dim ZahlStart As Long
Dim i As Long
NurZahl = "Keine Zahl im String vorhanden"
If strText = "" Then Exit Function
For i = 1 To Len(strText)
If IsNumeric(Mid(strText, i, 1)) Then Exit For
Next i
If IsNumeric(Mid(strText, i, 1)) = True Then
For ZahlStart = i To Len(strText)
If IsNumeric(Mid(strText, ZahlStart, 1)) = False Then Exit For
Next ZahlStart
NurZahl = Mid(strText, i, ZahlStart - i)
End If
End Function

Gruss
Chris
Anzeige
AW: möchte nur Zahlenwert aus String erhalten!
02.02.2004 13:55:32
thomas
Danke schon mal!
Ich habe in der Hilfe eine Funktion Namens Val gefunden, die würde mir aber nur die Zahl auslesen hinter [.
Gruß
Thomas
AW: möchte nur Zahlenwert aus String erhalten!
02.02.2004 15:58:13
Thomas
Danke für Eure Hilfe!

309 Forumthreads zu ähnlichen Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 Beiträge
Anzeige
Formelbezug aus Zelle
chris

Hallo Excelexperten,
habe eine frage und würde mich sehr über Hilfe freuen.
habe folgende Formel.
='R:\2006\Prüfungen\D 06 001\[MHU_001.xls]Deckblatt'!$A$1
diese Formel bezieht sich immer auf die aktuelle Zeile.
Wenn ich sie herunterziehe sollte es mir immer in die Formel de...
11.09.2008 14:19:13
Thread-ID: 1009123
7 Beiträge
Zahlen aus aus Text extrahieren und addieren
Bernd

Hallo,
ich würde gerne aus einer Zelle, die sowohl Zahlen, aber auch Text enthält, die Zahlen "extrahieren" und miteinander addieren. Der Inhalt der Zelle B2 z.B. würde so aussehen:
'+15 Autos;-10 Waschmaschinen;-3 Schränke
Nun möchte ich in Zelle C2 das Ergebnis sehen: 2
Wie kö...
11.09.2008 16:20:36
Thread-ID: 1009173
10 Beiträge
Anzeige
Bestimmten Wert in einer Zelle finden
Olli

Hallo,
ich lauf gerade wieder mal mit einem Brett vorm Kopf rum und hoffe, mir kann einer hier helfen.
Ich habe in einer Zelle mehrere Werte stehen, die jeweils durch Semikolon getrennt sind (bis zu 15).
Wie kann ich per VBA eine Schleife erstellen, dass solange nach einem Wert gesu...
19.09.2008 08:54:00
Thread-ID: 1010897
5 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Textbox Ausgabe als Zahl bzw. Zeit formatieren
Steffan

Hallo ihr lieben,
ich schreib jetzt schon den ganzen Tag an folgender Routine:
Private Sub CommandButton1_Click() Dim z As Integer z = Range("I101").End(xlUp).Row + 1 TextBox1 = Format(CDate(TextBox1.Value), "dd.mm.yyyy") Cells(z, 9) = TextBox1 'Datum des Tauchgangs Cells(z, 12) = Tex...
28.09.2008 20:12:56
Thread-ID: 1012988
6 Beiträge
Wert nach Änderung einer Zelle schreiben
Markus

Hallo Leute,
ich werde Excel nie wirklich verstehen. Habe wieder eine Frage: Bei Veränderung des Wertes einer Zelle möchte ich einen Wert in eine andere Zelle schreiben (klingt einfach - gelingt mir nicht!):
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorHandle...
01.10.2008 18:26:00
Thread-ID: 1013729
31 Beiträge
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
16
6
9
4
4
1
5
30
3
1
2
5
2
4
8
5
9
2
1
4
2
4
22
1