Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aus Kommentar eine zahl oder text rauslesen

Forumthread: Aus Kommentar eine zahl oder text rauslesen

Aus Kommentar eine zahl oder text rauslesen
19.10.2004 08:09:14
Bachner
Hallo
Das ist der inhalt von einem Kommentar.
Ich möchte aus diesem kommentar aus der driten zeile das erste Wort in meinem Beispil ist es die 80 also bis zu dem ersten Leerzeichen.
ActiveCell.Comment.Text?
GerhardB: Einsatz -12€
Spiel startet den.
80 15.10.2004 17:03
Gewonen.
Vielen dank Gerhard
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus Kommentar eine zahl oder text rauslesen
WernerB.
Hallo Gerhard,
wie gefällt Dir das?

Sub Gerhard()
Dim tx As String
Dim b As Byte
tx = ActiveCell.Comment.Text
b = InStr(tx, Chr(10))
b = InStr(b + 1, tx, Chr(10))
tx = Right(tx, Len(tx) - b)
b = InStr(tx, " ")
tx = Left(tx, b - 1)
MsgBox tx, vbInformation, _
"Dezenter Hinweis für " & Application.UserName & ":"
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
Anzeige
AW: Aus Kommentar eine zahl oder text rauslesen
19.10.2004 14:59:01
Bachner
Hallo natürlich bedanke ich mich herzlich für all die hilfe die insbesonders sehr schnel geschiet.
Vielen dank Gerhard
AW: Aus Kommentar eine zahl oder text rauslesen
19.10.2004 20:20:37
Bachner
Hallo alles funktioniert.
Vielen dank. Gerhard
AW: Aus Kommentar eine zahl oder text rauslesen
19.10.2004 21:29:43
Bachner
Hallo alles funktionirt was ich bekommen habe.
Da habe ich noch etwas wen diese zeile LEER ist dan würde ich gerne eine scheinnummer einfügen. Siehe im text unten?
Vielen dank Gerhard

Sub Text_Kommentar_start_zeit()
Dim tx As String
Dim scheinnummer As String
Dim b As Byte
tx = ActiveCell.Comment.Text
b = InStr(tx, Chr(10))
b = InStr(b + 1, tx, Chr(10))
tx = Right(tx, Len(tx) - b)
b = InStr(tx, " ")
If InStr(tx, 0) = 0 Then
'an diese stelle in diese zeile aus iner variablen den wert einfügen?
'80 15.10.2004 17:03
End If
End Sub

Anzeige
;

Forumthreads zu verwandten 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
VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
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
Bestimmte Werte aus einer Zelle herausfiltern
G_G

Hallo zusammen.
Ich habe in einer Zelle einen etwas längeren Text (mit Zahlen und Buchstaben). Ich würde jetzt gerne hieraus den Wert rausfiltern (in separate Spalte), der neben der Buchstabenkombination "AT" steht.
Hört sich einfach an. Da gibt es aber noch einige Sonderfälle.
Ich...
15.09.2008 12:03:00
Thread-ID: 1009747
5 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
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Anzeige
Zahl aus Text
Holger

Hallo Leute,
heute hab ich mal wieder ein Problem.
Habe mir per Webabfrage Zahlen aus dem Netz in meine Tabelle eintragen lassen. Zahlen sind maximal 4-stellig vor dem Komma und mehrere Stellen rechts vom Komma. Leider kann man diese Zahlen nicht für weitere Berechnungen verwenden. Ich...
13.10.2008 08:44:00
Thread-ID: 1015926
3 Beiträge
Kommagetrennte Werte in einer Zelle
Martin

Hallo zusammen,
Ich habe folgendes Problem:
Zahlen/Werte die jeweils in einer Zelle stehen und mittels Komma (und Leerzeichen) getrennt sind, will ich einzeln untereinander in eigene Zellen verfrachten, für jeden Wert eine Zelle. Da ich hunderte solcher Zellen habe mit unterschiedlich v...
14.11.2008 13:33:53
Thread-ID: 1024555
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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