Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Daten aus TextBox auslesen

Betrifft: Daten aus TextBox auslesen von: Manuel Marhold
Geschrieben am: 09.09.2004 22:26:23

Hi nochmal..

Ich schaffe das immer noch nicht..

Ich habe ien UserForm mit einer TextBox.

dort füge ich folgenden Text ein:

2516/h 2700/h 2892/h 3101/h 3305/h

Lagerkapazität: 190750
Abzüge: 0% (0/h)
Kredit Rückzahlung: 0/h
Konstruktionsstufe: 27

Rohstoff: Kristalle






1466/h 1601/h 1732/h 1877/h 2053/h

Lagerkapazität: 111250
Abzüge: 0% (0/h)
Kredit Rückzahlung: 0/h
Konstruktionsstufe: 22


Rohstoff: Frubin






1001/h 1092/h 1179/h 1278/h 1401/h

Lagerkapazität: 111250
Abzüge: 0% (0/h)
Kredit Rückzahlung: 0/h
Konstruktionsstufe: 22

Rohstoff: Orizin






828/h 913/h 1001/h 1092/h 1179/h

Lagerkapazität: 80500
Abzüge: 0% (0/h)
Kredit Rückzahlung: 0/h
Konstruktionsstufe: 20


Rohstoff: Frurozin






1117/h 1225/h 1337/h 1445/h 1567/h

Lagerkapazität: 111250
Abzüge: 0% (0/h)
Kredit Rückzahlung: 0/h
Konstruktionsstufe: 21

Rohstoff: Gold






129/h




Ich brauche die jeweils ersten zahlen vor dem "/h"

also:

2516
1466
1001
828
1117
129


wie komme ich daran?

ich kann ja das "/h" finden und die Leerstelle davor..

Nur wie kann ich den Text dazwischen auslesen?

Ich bin echt am verzweifeln..

Würde mich über Hilfe riesig freuen!!

Gruß

Manuel

  


Betrifft: AW: Daten aus TextBox auslesen von: RALF
Geschrieben am: 13.09.2004 09:58:18

Moin,

wenn die erste Zeile eine feste Datenstruktur hat, dann wäre es simpel, da die Daten in der Struktur 0000/h 0000/h usw. vorliegen. Dann wäre hier mit Mid(txt, Start, Anzahl) die Lösung einfach.
txt = "0000/h 0000/h 0000/h"
Var1 = Mid(txt, 1, 4)
Var2 = Mid(txt, 8,4)
Var3 = Mid(txt, 15,4)

Ansonsten muss über das suchen der Leerstellen die Startposition bestimmt werden.

Gruß RALF


 

Beiträge aus den Excel-Beispielen zum Thema "Daten aus TextBox auslesen"